Range.Font Property (Word)
Returns or sets a Font object that represents the character formatting of the specified object. Read/write Font.
Syntax
expression .Font
expression A variable that represents a Range object.
Remarks
To set this property, specify an expression that returns a Font object.
Example
This example removes bold formatting from the Heading 1 style in the active document.
ActiveDocument.Styles(wdStyleHeading1).Font.Bold = False
This example switches the font of the second paragraph in the active document between Arial and Times New Roman.
Set myRange = ActiveDocument.Paragraphs(2).Range
If myRange.Font.Name = "Times New Roman" Then
myRange.Font.Name = "Arial"
Else
myRange.Font.Name = "Times New Roman"
End If