Fonts Property Example

This example sets the default fixed-width font for the English/Western European/Other Latin Script character set to Courier New, 14 points.

With Application.DefaultWebOptions _
        .Fonts(msoCharacterSetEnglishWesternEuropeanOtherLatinScript)
    .FixedWidthFont = "Courier New"
    .FixedWidthFontSize = 14
End With