TabStops-Objekt (Word)

Eine Auflistung von TabStop Objekte, die die benutzerdefinierte und Standardtabstopps für einen Absatz oder eine Absatzgruppe.

HinwBemerkungeneise

Mit der TabStops-Eigenschaft können Sie die TabStops-Auflistung zurückgeben. Im folgenden Beispiel werden alle benutzerdefinierten Tabstopps aus dem ersten Absatz im aktiven Dokument gelöscht.

ActiveDocument.Paragraphs(1).TabStops.ClearAll

Im folgenden Beispiel wird den markierten Absätzen an der Position 2,5 Zoll ein Tabstopp hinzugefügt und anschließend in der TabStops-Auflistung die Position der einzelnen Elemente angezeigt.

Selection.Paragraphs.TabStops.Add Position:=InchesToPoints(2.5) 
For Each aTab In Selection.Paragraphs.TabStops 
 MsgBox "Position = " _ 
 & PointsToInches(aTab.Position) & " inches" 
Next aTab

Verwenden Sie die Hinzufügen Methode, um einen Tabstopp hinzuzufügen. Im folgenden Beispiel wird den markierten Absätzen zwei Tabstopps hinzugefügt. Der erste Tabstopp ist ein linksbündiger Tabulator mit ein punktiertes Füllzeichen auf 1 Zoll (72 Punkt) positioniert. Zum zweite Tabstopp ist zentriert und bei 2 Zoll positioniert.

With Selection.Paragraphs.TabStops 
 .Add Position:=InchesToPoints(1), _ 
 Leader:=wdTabLeaderDots, Alignment:=wdAlignTabLeft 
 .Add Position:=InchesToPoints(2), Alignment:=wdAlignTabCenter 
End With

Tabstopps können Sie auch hinzufügen, indem Sie eine Position mit der TabStops-Eigenschaft angeben. Im folgenden Beispiel wird den markierten Absätzen ein rechts ausgerichteter Tabstopp mit einer Schrittweite von zwei Zoll hinzugefügt.

Selection.Paragraphs.TabStops(InchesToPoints(2)) _ 
 .Alignment = wdAlignTabRight

Verwenden Sie TabStops (Index), wobei Index die Position des Tabstopps (in Punkt) oder die Indexnummer ist, um ein einzelnes TabStop-Objekt zurückzugeben. Tabstopps werden von links nach rechts am Lineal numerisch indiziert. Im folgenden Beispiel wird der erste benutzerdefinierte Tabstopp aus dem ersten Absatz im aktiven Dokument entfernt.

ActiveDocument.Paragraphs(1).TabStops(1).Clear

Im folgenden Beispiel wird den markierten Absätzen ein rechts ausgerichteter Tabstopp mit einer Schrittweite von zwei Zoll hinzugefügt.

Selection.Paragraphs.TabStops(InchesToPoints(2)) _ 
 .Alignment = wdAlignTabRight

Wenn Sie mit der Paragraphs-Auflistung (oder einem Bereich mit verschiedenen Absätzen) arbeiten, müssen Sie jeden Absatz der Auflistung einzeln ändern, wenn die Tabstopps nicht in allen Absätzen identisch sind. Im folgenden Beispiel wird der Tabulator an der Position 1 Zoll aus allen Absätzen des aktiven Dokuments entfernt.

For Each para In ActiveDocument.Content.Paragraphs 
 para.TabStops(InchesToPoints(1)).Clear 
Next para

Siehe auch

Referenz zum Word-Objektmodell

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.