K
Karen53
Hi,
I've been trying to put this in my workbook but the userinterfaceonly is not
picking up. Is there something else I need to do?
Private Sub Workbook_Open()
Dim wkSheet As Worksheet
For Each wkSheet In Worksheets
wkSheet.Protect Password:="pw", _
userinterfaceonly:=True, _
AllowFormattingCells:=True, _
AllowFiltering:=True
Next wkSheet
End Sub
I've been trying to put this in my workbook but the userinterfaceonly is not
picking up. Is there something else I need to do?
Private Sub Workbook_Open()
Dim wkSheet As Worksheet
For Each wkSheet In Worksheets
wkSheet.Protect Password:="pw", _
userinterfaceonly:=True, _
AllowFormattingCells:=True, _
AllowFiltering:=True
Next wkSheet
End Sub