Debra,

Was wondering - John suggests a VBA fix for the active chart, and active
sheet (below). Could this code be modified to include the entire workbook?
Where would it be put? Would save a lot of work - I'm building a workbook
with about sixty charts...and this problem emurged when I had 12 worksheets
(24 charts) already created.

Altering the registry is not an option for me - I'm operating on a network
that does not allow such changes - it simply changes things back at the end
of the day.

Sub FixAllChartFonts()
Dim myCht As ChartObject
For Each myCht In ActiveSheet.ChartObjects
myCht.Chart.ChartArea.AutoScaleFont = False
Next
End Sub

"Debra Dalgleish" wrote:

Jon Peltier has information on this problem in his Charting FAQ article:


http://pubs.logicalexpressions.com/P...?ID=209#jon025

and at his web site (use this updated link instead of the one in his
article):

http://peltiertech.com/Excel/Charts/FixFonts.html


Phil Hageman wrote:
When trying to make a copy of a worksheet containing two charts, the
following message comes up: "No more font may be applied to this workbook."
On one of the charts, three axes, two Y and one X, are resized by Excel.
When trying to resize the axes fonts down again, the message appears again.
How do I get around this issue?

Thanks,
Phil


--
Debra Dalgleish
Excel FAQ, Tips & Book List
http://www.contextures.com/tiptech.html