I would like a function that will unprotect and reprotect my Worksheet.
The function I have currently is as follows:
Public Function RunProtect(fun As Function, sheet As Worksheet) Dim protected As Boolean: protected = False If sheet.ProtectContents = True Then protected = True sheet.Unprotect End If 'Code to run fun If protected = True Then sheet.protect End If End Function
Is this possible or is there an easier way? I have to unprotect my sheets when trying to edit my tables in using VBA.
Protect once with
UserInterfaceOnly:=true, and you won’t need to unprotect each time. -GSerg