Selection.InlineShapes.AddOLEControl ClassType:="Forms.CommandButton.1"
Selection.InlineShapes.AddOLEControl ClassType:="Forms.ListBox.1"
例如WORD文档中添加了以上两个控件,通过什么方式能查找到?
------解决方案--------------------------------------------------------
- VB code
Dim doc As DocumentSet doc = ActiveDocumentDim shp As InlineShapeFor Each shp In doc.InlineShapes MsgBox shp.TypeNext