MS Office Forum

Ask Question   UnAnswered
Home » Forum » MS Office       RSS Feeds

Workbook font?

  Asked By: Molly    Date: Oct 25    Category: MS Office    Views: 1800

How can I change the default font of an active(!) workBOOK?
The command "StandardFont" does not work, since it is only for new workbooks and
after restarting Excel. Changing the font of a worksheet by using
Cells.Font.Name = "Times New Roman" does not hlp either, since I use Pivot
tables, and when clicking on a number in the Pivot you get the details for this
data in a new worksheet which is using the workbooks default font.



2 Answers Found

Answer #1    Answered By: Emily Brown     Answered On: Oct 25

Have you tried modifying the style?

With ActiveWorkbook.Styles("Normal").Font
.Name = "Arial"
.Size = 10
End With
Selection.Style = "Normal"

Answer #2    Answered By: Jarrod Williams     Answered On: Oct 25

Since I have some cells formatted as a
date, I modified your code a bit:

With ActiveWorkbook.Styles("Normal")
.IncludeNumber = False
.Font.Name = "Times New Roman"
.Font.Size = 8
End With

Didn't find what you were looking for? Find more on Workbook font? Or get search suggestion and latest updates.