Wie kann man automatisch Arbeiten ausführen lassen, wenn Word geöffnet wird

Anleitung:

Hierzu öffnet man Word,

dann Alt-F11 ->wechsel auf Makro Editor.

è Wechsel im Projekt-Bereich auf : Normal ->Microsoft Word Objekte ->ThisDocument

è Im Editor-Fenster das linke Feld öffnen und auf "Document" ändern

è Im rechten Auswahl-Feld auf "Open" auswählen
dann wird automatisch ein Code-Block eingefügt: Document_Open()

è In den Document_Open() Code Block jetzt die Makro Zeilen einfügen, die ausgeführt werden sollen

Gilt auch für Excel, PowerPoint, Outlook

 

 

 

Beispiel: automatisch die Zoom Ansicht Auflösung auf 100 Prozent einstellen

Private Sub Document_Open()     ActiveWindow.ActivePane.View.Zoom.Percentage = 100 End Sub