Tenho um codigo no excel que vincula com o word porem preciso pegar uma imagem da PLANILHA excel e jogar no word e o codigo que eu tenho não esta funcionando

'Esse é o codigo comum para adicionar um texto da planilha (FUNCIONAL)

.Application.Selection.Find.Text = "#NOME-SOBRENOME"
.Application.Selection.Find.Execute
.Application.Selection.Range = Sheets("Orcamento").Range("H12").Text

'Esse é o codigo da foto porem ele da erro
.Application.Selection.Find.Text = "#FOTO"
.Application.Selection.Find.Execute
.Application.Selection.Range = Sheets("Orçamento").Image2.Picture