Office: Word Datei mit Excel öffnen VBA

Hallo,

ich möchte in Excel einen Button drücken und dann soll sich eine bekannte Word Datei öffnen.
Wie löse ich das? Also statt Workbook.open möchte ich eine Word Datei öffnen.

Office 2010
Danke

 

Hallo,

im folgenden Code sind 2 mögliche Aufrufvarianten enthalten, je nachdem welche Du bevorzugst. Für mich ist die erste Aufrufvariante (Early-Binding) die sympathischste beim Programmieren.

Code:

Sub Makro_EarlyBinding()

'  Bei dieser Variante ("Early-Binding") muss im VBA-Editor-Menü > Extras > Verweise... > Verfügbare Verweise
'  die Bibliothek "Microsoft Word .... Object Library" angehakt werden, damit sie für das VBA-Editor/Kompilersystem
'  zur Verfügung steht.
'  Der große Vorteil: Sobald man beim Programmieren ein Objekt aus der Library verwendet, erhält man eine automatische Unterstützung
'  zum darin enthaltenen Objektsystem, Konstanten, etc.

   Dim WordApp As New Word.Application
   With WordApp
     .Visible = True
     .Documents.Open Filename:="C:\Pfad_zum_Worddokument\WordDatei.doc"
   End With
    
End Sub

Code:

Sub Makro_LateBinding()

'  Bei dieser Variante ("Late-Binding") ist kein Verweis auf eine Word-Library zu setzen.
'  Der Nachteil besteht darin, dass man beim Programmieren mit dem erzeugten Objekt keinerlei automatische Unterstützung erhält.

   Dim WordApp As Object
   Set WordApp = CreateObject("Word.Application")
   With WordApp
     .Visible = True
     .Documents.Open Filename:="C:\Pfad_zum_Worddokument\WordDatei.doc"
   End With
    
End Sub

 

Besten Dank!