Remarks

Use the property of the object to return an AllowEditRanges collection.

Once an AllowEditRanges collection has been returned, you can use the method to add a range that can be edited on a protected worksheet.

Example

In this example, Microsoft Excel allows edits to range "A1:A4" on the active worksheet and notifies the user of the title and address of the specified range.

Visual Basic for Applications 
Sub UseAllowEditRanges() Dim wksOne As Worksheet Dim wksPassword As String Set wksOne = Application.ActiveSheet ' Unprotect worksheet. wksOne.Unprotect wksPassword = InputBox ("Enter password for the worksheet") ' Establish a range that can allow edits ' on the protected worksheet. wksOne.Protection.AllowEditRanges.Add _ Title:="Classified", _ Range:=Range("A1:A4"), _ Password:=wksPassword ' Notify the user ' the title and address of the range. With wksOne.Protection.AllowEditRanges.Item(1) MsgBox "Title of range: " & .Title MsgBox "Address of range: " & .Range.Address End With End Sub

See also: