Em nosso exemplo, queremos iniciar uma nova sessão do Word e abrir um documento específico. O documento pode então ser editado. O Word é chamado usando comandos da biblioteca VBA integrada anteriormente.
Use o comando “Criar objeto” para criar uma sessão do Word a partir de um aplicativo Excel. Ao transferir o parâmetro "Word.Application", você inicia uma nova sessão do Word a partir do Excel. Aqui está o código completo:
Sub StartWord ()
Dim objWordApp As Object
Dim strPath As String
strPfad = "C: \ Document.docx"
Defina objWordApp = _ CreateObject ("Word.application")
Com objWordApp
.Application.Visible = True
.Application.Documents.Open (strPath)
'Aqui estão seus comandos
Terminar com
Definir objWordApp = Nothing
End Sub
O programa abre uma sessão do Word e carrega o documento "C: \ Document.docx". Você receberá uma mensagem de erro se o documento não existir nesta posição. Na posição “Seus comandos aqui”, insira os comandos com os quais o documento do Word é alterado. Observe o comando no final da sub-rotina:
Definir objWordApp = Nothing
Isso fecha a conexão do Excel para o Word por meio da variável de objeto "objWordApp". Isso é importante para obter um final limpo do programa.
