FontNames Object
Collapse the table of content
Expand the table of content

FontNames Object (Word)

Office 2013 and later

Contribute to this content

Use GitHub to suggest and submit changes. See our guidelines for contributing to VBA documentation.

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

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

MsgBox PortraitFontNames.Count & " fonts available"

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

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.

MsgBox FontNames(1)
Note Note

You cannot add names to or remove names from the list of available font names.

© 2016 Microsoft