Sono riuscito a far inserire l'immagine in un file word, ho usato il seguente codice:
Dim testo As word.Application
Dim pagina As word.Document
Dim img As word.InlineShape
testo = CreateObject("word.application")
testo.Visible = True
pagina = testo.Documents.Add
img = pagina.Shapes.AddPicture(FileName:="B:\Pictures\25.jpg", LinkToFile:=False,
SaveWithDocument:=True, Left:=50, Top:=50, Width:=300, Height:=200)
però appena carica l'immagine il programma va in crash e genera un errore
Qualcuno sa come risolverlo?