Protection.AllowEditRanges-Eigenschaft (Excel)

Gibt ein AllowEditRanges-Objekt zurück.

Syntax

Ausdruck. AllowEditRanges

Ausdruck Eine Variable, die ein Protection-Objekt darstellt.

Beispiel

In diesem Beispiel ermöglicht Microsoft Excel Bearbeitungsvorgänge für den Bereich "A1:A4" im aktiven Arbeitsblatt. Anschließend wird der Benutzer über den Titel und die Adresse des angegebenen Bereichs benachrichtigt.

Sub UseAllowEditRanges() 
 
 Dim wksOne As Worksheet 
 Dim strPwd1 As String 
 
 Set wksOne = Application.ActiveSheet 
 
 strPwd1 = InputBox("Enter Password") 
 
 ' Unprotect worksheet. 
 wksOne.Unprotect 
 
 ' Establish a range that can allow edits 
 ' on the protected worksheet. 
 wksOne.Protection.AllowEditRanges.Add _ 
 Title:="Classified", _ 
 Range:=Range("A1:A4"), _ 
 Password:=strPwd1 
 
 ' Notify the user 
 ' the title and address of the range. 
 With wksOne.Protection.AllowEditRanges.Item(1) 
 MsgBox "Title of range: " & .Title 
 MsgBox "Address of range: " & .Range.Address 
 End With 
 
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.