Font

Default Font

Tools, Options, General, Standard Font to change default font and size.

The font used is in the worksheet cells and travels with it.

You can use Book.xlt template for new workbooks, and sheet.xlt template for new worksheets.  The template can be stored in you XLStart directory.
  i.e. C:\Program Files\Microsoft Office\Office\Xlstart

You might also try a search for by entering *.xlt in the "Named" box of the Find Files dialog box.

Changing the font in Excel

Sub TimesNR()
  Dim c As Range
  For Each c In [A1:C5]
    If c.Font.Name Like "Cour*" Then
        c.Font.Name = "Times New Roman"
    End If
  Next c
End Sub

Print Font List

There is nothing builtin to display a list of fonts. 

Option Explicit
Sub FontList()
'William West, William (willwest22@yahoo.com), programming 2001-05-02
'http://groups.google.com/groups?selm=OJz78z50AHA.1976%40tkmsftngp03
Application.ScreenUpdating = False
Dim Fnts
Dim i As Integer
Set Fnts = Application.CommandBars("Formatting").Controls(1)
For i = 1 To Fnts.ListCount
    Cells(i, 1) = Fnts.List(i)
    Cells(i, 1).Font.Name = Cells(i, 1).Text
Next i
Application.ScreenUpdating = True
End Sub

The above FontList subroutine, I believe, adequately replaces need for posting by Laurent Longre; and which, I believe it requires a subroutine in C++ of his.

See FontInfo on my Formula.htm page.

Excel Options

• Specifiy Standard font and size to be used:
  Tools|Options|General|Standard font: (font and size)
• List Font names in the Font
  Tools|Customize|Options|List Font Names in their Font (checkbox)

Control Panel

Other pages with Font information

• Symbols page
• Pathname page for headers and footers.
• page, font information should probably be moved to this page.

Related

• SMALL CAPS, a macro to make Small Caps like the Copperplate fonts.

Visit [my Excel home page]   [Index page]   [Excel Onsite Search]   [top of this page]

Please send your comments concerning this web page to: David McRitchie mailto:DMcRitchie@msn.com.