Método TextEffectFormat.ToggleVerticalText (Excel)

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

Sintaxis

expresión. ToggleVerticalText

Expresión Variable que representa un objeto TextEffectFormat .

Comentarios

Con el método ToggleVerticalText se intercambian los valores de las propiedades Width y Height del objeto Shape que representa 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 del carácter y a la dirección del flujo de texto en un objeto Shape que representa WordArt. Es posible que deba experimentar para descubrir cómo combinar los efectos de estas propiedades y métodos con el fin de obtener los resultados deseados.

Ejemplo:

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

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

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.