我想把一张图片加到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)

可是这样插入的图片就是没有在单元格里面

有没有什么办法能实现
...全文
168 1 打赏 收藏 转发到动态 举报
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
skyshout 2011-04-15
  • 打赏
  • 举报
回复
You can use Bookmark!

16,554

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧