código em vba

[regis jm]

Amigos estou precisando código para enviar uma imagem já carregada numa form para uma determinada planilha, segue meu código de carregamento na formulário...

Obs. Sou iniciante em programação ok!!!

SEGUE CÓDIGO

'Manda a imagem para a planilha imprimir

Private Sub Inserir_Click()

'???????Sues códigos

End Sub

___________________________________________________________________________________________

'Carrega uma imagem para formulário

Private Sub InserirDados_Click()

Dim endedreçoimg As String

On Error GoTo erro

endedreçoimg = Application.GetOpenFilename(filefilter:="picture Filco,*.ico;*.bmp")

Image1.Picture = LoadPicture(endedreçoimg)

Worksheets("Banco_Dados").Range("F16") = endedreçoimg 'Armazena endereço da imagem na celular da plan banco de dados

erro:

End Sub

_____________________________________________________________________________________________

'Retira a imagem inserida anteriormente.

Private Sub Desfazer_Click()

Image1.Picture = LoadPicture("")

End Sub

****Apos o carregamento preciso pegar esta foto e enviar para uma planilha, se alguém puder dar uma ajuda agradeço.