does this help?

bottom=yourvalue
top=yourvalue

ActiveChart.Axes(xlValue).Select
With ActiveChart.Axes(xlValue)
.MinimumScale = bottom
.MaximumScale = Top
.MinorUnitIsAuto = True
.MajorUnitIsAuto = True
' .MajorUnit = 500
.Crosses = xlAutomatic
.ReversePlotOrder = False
.ScaleType = xlLinear
.DisplayUnit = xlNone
End With
ActiveChart.Deselect

--
Don Guillett
SalesAid Software

"Paul" wrote in message
...
how can I retrieve the value of the max and min scaling in
the active chart?

I'd like to set variables equal to each?

Thanks

}:-)