This page shows how to apply cell values to the axis scale.

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

If you want to know what Excel is currently using for the scale
parameters, try something like this:

Sub ShowAxisMax()
Dim x As Double, y As Double, s As String
With ActiveChart
On Error Resume Next
' Error if not a value scale axis
x = .Axes(1).MaximumScale
If Err.Number = 0 Then
s = "X max = " & x & vbCrLf
End If
y = .Axes(2).MaximumScale
s = s & "Y max = " & y
MsgBox s
End With
End Sub

- Jon
-------
Jon Peltier, Microsoft Excel MVP
Peltier Technical Services
Tutorials and Custom Solutions
http://PeltierTech.com/
_______

Radixa wrote:

Hi all,

I want to get the max value for the Y and X axes on a plotArea, not the max
values for series on this chart.

Is it possible with VBA ?

TIA
Rad