Propiedad Application.PortraitFontNames (Word)

Devuelve un objeto FontNames que incluye los nombres de todas las fuentes verticales disponibles.

Sintaxis

expresión. PortraitFontNames

expresión Variable que representa un objeto Application.

Ejemplo:

En este ejemplo, se inserta una lista de fuentes verticales en el punto de inserción.

For Each aFont In PortraitFontNames 
 With Selection 
 .Collapse Direction:=wdCollapseEnd 
 .InsertAfter aFont 
 .InsertParagraphAfter 
 .Collapse Direction:=wdCollapseEnd 
 End With 
Next aFont

Vea también

Objeto Application

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.