Unhide columns and rows

[Rod]

Hi all,
could anybody help me to find whether any of the columns or rows are hide or
not?
If so, is there any way to unhide those (through macro)

Thanks in advance.

 

[Dave Peterson]

Do you really have to check first?

Maybe just showing the rows/columns would be enough:

Option Explicit
Sub testme()
With Worksheets("Somesheetnamehere").UsedRange
.Rows.Hidden = False
.Columns.Hidden = False
End With
End Sub

 

[Luke M]

To test:
RowStatus = Range("2:2").EntireRow.Hidden
ColumnStatus = Range("A:A").EntireColumn.Hidden

To unhide:
Range(1:65536).EntireRow.Hidden = False
Range("A:IV").EntireColumn.Hidden = False