100分!--如何从word2k文档的单元格里把图片抓出来并保存起来

deWolf 2004-03-01 04:30:58
不知这样对不对:

Dim wApp As Word.Application, wDoc As Word.Document
Set wDoc = wApp.Documents.Open("F:\1.doc")
Set myTbl = wDoc.Tables(1)
myTbl.Cell(1, 1).Range.CopyAsPicture


似乎拷到 clipboard 里去了,然后要怎么办呢?

明天给各位送分。


...全文
99 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
snowegale888 2004-07-09
  • 打赏
  • 举报
回复
up
qbhuang 2004-07-09
  • 打赏
  • 举报
回复
但是好像会失真唉!
vansoft 2004-07-09
  • 打赏
  • 举报
回复
用个picture对象吧。
把图复制到那里就可以用save方法保存了。
gjd111686 2004-07-09
  • 打赏
  • 举报
回复
应该是Shape对象吧
qbhuang 2004-07-08
  • 打赏
  • 举报
回复
顶一下!
问题解决了吗?
小弟我也遇到同样问题,
如果解决,谢谢能把方法Mail给我
xuguochun@263.net.
//bow

5,138

社区成员

发帖
与我相关
我的任务
社区描述
其他开发语言 Office开发/ VBA
社区管理员
  • Office开发/ VBA社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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