参考:https://wenku.baidu.com/view/6c60420ecc175527072208af.html 比如将选区变为图片保存到桌面: Sub 将选区转为图片存到桌面() Dim ans As Byte, Pic As String, Paths As String On Error Resume Next Paths = CreateObject("WScript.Shell").SpecialFolders("Desktop") &
InlineShape表示的类型其实不只是图片,还包括OLE, ACTIVE X等. 下面是MSDN中的定义:Represents an object in the text layer of a document(表示文档中文本层的一个对象). 可以通过InlineShape的Type属性获得这个对象的具体类型.Type是一个WdInlineShapeType的枚举类型.WdInlineShapeType可以说下面的常数之一: wdInlineShapeEmbeddedOLEObject 嵌