Hide / Unhide Rows in protected sheets

[rbkinkead]

Good afternoon,
I have a macro I use to protect all sheets within a workbook and it works well.
I want to enable users to unhide / hide hidden rows in the protected sheet.
This is what is used:

Sub ProtectAll()
Application.ScreenUpdating = False
Dim wSheet As Worksheet
Dim Pwd As String
Pwd = "######"
ActiveWorkbook.Protect Structure:=False
For Each wSheet In Worksheets
wSheet.Protect Password:=Pwd, _
DrawingObjects:=False, Contents:=True, Scenarios:=True, _
AllowFormattingCells:=True, AllowFormattingColumns:=True, _
AllowFormattingRows:=True, AllowSorting:=True, AllowFiltering:=True
Next wSheet
End Sub

It still wont allow the users to unhide rows but will allow them to hide rows.
Any help will be greatly appreciated.

 

[rlv01]

There are a lot of options when it comes to protecting a worksheet. Before you code anything, you must find out if the worksheet can be protected in a way that allows what you want.

To find out, you should experiment by using various sheet protection options:

Once you find a combination that works THEN you can write VBA code to do it automatically.