以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  如何删除word文档中的图片呢?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=172267)

--  作者：wohenguaia --  发布时间：2021/10/4 20:29:00 --  如何删除word文档中的图片呢? 用代码删除word文档中的图片 [此贴子已经被作者于2021/10/4 20:29:44编辑过]

--  作者：有点蓝 --  发布时间：2021/10/4 20:39:00 --   Dim app As New MSWord.Application try     Dim fileName = "e:\\问题\\123.docx"     Dim doc As object = app.Documents.Open(fileName)     For Each a As object In doc.Shapes         a.delete     Next          app.visible = True     ‘Doc.save catch ex As exception     msgbox(ex.message)     app.Quit finally     \'app.Quit End try

--  作者：wohenguaia --  发布时间：2021/10/4 20:41:00 --   谢谢蓝版