VBA to hide columns if criteria is met

Hi all,

I need a macro that hides all 'unnecessary' columns on command. The row highlighted in green represents the condition that needs to be met, which is =0. So every column that does not have a "door" should be hidden when running the macro (keystroke). Though the 'same' columns (same cluster name) on the right need to be hidden as well...

Perhaps something like

Please Login or Register  to view this content.

Or try:

Please Login or Register  to view this content.

Perhaps something like

Please Login or Register  to view this content.

Originally Posted by PaulM100

Or try:

Please Login or Register  to view this content.

I like that solution, but it doesn't 100% work. The second range ("AE12:BG12") returns 0 sometimes even though there is a door in range ("A2:AD2")... It should only hide the ones without a door