Protection Property

Returns a Protection object that represents the protection options of the worksheet.

expression   Required. An expression that returns a Worksheet object.

Example

This example protects the active worksheet and then determines if columns can be inserted on the protected worksheet, notifying the user of this status.

Sub CheckProtection()

    ActiveSheet.Protect

    ' Check the ability to insert columns on a protected sheet.
    ' Notify the user of this status.
    If ActiveSheet.Protection.AllowInsertingColumns = True Then
        MsgBox "The insertion of columns is allowed on this protected worksheet."
    Else
        MsgBox "The insertion of columns is not allowed on this protected worksheet."
    End If

End Sub