ActiveDocument.InlineShapes.AddPicture fileName:="C:\Test.bmp", LinkToFile:=True, SaveWithDocument:=True