View Single Post
  #2   Report Post  
Jon Peltier
 
Posts: n/a
Default

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/
_______

danz98 wrote:

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