Hide/Display selected columns

[jenteh]

Somebody please help me!

My boss wants me to create a macro to hide columns if there is a "X" on top of the column labels. The macro should be in toggle mode whereby the next pressing of the macro will unhide the hidden column.

There are more than 50 columns in my actual worksheet. The macro has to check column by column whether there is "X" marked on top and hide it if so.

The next pressing of the macro should then unhide all the hidden columns.

Anyone, please help??

Thank you so much!!!

Jennifer

[sweep]

You need two macros.

The first sub a(), hides the column if there's an X in Row 3

The second unhides all columns.

Please Login or Register  to view this content.

Please Login or Register  to view this content.

[royUK]

You can actually amend sweep's code to toggle the views

Please Login or Register  to view this content.

[sweep]

Hi Roy,

How does that work?

Dave

[royUK]

Hi Sweep

The code simply reverses the Visible staus of the colmns

Please Login or Register  to view this content.

[sweep]

Roy,

So this:

Please Login or Register  to view this content.

Is saying "if it's False make it True" and "if it's True, make it False"?

[royUK]

Roy,

So this:

Please Login or Register  to view this content.

Is saying "if it's False make it True" and "if it's True, make it False"?

That's right

I also use Option Compare text to make it case insensitive

[jenteh]

Thank you Sweep! Thank you RoyUK! You guys are great!!

There is something else I forgot to say. The "X" is not in row 3 only. It can be on any rows of the worksheet.

Let's say when I place my cursor on row 12, I want to detect "X" on row 12. And if I place the cursor on row 30, I want to detect "X" on row 30, etc etc.

So, the macro should detect the cursor position.

Look forward to great help from you guys again.

Million thanks!!!!
Jennifer

[jenteh]

One more thing, how do I put a stopper? Let's say if I want to stop checking until column AZ?

Thanks
Jennifer

[royUK]

This will check the activecell's row to Column AZ

Please Login or Register  to view this content.

[jenteh]

It works perfectly!

Thank you so much, RoyUK! I know I can depend on you guys!

Jennifer

[royUK]

Your post does not comply with Rule 9 of our Forum RULES. If you solve a problem yourself before anyone else has responded, please take a moment to describe your solution, chances are some other member will benefit. And please never edit a thread in which someone else has responded.

How to mark a thread Solved
Go to the first post
Click edit
Click Go Advanced
Just below the word Title you will see a dropdown with the word No prefix.
Change to Solved
Click Save

Don't just depend on us, study the code you are given & learn how it works so that you can help yourself

[jenteh]

Thanks royUK, I will.

Jennifer