返回与本 OLE 对象相联系的 OLE 自动化对象。Object 类型,只读。
本示例在 sheet1 的内嵌 Word 文档对象的开始处插入文字。注意,在 With 控制结构内的三条语句为 WordBasic 语句。
Set wordObj = Worksheets("Sheet1").OLEObjects(1)
wordObj.Activate
With wordObj.Object.Application.WordBasic
.StartOfDocument
.Insert "This is the beginning"
.InsertPara
End With