Hi,

I am trying to create a code to define the minimum value of the Y-axi
based on the minimum value of the plotted series. Something wrong wit
the code. Perhaps anyone give me an idea how to do this!!!
Thanks and more power!!!

With ActiveChart.Axes(xlValue)
.Select
dblMin = .MinimumScale
End With
With ActiveChart.SeriesCollection(SeriesNo)
.Select
nminValue = min(.Values = "=Table1!R1C1:R10C10")
<------Perhaps somethig wrong with this line.
End with

If dblMin = 0 then
dblMin = nminValue
With ActiveChart.Axes(xlValue)
.select
.MinimumScale = dblMin
end with
end If


BR,
Bil

--
Billabon
-----------------------------------------------------------------------
Billabong's Profile: http://www.excelforum.com/member.php...fo&userid=1090
View this thread: http://www.excelforum.com/showthread.php?threadid=26980