Classe TabStop (PowerPoint VBA)

A classe TabStop representa uma única parada de tabulação. O objeto TabStop é um membro da coleção TabStops. A coleção TabStops representa todas as paradas de tabulação em uma régua.

Set

Para usar uma variável de classe TabStop, ela primeiro precisa ser instanciada por exemplo

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

Os procedimentos a seguir podem ser usados ​​para definir variáveis ​​do tipo TabStop: TabStops.Item, TabStops.Add e Ruler.TabStops

Clear

Limpa a parada de tabulação especificada da régua e a exclui da coleção TabStops .

ActivePresentation.Slides(1).Shapes(1).TextFrame.Ruler.TabStops(1).Clear

Parent

Retorna o objeto parente para o objeto especificado.

Position

Retorna ou define, em pontos, a posição da parada de tabulação especificada. Leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).TextFrame.Ruler.TabStops(1).Position = 4

Type

Representa a formatação da parada de tabulação. Leitura/gravação.

Os valores possíveis são ppTabStopCenter - Parada de tabulação centralizada, ppTabStopDecimal - Parada de tabulação decimal, ppTabStopLeft - Parada de tabulação esquerda, ppTabStopMixed - Mista, ppTabStopRight - Parada de tabulação direita.

O valor da propriedade Type pode ser uma destas constantes PpTabStopType .

ActiveWindow.RangeFromPoint.TextFrame.Ruler.TabStops(1).Type = ppTabStopCenter

TabStops.Add

Cria uma parada de tabulação e a adiciona à coleção TabStops.

O valor do parâmetro Type pode ser uma destas constantes PpTabStopType .

Sintaxe : expression.Add (Type, Position)

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

Arguments

O seguinte argumento é opcional

Type (PpTabStopType) - O tipo de parada de tabulação a ser adicionado.

Os valores possíveis são

ppTabStopCenter Parada de tabulação centralizada.
ppTabStopDecimal Parada de tabulação decimal.
ppTabStopLeft Parada de tabulação esquerda.
ppTabStopMixed Mista
ppTabStopRight Parada de tabulação direita.

Position (Single) - A posição da parada de tabulação na coleção de paradas de tabulação.

TabStops.Count

Retorna o número de objetos na coleção especificada. Somente leitura.

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

TabStops.DefaultSpacing

Retorna ou define, em pontos, a parada de tabulação padrão para o texto especificado. Leitura/gravação.

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

TabStops.Item

Retorna uma única parada de Tabulação da coleção TabStops especificada.

Sintaxe : expression.Item (Index)

Index: O número de índice do único objeto TabStop da coleção a ser retornado.

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

TabStops.Parent

Retorna o objeto parente para o objeto especificado.