FontNames Object

Word Developer Reference

Represents a list of the names of all the available fonts.

Remarks

Use the FontNames, LandscapeFontNames, or PortraitFontNames property to return the FontNames object. The following example displays the number of portrait fonts available.

Visual Basic for Applications
  MsgBox PortraitFontNames.Count & " fonts available"

This example lists all the font names in the FontNames object at the end of the active document.

Visual Basic for Applications
  For Each aFont In FontNames
    ActiveDocument.Range.InsertAfter aFont & vbCr
Next aFont

Use FontNames(Index), where Index is the index number, to return the name of a font. The following example displays the first font name in the FontNames object.

Visual Basic for Applications
  MsgBox FontNames(1)
Bb211948.vs_note(en-us,office.12).gif  Note
You cannot add names to or remove names from the list of available font names.

See Also