![]() |
||
![]() |
Autotexte beim Öffnen eines Dokuments auswählenIch möchte mit Word eine Dokumentenvorlage anlegen, so dass beim Öffnen ein Dialog erscheint, in dem sich Texte mit bis zu fünf verschiedenen Kontrollkästchen auswählen lassen. Über eine Schaltfläche soll Word dann die ausgewählten Texte in das Dokument einfügen. Wie geht das? Ein Lösungsbeispiel für Ihre Probleme finden Sie als Word-2000-Datei auf der Heft-CD: CHIP-Code AUSWAHL. Um eine ähnliche Lösung selbst zu programmieren, gehen Sie so vor:Öffnen Sie in Word den Visual-Basic-Editor mit dem Menübefehl »Extras | Makro | Visual Basic-Editor«. In der Baumstruktur auf der linken Seite des Editors sehen Sie für die Druckformatvorlage »Normal« und für jedes geöffnete Dokument ein spezielles Projekt. Markieren Sie das entsprechende Projekt für Ihr Dokument mit einem Mausklick. Erzeugen Sie nun mit dem Befehl »Einfügen | User-Form« ein neues Formular. Nennen Sie es »TextAuswahl«, indem Sie den neuen Namen im Eigenschaftsfenster des Formulars als »(Name)« eintragen. Selection.EndKey Unit:=wdStory If CheckBox1 = True Then Selection.TypeText Text:=CheckBox1.Caption Selection.TypeParagraph End If Me.Hide Unload TextAuswahl Damit das Formular automatisch erscheint, wenn Sie das Dokument öffnen, erzeugen Sie mit »Einfügen | Modul« ein neues Modul und definieren die Prozedur »AutoOpen()« wie folgt: Sub AutoOpen() Load TextAuswahl TextAuswahl.Show End Sub Word führt beim Öffnen die Prozedur dieses Namens aus. »AutoOpen« lädt erst den Dialog »TextAuswahl« in den Speicher und zeigt sie danach an. |
![]() |