How to make this macro applicable all the worksheets in my workbook?

Dear all,

Can someone help out with the below please?
This code is working perfectly in one of the workhseets (called Jan) but I want to make it applicable for all the 20+ sheets in the workbook.
What it does is that it allows me to Group & Ungroup columns/rows in protected worksheets.
I have Excel 2003.
Thanks a lot in advance!

Please Login or Register  to view this content.

__________________________________________________________

Hi Hristo,

Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code.

Posting code between [CODE]Please [url=https://www.excelforum.com/login.php]Login or Register [/url] to view this content.[/CODE] tags makes your code much easier to read and copy for testing, it also maintains VBA formatting.

Highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found at http://www.excelforum.com/forum-rule...rum-rules.html

Please Login or Register  to view this content.