Thx a lot man /bow



keepITcool Wrote:
Hi,
I'm not sure this is what you're after but:

following would use the (actual) axis' minimum
to set the crosspoint.

Sub foo()
With ActiveSheet.ChartObjects(1).Chart
With .Axes(xlValue)
.Crosses = xlAxisCrossesCustom
.CrossesAt = .MinimumScale
End With
End With
End Sub

--
keepITcool
| www.XLsupport.com | keepITcool chello nl | amsterdam


--
Ciccio_Drink
------------------------------------------------------------------------
Ciccio_Drink's Profile: http://www.excelforum.com/member.php...o&userid=31003
View this thread: http://www.excelforum.com/showthread...hreadid=507643