Hide columns

[BRISBANEBOB]

I am trying to hide some columns dependent on the contents of row 1 of each column. I have entered a zero in a number of the columns in the appropriate first row but absolutely nothing happens when I hit the button, Any help on where I'm going wrong is much appreciated.

Please Login or Register  to view this content.

[jindon]

Nothing happened?
How about

Please Login or Register  to view this content.

[MarvinP]

Hi Bob,

I'd bet you have your code in the wrong place or by having it Private it doesn't work. See my example which seems to work like you want.
http://www.your-save-time-and-improv...ivate-sub.html

Hide Columns Code in Module.xlsm

[BRISBANEBOB]

Thanks for your responses. I tried both codes - neither worked. I then tried them in new sheets in the same workbook and they both worked. I went back to the data sheet, deleted the button, inserted a new one and assigned the code. It now hides all the columns to, and including, the last column with "0" (the number zero with no speech marks). And leaves the sheet unprotected...

The code I am using is:-

Please Login or Register  to view this content.

[BRISBANEBOB]

Cancel comment about not protected - fixed that.

[BRISBANEBOB]

Changed the last ActiveSheet.Unprotect to ActiveSheet.Protect and the sheet is not protected after the code has run. So this means the code is aborting before the end?

[jindon]

Besides, Cells(1, i)=0 would return True when cells is empty, so

Please Login or Register  to view this content.

[BRISBANEBOB]

I deleted the new button, went through and deleted all the code relating to it, entered it all again and it works! Looks like my error in assigning the wrong code but it all looked right. We live an learn. Thanks, rep added.