Objeto TabStops (Word)

Una colección de objetos TabStop que representan personalizados tabulaciones y predeterminadas de un párrafo o grupo de párrafos.

Comentarios

Utilice la propiedad TabStops para devolver la colección TabStops. En el siguiente ejemplo se borra todas las tabulaciones personalizadas del primer párrafo del documento activo.

ActiveDocument.Paragraphs(1).TabStops.ClearAll

En el siguiente ejemplo se agrega una tabulación situada a 2,5 pulgadas de los párrafos seleccionados y, a continuación, se muestra la posición de cada elemento de la colección TabStops.

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

Utilice el método Add para agregar una tabulación. En el siguiente ejemplo agrega dos tabulaciones a los párrafos seleccionados. La primera tabulación está alineada a la izquierda con un carácter de relleno punteado situado en 1 pulgada (72 puntos). La segunda tabulación está centrada y se coloca en 2 pulgadas.

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

También puede agregar una tabulación especificando una posición con la propiedad TabStops. En el siguiente ejemplo se agrega una tabulación alineada a la derecha situada a dos pulgadas de los párrafos seleccionados.

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

Utilice TabStops (Index), donde Index es la ubicación de la tabulación (en puntos) o el número de índice, para devolver un solo objeto TabStop. Las tabulaciones se indizan numéricamente de izquierda a derecha a lo largo de la regla. En el siguiente ejemplo se quita la primera tabulación personalizada del primer párrafo del documento activo.

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

En el siguiente ejemplo, se agrega a los párrafos seleccionados una tabulación alineada a la derecha situada a dos pulgadas.

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

Cuando se trabaja con la colección Paragraphs (o un intervalo con varios párrafos), deberá modificar cada párrafo de la colección individualmente si las tabulaciones no son idénticas en todos los párrafos. En el siguiente ejemplo se quita la tabulación situada a una pulgada de cada párrafo del documento activo.

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

Vea también

Referencia de modelos de objetos de Word

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.