Jethro,
Can you let us know exactly what you mean by font scaling?
If you're trying to shut off the primary Y-axis scaling, you could use a
macro like this:
Sub ShutOffScaling()
Dim Sht As Worksheet
Dim Cht As ChartObject
For Each Sht In ActiveWorkbook.Sheets
For Each Cht In Sht.ChartObjects
With Cht.Chart.Axes(xlValue)
.MinimumScaleIsAuto = False
.MaximumScaleIsAuto = False
.MinorUnitIsAuto = False
.MajorUnitIsAuto = False
End With
Next Cht
Next Sht
End Sub