VBA/Excel: how do I test if columns.hidden = true?

[larissalle]

I know how to test if activesheet.autofiltermode = true. Can I do something similar to test if there are any hidden columns in a worksheet? If true, I want to unhide them. If false, do nothing.

The following didn't work:
first select worksheet, then

If Selection.EntireColumn.Hidden = True then
Cells.Select
Selection.EntireColumn.Hidden = False
End If

 

[msather]

Here's a simple routine that should accomplish what you're asking.

Sub CheckCols()
For Each col In ActiveSheet.Columns
If col.Hidden = True Then col.Hidden = False
Next
End Sub

 

[Loomah]

Hi
Rather than test each column, if you want to make sure all columns are visible this line will do the trick

ActiveSheet.Columns.Hidden = False

This wil be slightly quicker but you probably won't notice the difference!

Hapy Friday
;-)

If a man says something and there are no women there to hear him, is he still wrong?

 

[larissalle]

Thanks for the tips. I tried both and both worked. I ended up using the second one, columns.hidden = false, after I saw that it took no longer to just unhide all rather than first test if there were any hidden before unhiding.
Thanks!