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.