Excel 2016 error91 setting xlPrimary axis and xlSecondaryaxis to none

[bastian18]

Hello
I have a Chart in a Worksheet. In the Chart, I am trying to set xlPrimary axis and xlSecondaryaxis to none.
I opened the workbook in Excel and made the changes manually with the Recorder on.
This is the recorded macro code:

ActiveChart.Axes(xlValue, xlSecondary).Select
Selection.TickLabelPosition = xlNone

However, when I run the macro code VBA displays error91 in this line:

ActiveChart.Axes(xlValue, xlSecondary).Selec

VBA Run-time Error '91'
Object-variable or With block variable are not set


Then I tried this code:

Dim ws As WorksheetDim ch As Chart


Set ch = ActiveChart
	With ch.Axes(xlValue, xlSecondary).Select
		Selection.TickLabelPosition = xlNone
	End With

Again VBA displays the same error in this line:

 With ch.Axes(xlValue, xlSecondary).Select

Please, could anyone to help me to fix this error

Thanks in advance

 

[Joe4]

I don't work very much with Charts, but I think your chart may not be active.
See this: https://docs.microsoft.com/en-us/office/vba/api/excel.workbook.activechart

Here is an example of someone actually assigning a specific chart to a variable: https://www.mrexcel.com/forum/excel-questions/580577-set-statement-chart-object-vba.html#post2872193

See if doing that fixes it for you.

 

[bastian18]

Joe4
Your recommendation works fine. Now, this is my code

Dim wb As Workbook
Dim ws As Worksheet
Dim mychart As ChartObject
Set wb = ThisWorkbook
Set ws = wb.Sheets("SheetName")
Set mychart = ws.ChartObjects("Chart 1")
With mychart.Chart
.Axes(xlValue, xlPrimary).TickLabelPosition = xlNone
.Axes(xlValue, xlSecondary).TickLabelPosition = xlNone
End With

My headache is gone
Thank you very much indeed

 

[Joe4]

You are welcome.
Glad I was able to help!