Range.Font Property (Excel)
Returns a Font object that represents the font of the specified object.
Syntax
expression .Font
expression A variable that represents a Range object.
Example
This example determines the if the font name for cell A1 is Arial and notifies the user.
Sub CheckFont()
Range("A1").Select
' Determine if the font name for selected cell is Arial.
If Range("A1").Font.Name = "Arial" Then
MsgBox "The font name for this cell is 'Arial'"
Else
MsgBox "The font name for this cell is not 'Arial'"
End If
End Sub