Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Word mit leerem Dokument und Druckdialog aufrufen

Gruppe

Word

Problem

Word soll mit einem leeren Dokument und dem Druckdialog geöffnet werden.

Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.

StandardModule: Modul1

Sub Aufrufen()
   Dim appWord As Object
   Dim wdDoc As Object
   Set appWord = CreateObject("Word.Application")
   Set wdDoc = appWord.Documents.Add
   appWord.Dialogs(88).Show
   appWord.Visible = True
   Set wdDoc = Nothing
   Set appWord = Nothing
End Sub