Klasse UserAccess - den Benutzerzugriff für einen geschützten Bereich (Excel VBA)

Die Klasse UserAccess stellt den Benutzerzugriff für einen geschützten Bereich dar. Um eine UserAccess -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

Dim usrac as UserAccess
Set usrac = ActiveSheet.Protection.AllowEditRanges(1).Users(Index:=1)

For Each

Hier ist ein Beispiel für die Verarbeitung der UserAccess -Elemente in einer Sammlung

Dim usracUser As UserAccess
For Each usracUser In ActiveSheet.Protection.AllowEditRanges(1).Users
	
Next usracUser

AllowEdit

Gibt einen Boolean-Wert zurück, der angibt, ob Benutzer auf den angegebenen Bereich eines geschützten Arbeitsblatts zugreifen können, oder legt diesen Wert fest.

ActiveSheet.Protection.AllowEditRanges(1).Users(1).AllowEdit = True

Delete

Löscht das Objekt.

ActiveSheet.Protection.AllowEditRanges(1).Users(1).Delete

Name

Gibt einen String-Wert zurück, der den Namen des Objekts darstellt, oder legt diesen Wert fest.

Dim strName As String
strName = ActiveSheet.Protection.AllowEditRanges(1).Users(1).Name