نمایش خودکار ردیف ها و ستون ها مخفی

ali.b

تاریخ عضویت: 2014/01/12
نوشته‌ها: 798

نمایش خودکار ردیف ها و ستون ها مخفی

2014/10/11, 13:51

کد:

Sub Unhide_All_Rows()
     On Error Resume Next
     'in case the sheet is protected
    ActiveSheet.Cells.EntireRow.Hidden = False
End Sub
Sub Unhide_All_Columns() 
    On Error Resume Next
     'in case the sheet is protected
    ActiveSheet.Cells.EntireColumn.Hidden = False

End Sub

Last edited by ali.b; 2014/10/11, 14:41.

[CENTER]
[/CENTER]

برچسب ها: و, نمایش, ها, مخفی, خودکار, ردیف, ستون