Hide Columns VBA - refusing to hide random columns

[hmltnangel]

Hi all.

Bit of an odd one. The code below should hide columns as requested. But when I run the Macro, Column AA wont hide. I even tried to be smart and record a basic macro to do that column specifically and then add Call MacroX in the code, but even then it wont hide the columns. BUT if I run MacroX separately on its own, it will hide it. In addition it randomly hides AE:AG as well. There is nothing in any other code in the workbook that refers to these columns. There are no merged cells in the columns that I can see. Whats causing the odd behaviour?

Sub Reset()

ActiveSheet.Unprotect "S3"

    cells.Select
    Selection.EntireColumn.Hidden = False

    ActiveSheet.Range("C:C,P:P,R:R,T:T,X:X,AA:AA,AF:AF,AN:AN,AP:AP,AS:BB").EntireColumn.Hidden = True
   

ActiveSheet.Protect "S3"

End Sub

 

[Joe4]

Are you sure that you do not have any other VBA code interfering with this?
Is anything in column AA protected?
Any shapes or buttons in column AA?

Also, note that this:

    cells.Select
    Selection.EntireColumn.Hidden = False

can be simplified to this:

    cells.EntireColumn.Hidden = False

It typically is not necessary to select ranges in order to perform operations on them, and it actually makes you code faster to reduce/eliminate all the "Select" and "Activate" statements that you can.

 

[hmltnangel]

Oh dear. I truly should get the idiot of the day award. When I selected the macro to assign to the button.....

I have selected a different macro by accident.

Thanks for the tips on shortening things too - ive tidied that up.