AllowEditRanges.Item-Eigenschaft (Excel)

Gibt ein einzelnes Objekt aus einer Auflistung zurück.

Syntax

expression.Item (Index)

Ausdruck Eine Variable, die ein AllowEditRanges-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
Index Erforderlich Variant Der Name oder die Indexnummer des Objekts.

Beispiel

In diesem Beispiel können Bearbeitungen im Bereich A1:A4 des aktiven Arbeitsblatts vorgenommen werden, der Benutzer benachrichtigt werden, das Kennwort für den angegebenen Bereich geändert wird und der Benutzer anschließend über diese Änderung benachrichtigt wird.

Sub UseChangePassword() 
 
 Dim wksOne As Worksheet 
 
 Set wksOne = Application.ActiveSheet 
 
 ' 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.Item(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.