Inhaltsverzeichnis
Word-Dokument öffnen
Dieses Word-VBA-Makro öffnet ein Word-Dokument aus dem angegebenen Verzeichnis:
Sub OpenDoc() Dim strFile As String strFile = "c:\Users\Nenad\Desktop\Test PM.docm" 'Ändere den Pfad deiner Datei If Dir(strFile) "" Then 'Zuerst prüfen wir, ob das Dokument überhaupt existiert angegebener Speicherort Documents.Open strFile End If End Sub
Jetzt können Sie mit dem neu geöffneten Dokument mit dem ActiveDocument-Objekt interagieren. Dieser Code fügt dem Dokument Text hinzu.
ActiveDocument.Range(0, 0).Text = "Text hinzufügen"
Dokument zu Variable öffnen
Sie können auch ein Word-Dokument öffnen und es sofort einer Variablen zuweisen:
Sub OpenDoc() Dim strFile As String Dim oDoc as Document strFile = "c:\Users\Nenad\Desktop\Test PM.docm" 'Ändere den Pfad deiner Datei If Dir(strFile) "" Then 'Zuerst prüfen wir, ob Dokument existiert überhaupt am angegebenen Ort Set oDoc = Documents.Open strFile End If End Sub
Ermöglicht die Interaktion mit dem Dokument über die Variable oDoc.:
oDoc.Range(0, 0).Text = "Text hinzufügen"
Im Allgemeinen empfiehlt es sich, eine Variable zu öffnen, sodass Sie jederzeit problemlos auf das Dokument verweisen können.
Word-Dokument aus Excel öffnen
Dieses VBA-Verfahren öffnet ein Word-Dokument aus einem anderen MS Office-Programm (z. B. Excel):
Sub OpenDocFromExcel() Dim wordapp Dim strFile As String strFile = "c:\Users\Nenad\Desktop\Test PM.docm" Set wordapp = CreateObject("word.Application") wordapp.Documents.Open strFile wordapp.Visible = True End Sub