Application.PortraitFontNames Property (Word)
Returns a FontNames object that includes the names of all the available portrait fonts.
Syntax
expression .PortraitFontNames
expression A variable that represents an Application object.
Example
This example inserts a list of portrait fonts at the insertion point.
For Each aFont In PortraitFontNames
With Selection
.Collapse Direction:=wdCollapseEnd
.InsertAfter aFont
.InsertParagraphAfter
.Collapse Direction:=wdCollapseEnd
End With
Next aFont