VBA 代码正在 Excel 上运行,我尝试在 Word 中的书签后插入 3 行,但收到错误消息“对象不支持此属性或方法”
我在 Word 上运行代码,运行正常,我不知道发生了什么...以下是代码的一部分:
If iCounter > 1 Then
oDoc.Bookmarks("Entregables").Range.Select
Selection.MoveDown unit:=wdParagraph, Count:=1 'Here is where I get the error
Selection.InsertAfter vbCrLf + vbCrLf + vbCrLf + vbCrLf
End If
答案1
如果从 Excel 运行并自动化 Word,则该Selection
属性将被解释为 Excel 对象。只需Selection
使用 document.ActiveWindow 引用进行限定:
If iCounter > 1 Then
oDoc.Bookmarks("Entregables").Range.Select
oDoc.ActiveWindow.Selection.MoveDown unit:=wdParagraph, Count:=1 'Here is where I get the error
oDoc.ActiveWindow.Selection.InsertAfter vbCrLf + vbCrLf + vbCrLf + vbCrLf
End If