Class TabStops (PowerPoint VBA)

A collection of all the TabStop objects on one ruler. To use a TabStops class variable it first needs to be instantiated, for example 


Dim tss as TabStops
Set tss = ActiveWindow.RangeFromPoint.TextFrame.Ruler.TabStops

Add

Creates a tab stop and adds it to the TabStops collection.

The Type parameter value can be one of these PpTabStopType constants.

Add (Type, Position)


Dim tsp As TabStop
Set tsp = ActiveWindow.RangeFromPoint.TextFrame.Ruler.TabStops.Add(Type:=ppTabStopCenter, Position:=)

Arguments

The following arguments are required:

Type (PpTabStopType) - The type of the tab stop to be added.


Possible values are

ppTabStopCenter Center tab stop
ppTabStopDecimal Decimal tab stop
ppTabStopLeft Left tab stop
ppTabStopMixed Mixed
ppTabStopRight Right tab stop

Position (Single) - The position of the tab stop in the tab stops collection.

Count

Returns the number of objects in the specified collection. 


Dim lngCount As Long
lngCount = ActiveWindow.RangeFromPoint.TextFrame.Ruler.TabStops.Count

DefaultSpacing

Returns or sets the default tab-stop spacing for the specified text, in points. 


ActivePresentation.Slides(1).Shapes(1).TextFrame.Ruler.TabStops.DefaultSpacing = 26

Item

Returns a single tab stop from the specified TabStops collection.

Item (Index)

Index: The index number of the single TabStop object in the collection to be returned.


Dim tsp As TabStop
Set tsp = ActiveWindow.RangeFromPoint.TextFrame.Ruler.TabStops(Index:=1)