Tipps & Tricks 21.04.2012, 08:52 Uhr

Word: Automatisch eigene Tabulatoren setzen

Problem: Ich erhalte für Word 2010 regelmässig Dateien von einem Geschäftspartner, die er mit einer anderen Anwendung erstellt. Die von ihm gesetzten Tabulatoren nützen mir nichts. Nun möchte ich folgende Schritte automatisieren: Alle gesetzten Tabulatoren in der Datei löschen und meine eigenen setzen. Die Tabs sollten alle linksbündig sein und an folgenden Positionen liegen: 1.5 cm, 2.75 cm, 3.75 cm, 9.0 cm, 10.0 cm und 16.0 cm. Ist das mit einem Makro zu machen?
Lösung: Das erreichen Sie mit einem Makro. Linksbündige Tabulatoren sind in Word Standard, darum muss dies im Makro nicht zwingend drinstehen.
Drücken Sie die Tastenkombination Alt+F11 zum Öffnen des VisualBasic-Editors. Fügen Sie diesen Makrocode (es sind 9 Zeilen, hier teils automatisch umbrochen) unter «Normal» ein, den Sie am besten von hier markieren und kopieren:
Information
Sub StandardTabs()Selection.ParagraphFormat.TabStops.ClearAllSelection.ParagraphFormat.TabStops.Add Position:=CentimetersToPoints(1.5)Selection.ParagraphFormat.TabStops.Add Position:=CentimetersToPoints(2.75)Selection.ParagraphFormat.TabStops.Add Position:=CentimetersToPoints(3.75)Selection.ParagraphFormat.TabStops.Add Position:=CentimetersToPoints(9)Selection.ParagraphFormat.TabStops.Add Position:=CentimetersToPoints(10)Selection.ParagraphFormat.TabStops.Add Position:=CentimetersToPoints(16)End Sub
Gehen Sie zu Datei/Schliessen und zurück zu Word. Pflanzen Sie das Makro nun in die Schnellstartleiste oben links: Klappen Sie sie auf, gehen zu Weitere Befehle, wählen oben die Makros und verfrachten das Makro «StandardTabs» per Hinzufügen in die «Symbolleiste für den Schnellzugriff».
In Zukunft gehts so: Markieren Sie das gesamte Dokument und führen Sie das Makro aus. Schon werden alle Tabulatorpositionen entfernt und Ihre eigenen gesetzt. (PCtipp-Forum)



Kommentare
Es sind keine Kommentare vorhanden.