Beitrag aus SmartTools Access Weekly
Text per VBA in ein Word-Dokument einfügen
Access Word 365 2024 2021 2019 2016 2013 2010
FRAGE Ich möchte per VBA Texte aus einer Access-Datenbank-Tabelle in ein Word-Dokument schreiben, um zum Beispiel ein Angebot zu erstellen. Dazu ist es mir schon gelungen, mit CreateObject eine Verbindung zu Word aufzubauen (objWord) und mit Documents.Add ein Dokument (objDoc) anzulegen. Jetzt stehe ich allerdings vor der Aufgabe, Texte in dieses Dokument zu schreiben. Welche Anweisungen muss ich dafür verwenden?
S. Wellmann
ANTWORT Nachdem ein Dokument angelegt oder geöffnet wurde, können Sie über das "Selection"-Objekt von Word darauf zugreifen. Dieses Objekt stellt die Methode "TypeText" zur Verfügung, mit der Sie beliebige Texte an der aktuellen Cursorposition einfügen können:
With objWord.Selection
.TypeText "Testext in Word-Dokument..." & vbCrLf
End With
Diese Anweisung schreibt den Text in das Dokument und beginnt eine neue Zeile. Um Leerzeilen einzufügen, nutzen Sie entweder "TypeText" nur mit "vbCrLf" oder die spezielle Methode "TypeParagraph":
With objWord.Selection
.TypeText vbCrLf
.TypeParagraph
End With