Método TextEffectFormat.ToggleVerticalText (Word)

Cambia el flujo de texto del WordArt especificado de horizontal a vertical o viceversa.

Sintaxis

expresión. ToggleVerticalText

expresión obligatoria. Variable que representa un objeto "TextEffectFormat".

Comentarios

Usar el método ToggleVerticalText se intercambian los valores de las propiedades Width y Height del objeto Shape que representa el WordArt y deja las propiedades Left y Top sin cambios.

El método Flip y la propiedad Rotation del objeto Shape y la propiedad RotatedChars y el método ToggleVerticalText del objeto TextEffectFormat afectan a la orientación de carácter y la dirección del flujo de texto en un objeto Shape que representa WordArt. Es podrán que deba experimentar para descubrir cómo combinar los efectos de estas propiedades y métodos para obtener el resultado que desea.

Ejemplo:

En este ejemplo, se agrega al documento activo un WordArt que contiene el texto "Test" y se cambia a vertical el flujo de texto horizontal (valor predeterminado para el estilo del WordArt especificado msoTextEffect1).

Dim newWordArt As Shape 
 
Set newWordArt = _ 
 ActiveDocument.Shapes.AddTextEffect( _ 
 PresetTextEffect:=msoTextEffect1, Text:="Test", _ 
 FontName:="Arial Black", FontSize:=36, FontBold:=False, _ 
 FontItalic:=False, Left:=100, Top:=100) 
newWordArt.TextEffect.ToggleVerticalText

Consulte también

Objeto TextEffectFormat

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.