Merhaba, eklediğiniz uygulamada tablo olmadığı için açılan kutuda hangi veriler görünüyor bilmiyorum.

taslak isimli word belgesine resim adında yerimi ekleyip,

     .GoTo what:=wdGoToBookmark, Name:="not"

     .TypeText [not]

kodunun altına;

     .GoTo what:=wdGoToBookmark, Name:="resim"

     GResimYolu = CurrentProject.Path & "\Resimler" & "\a.jpg"

     Set newPicture = WordApp.Selection.InlineShapes.AddPicture(FileName:=GResimYolu, LinkToFile:=False, SaveWithDocument:=True)

     newPicture.LockAspectRatio = msoTrue

     newPicture.Height = 150

     newPicture.Width = 100

Kodu eklerseniz a.jpg dosyasını word belgesine ekleyecektir.

a.jpg yerine açılan kutudaki veriye göre tanımlama yaptırabilirsiniz.