Run-time Error 91 Object Variable or With Block...

[jampphan]

I have upgrade to Excel 2016 and the VBA code we have been using for 20+ years is having issues. One piece of code that is giving me the Runtime Error 91 is the following. Any help to resolve would be appreciated.

Sub Chart2Update()
FormatChart2

ActiveSheet.Unprotect ("rm2000")
ChangeAuto:

ActiveChart.Axes(xlValue).Select --The debug brings me to this line as being the issue.
With ActiveChart.Axes(xlValue)
.MinimumScaleIsAuto = True
.MaximumScaleIsAuto = True
.MinorUnitIsAuto = True
.MajorUnitIsAuto = True
.Crosses = xlAutomatic
.ReversePlotOrder = False
.ScaleType = xlLinear
.DisplayUnit = xlNone
End With
ActiveSheet.Protect ("rm2000")
FormatChart1PC
End Sub

 

[JLGWhiz]

You don't need that line of code. The following With statement gets you where you want to go. Just comment that line out or delete it. But I don't know what the "ChangeAuto:' label is for before that line. I don't see anything inthe code that refers to it.

 

[jampphan]

Didn't work. It just moved to the next line of code as being the error.

 

[JLGWhiz]

Didn't work. It just moved to the next line of code as being the error.

It appears to not like the ActiveChart syntax.
Make sure your chart is Active. If the chart has a name then maybe change ActiveChart to Charts("chart2"), using the actual chart name in the parentheses, of course.