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.