O objeto VBA não suporta esta propriedade ou método

Question

O código do VBA está sendo executado sobre o Excel, estou tentando inserir três linhas após um marcador no Word, mas recebo a mensagem de erro "Objeto não suporta esta propriedade ou método"

Eu corro o código pelo Word e funciona perfeitamente, não sei o que está acontecendo ... Aqui está uma parte do código:

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

    

Answer 1

Se estiver executando do Excel e automatizando o Word, a propriedade Selection será interpretada como um objeto do Excel. Apenas qualifique Selection com a referência 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