UserAccess Object
Represents the user access for a protected range.
Using the UserAccess object
Use the Add method or the Item property of the UserAccessList collection to return a UserAccess object.
Once a UserAccess object is returned, you can determine if access is allowed for a particular range in an worksheet, using the AllowEdit property. The following example adds a range that can be edited on a protected worksheet and notifies the user the title of that range.
Sub UseAllowEditRanges()
Dim wksSheet As Worksheet
Set wksSheet = Application.ActiveSheet
' Add a range that can be edited on the protected worksheet.
wksSheet.Protection.AllowEditRanges.Add "Test", Range("A1")
' Notify the user the title of the range that can be edited.
MsgBox wksSheet.Protection.AllowEditRanges(1).Title
End Sub