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 里去了,然后要怎么办呢?
明天给各位送分。
...全文
995打赏收藏
100分!--如何从word2k文档的单元格里把图片抓出来并保存起来
不知这样对不对: 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 里去了,然后要怎么办呢? 明天给各位送分。