我想把一张图片加到word文档的指定位置
wzckr 2011-04-15 05:19:47 我开始想到的办法是在指定位置上建一个只有一个单元格的表格,然后把图片加到单元格里
代码为
oRange = oDocument.Tables(4).Cell(1, 1).Range
oRange.Select()
Dim missing = System.Reflection.Missing.Value
oWordApplic.InlineShapes.AddPicture(FileName, False, True, missing)
oShape = oWordApplic.Selection.InlineShapes(1).ConvertToShape
oDocument.Selection.WholeStory()
oShape.ZOrder(Microsoft.Office.Core.MsoZOrderCmd.msoSendBehindText)
可是这样插入的图片就是没有在单元格里面
有没有什么办法能实现