Hur man startar Word med ett Excel -makro

Anonim

I vårt exempel vill vi starta en ny Word -session och öppna ett specifikt dokument. Dokumentet kan sedan redigeras. Word kallas med kommandon från det tidigare integrerade VBA -biblioteket.

Använd kommandot "Skapa objekt" för att skapa en Word -session från ett Excel -program. Genom att överföra parametern "Word.Application" startar du en ny Word -session från Excel. Här är hela koden:

Sub StartWord ()
Dim objWordApp Som objekt
Dim strPath Som sträng
strPfad = "C: \ Document.docx"
Ange objWordApp = _ CreateObject ("Word.application")
Med objWordApp
.Application.Visible = True
.Application.Documents.Open (strPath)
'Här är dina kommandon
Sluta med
Ange objWordApp = Ingenting
Avsluta Sub

Programmet öppnar en Word -session och laddar dokumentet "C: \ Document.docx". Du får ett felmeddelande om dokumentet inte finns i den här positionen. Från positionen "Dina kommandon här", infoga kommandona som Word -dokumentet ändras med. Observera kommandot i slutet av delrutan:

Ange objWordApp = Ingenting

Detta stänger anslutningen från Excel till Word via objektvariabeln "objWordApp". Detta är viktigt för att uppnå ett rent slut på programmet.