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 |