StandardFont Property Example
This example sets the standard font to Geneva (on the Macintosh) or Arial (in Windows).
If Application.OperatingSystem Like "*Macintosh*" Then Application.StandardFont = "Geneva" Else Application.StandardFont = "Arial" End If