Klasse AllowEditRange - die Zellen die in einem geschützten Arbeitsblatt bearbeitet werden können (Excel VBA)

Die Klasse AllowEditRange stellt die Zellen dar, die in einem geschützten Arbeitsblatt bearbeitet werden können. Um eine AllowEditRange -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise


Dim aer as AllowEditRange
Set aer = ActiveSheet.Protection.AllowEditRanges(Index:=1)

For Each

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


Dim aer As AllowEditRange
For Each aer In ActiveSheet.Protection.AllowEditRanges
	
Next aer

ChangePassword

Ändert das Kennwort für einen Bereich, der in einem geschützten Arbeitsblatt bearbeitet werden kann.

ChangePassword (Password)

Password: Das neue Kennwort.


Dim strPassword As String: strPassword = 
ActiveSheet.Protection.AllowEditRanges(1).ChangePassword Password:=strPassword

Delete

Löscht das Objekt.


ActiveSheet.Protection.AllowEditRanges(1).Delete

Range


ActiveSheet.Protection.AllowEditRanges(1).Range =

Title

Gibt den Titel des Zellbereichs zurück, der auf einem geschützten Blatt bearbeitet werden kann, oder legt diesen Titel fest.


ActiveSheet.Protection.AllowEditRanges(1).Title =

Unprotect

Hebt den Schutz eines Blatts oder einer Arbeitsmappe auf.

Wenn Sie das Kennwort vergessen, können Sie den Schutz des Blatts oder der Arbeitsmappe nicht wieder aufheben.

Unprotect (Password)

Password: Ein Zeichenfolge, die das Kennwort zum Aufheben des Schutzes für den Zellbereich unter Berücksichtigung der Groß-/Kleinschreibung angibt.


ActiveSheet.Protection.AllowEditRanges(1).Unprotect

Users

Gibt ein User Access List -Objekt für den geschützten Bereich eines Arbeitsblatts zurück.


Dim ualUsers As UserAccessList
Set ualUsers = ActiveSheet.Protection.AllowEditRanges(1).Users