Sunday, 30 December 2012

Unhide Rows and Columns


'Unhide All Rows on Worksheet
Sub Unhide_All_Rows()
    On Error Resume Next
    'in case the sheet is protected
    ActiveSheet.Cells.EntireRow.Hidden = False
End Sub

'Unhide All Columns on Worksheet
Sub Unhide_All_Columns()
    On Error Resume Next
    'in case the sheet is protected
    ActiveSheet.Cells.EntireColumn.Hidden = False
End Sub

No comments:

Post a Comment