Share via


Protection Property [Excel 2003 VBA Language Reference]

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

expression.Protection

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

Applies to | Worksheet Object