Allow EditRange Object Example

The following routine creates an editable range on a protected worksheet, allowing a user to edit range J2:M16 with the successful entry of the password. In this case, the password is unlock:

Sub

AddAllowEditRange()

ActiveSheet.Protection.AllowEditRanges.Add _

Title:="EditableRange", _

Range:=Range("J2:M16"), _

Password:="unlock"

End

Sub

0 0

Post a comment