Ler em inglês

Compartilhar via


Objeto TabStops (Word)

Uma coleção de objetos TabStop que representam o sinalizador tabulações padrão e para um parágrafo ou grupo de parágrafos.

Comentários

Use a propriedade TabStops para retornar a coleção TabStops. O exemplo a seguir limpa todas as paradas de tabulação do primeiro parágrafo do documento ativo.

ActiveDocument.Paragraphs(1).TabStops.ClearAll

O exemplo a seguir adiciona uma parada de tabulação posicionada a 2,5 polegadas aos parágrafos selecionados e, em seguida, exibe a posição de cada item na coleção TabStops.

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

Use o método Add para adicionar uma parada de tabulação. O exemplo a seguir adiciona duas paradas de tabulação aos parágrafos selecionados. A primeira parada de tabulação é uma tabulação alinhada à esquerda com um preenchimento de tabulação pontilhado posicionada a 1 polegada (72 pontos). A segunda parada de tabulação é centralizada e posicionada a 2 polegadas.

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

Você também pode adicionar uma parada de tabulação especificando um local com a propriedade TabStops. O exemplo a seguir adiciona uma parada de tabulação alinhada à direita posicionada a 2 polegadas dos parágrafos selecionados.

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

Use TabStops (Index), onde Index é o local da parada de tabulação (em pontos) ou o número de índice, para retornar um único objeto TabStop. Paradas de tabulação são indexadas numericamente da esquerda para direita ao longo da régua. O exemplo a seguir remove a primeira parada de tabulação personalizada do primeiro parágrafo do documento ativo.

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

O exemplo a seguir adiciona uma parada de tabulação alinhada à direita e posicionada a 2 polegadas dos parágrafos selecionados.

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

Ao trabalhar com a coleção Paragraphs (ou um intervalo com vários parágrafos), você deve modificar cada parágrafo da coleção individualmente se as paradas de tabulação não são idênticas em todos os parágrafos. O exemplo a seguir remove a tabulação posicionada a 1 polegada de cada parágrafo no documento ativo.

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

Confira também

Referência do modelo de objeto do Word

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.