Excel macro stops at MinimumScaleISAuto and MinimumScale = 0

[danz98]

This has been posted to excel.programming.

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

 

[Jon Peltier]

Just plotting static values, not calculations, I had no issue with your code.

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