AllowEditRanges.Add-Methode (Excel)

Artikel
04/07/2023

Fügt einen Bereich hinzu, der in einem geschützten Arbeitsblatt bearbeitet werden kann. Gibt ein AllowEditRange-Objekt zurück.

Syntax

Ausdruck. Hinzufügen (Titel, Bereich, Kennwort)

Ausdruck Eine Variable, die ein AllowEditRanges-Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
Title	Erforderlich	String	Der Titel des Bereichs.
Range	Erforderlich	Range	Range-Objekt . Der Bereich, der bearbeitet werden kann.
Password	Optional	Variant	Das Kennwort für den Bereich.

Rückgabewert

Ein AllowEditRange-Objekt , das den Bereich darstellt.

Beispiel

In diesem Beispiel werden Änderungen im Bereich A1:A4 des aktiven Arbeitsblatts ermöglicht, der Benutzer benachrichtigt, das Kennwort für diesen angegebenen Bereich geändert und der Benutzer wird dann über diese Änderung benachrichtigt.

Sub UseChangePassword() 
 
 Dim wksOne As Worksheet 
 
 Set wksOne = Application.ActiveSheet 
 
 ' Protect the worksheet. 
 wksOne.Protect 
 
 ' Establish a range that can allow edits 
 ' on the protected worksheet. 
 wksOne.Protection.AllowEditRanges.Add _ 
 Title:="Classified", _ 
 Range:=Range("A1:A4"), _ 
 Password:="secret" 
 
 MsgBox "Cells A1 to A4 can be edited on the protected worksheet." 
 
 ' Change the password. 
 wksOne.Protection.AllowEditRanges(1).ChangePassword _ 
 Password:="moresecret" 
 
 MsgBox "The password for these cells has been changed." 
 
End Sub

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.