hello,
pls. help me to integrate this macro
i am trying to make a macro that will resize the Y-axis scale of a line
chart based on formulated cell values...
i got this error message
"Compile Error Sub or Function not defined"
highlighting the ; " .MinimumScale = Value("N1")"----
below is the basic macro taken from VB.
------
Sub tstmacro()
ActiveSheet.ChartObjects("Chart 1").Activate
ActiveChart.ChartArea.Select
ActiveChart.Axes(xlValue).Select
With ActiveChart.Axes(xlValue)
.MinimumScale = Value("N1")
.MaximumScale = Value("o1")
.MinorUnit = Value("r1")
.MajorUnit = Value("q1")
.Crosses = xlCustom
.CrossesAt = Value("N1")
.ReversePlotOrder = False
.ScaleType = xlLinear
.DisplayUnit = xlNone
End With
End Sub
-- ---------
thanks for any assistance
regards
*****
birds of the same feather flock together..
JE McGimpsey - 13 Feb 2007 20:54 GMT
Try changing
Value("N1")
to
Range("N1").Value
> hello,
>
[quoted text clipped - 23 lines]
> End With
> End Sub
driller - 13 Feb 2007 21:06 GMT
thanks Sir,
thats quick and you're dependable...
regards

Signature
*****
birds of the same feather flock together..
> Try changing
>
[quoted text clipped - 31 lines]
> > End With
> > End Sub