Thanks okaizawa. Your suggestion worked. I apologize for being slow getting back to you. The macro recorder doesn't ever use the suggested coding. I recorded several versions but none suggested the code. Again, thanks!

Danz98

"danz98" wrote in message news:gcSNe.2340$Hi.1814@trnddc04...
This has been posted to excel.charting.

I am trying to plot this formula: r = a + b Cos(KQ), on a radar chart. Everything works just fine except that when I change the values of the b variable, Excel will not plot the chart correctly. However, if I manually change the major gridlines, MimimumScale = 0, it plots correctly. The macro recorder sets minimum and maximum to auto (see below). I need to set minimum to 0 (zero). The subroutine stops at ..MinimumScaleIsAuto = True and MinimumScale = 0. The error message is “unable to set MinimumScale Property of Axis class.” Can someone tell me how to overcome this? I appreciate your help.



Thanks.







Private Sub Macro4()

'

' Macro4 Macro

' Macro recorded 8/20/2005 by David O. Antillon

'



'

ActiveSheet.ChartObjects("Chart 15").Activate

ActiveChart.ChartArea.Select

With Selection.Border.LineStyle = 0

End With



'#######

Selection.Interior.ColorIndex = xlAutomatic

'ActiveChart.Axes(xlValue).MajorGridlines.Select

'With ActiveChart.Axes(xlValue)

'.MinimumScaleIsAuto = True

'.MaximumScaleIsAuto = True

'End With



'#######



ActiveChart.Axes(xlValue).MajorGridlines.Select

With ActiveChart.Axes(xlValue)

.MinimumScale = 0

.MaximumScale = 3

.MinorUnit = 0.1

.MajorUnit = 0.5

.Crosses = xlAutomatic

.ReversePlotOrder = False

.ScaleType = xlLinear

.DisplayUnit = xlNone

End With



End Sub