Hide headings in all worksheets

[JasonBing]

No doubt this has been covered before

is there a VBA to hide the headings in all worksheets

Thanks everyone

Regards

Jason Bing

 

[Fluff]

How about

Sub JasonBing()
   Sheets.Select
   ActiveWindow.DisplayHeadings = False
End Sub

 

[JasonBing]

This works great in the test book, thank you

However the sheets are all protected in the master database

What do I have to add to the code to unprotect the sheets then protect after

Thanks

Jason Bing

 

[Fluff]

There shouldn't be any need to unprotect the sheets

 

[JasonBing]

Thanks for the reply. I am getting a Run-Time error 1004

Unprotected method of worksheet class failed. this is in another unrelated macro in a different module. It is appearing in the

ActiveSheet.unprotect ""

I have disabled all parts of the sub and it is the sheets.select that is causing the error

If I manually select all the sheet tabs and hide headings. it works fine



Thanks for the help

Jason Bing

 

[Fluff]

You don't need to unprotect sheets in order to hide the headings, so just get rid of that line.

 

[JasonBing]

I don’t have this line in that macro. I appears to be all the other macros with this line in it. Something about some of the other macros with

Activesheets.unprotect “” in them.

I can select all the sheets manually just fine, but when I do it via vba, even sheets.select in its own macro, I get the error, in random codes containing

Activesheets.unprotect “”
Or
Activesheets.protect “”

This function is not critical just handy but if you have Any ideas I’m keen to learn. Is this a topic for a new thread?

Regards

Jason Bing

 

[Fluff]

Does the code I suggested do what you need?

 

[JasonBing]

Completely. Yes

Thank you

Jason

 

[Fluff]

You're welcome & thanks for the feedback