Hi,

I faced this problem and found a solution but you need to use macro.

Sub AutoScaleYAxes()
Dim ValuesArray(), SeriesValues As Variant
Dim Ctr As Integer, TotCtr As Integer
With ActiveChart
For Each X In .SeriesCollection
SeriesValues = X.Values
ReDim Preserve ValuesArray(1 To TotCtr + UBound(SeriesValues))
For Ctr = 1 To UBound(SeriesValues)
ValuesArray(Ctr + TotCtr) = SeriesValues(Ctr)
Next
TotCtr = TotCtr + UBound(SeriesValues)
Next
.Axes(xlValue).MinimumScaleIsAuto = True
.Axes(xlValue).MaximumScaleIsAuto = True
.Axes(xlValue).MinimumScale = Application.Min(ValuesArray)
.Axes(xlValue).MaximumScale = Application.Max(ValuesArray)
End With
End Sub



Another way you can do is try this method by Jon Peltier
http://peltiertech.com/Excel/Charts/...nkToSheet.html

I have not tried his method but it should work fine as I have very good
experience using his other solutions to my charting problems.

"Doug" wrote:

When I have the verticle axis set to automatic on the Min & Max range it
usually shows a huge distance on the chart because it generally defaults to
0. If the data is 55-100, the chart will start at 0 at the bottom and the
55-100 will be toward the top scrunching the data. Seems like it should size
up the data to best fit everything when on the auto setting. I don't want to
use a fixed setting because if the data changes then I run into a similar
problem. Is there a way to either change the default settings so the charts
will automatically size themselves, or something else I can do to make this
work for me?
--
Thank you!