Worksheet protection

[j844929]

Hi,

Could someone tell me if there is a one-line piece of vb code that when used once, will protect a worksheet, and when activated again, will unprotect a worksheet...

A similar one I used for displaying workbook tabs is below:

ActiveWindow.DisplayWorkbookTabs = Not (ActiveWindow.DisplayWorkbookTabs)

I just can't seem to get one working for sheet protection. Hope someon can help.

Tim

 

[Juan Pablo González]

You could use something like

If ActiveSheet.ProtectContents Then
    ActiveSheet.Unprotect
Else
    ActiveSheet.Protect
End If

 

[j844929]

Lovely. Worked a treat, thanks!