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.
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
Referência do modelo de objeto do Word
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.