Hi,

I am trying to set the chart axes values for the chart in my sheet. I am using the below but get a run time error 'Object doesn't support this property or method' on the line highlighted below:

Sub InputScaleAxes()
With ActiveSheet.Charts("Chart1").Axes(xlCategory, xlPrimary)
.MinimumScale = ActiveSheet.Range("O40").Value
.MaximumScale = ActiveSheet.Range("039").Value
.MajorUnit = ActiveSheet.Range("O38").Value
End With
With ActiveSheet.Charts("Chart1").Axes(xlValue, xlPrimary)
.MinimumScale = ActiveSheet.Range("P40").Value
.MaximumScale = ActiveSheet.Range("P39").Value
.MajorUnit = ActiveSheet.Range("P38").Value
End With
End Sub
Can anyone assist me with this problem?