Solved: Change Default Font for New Workbook

[mferrisi]

I am creating a new workbook.
[vba]
Set wb = Workbooks.Add[/vba]

I want all of the fonts for all of the sheets for the new workbook will be Calibri with size ten.

Is there a way to make this the default for the new workbook without having to do it sheet by sheet?

thanks,

M

[Tinbendr]

[vba]Dim WB As Workbook
Set WB = Workbooks.Add
With WB
With .Styles("Normal")
.Font.Name = "Calibri"
.Font.Size = "10"
End With
End With
[/vba]

HTH,
David