Objet AllowEditRanges (Excel)
Collection de tous les objets AllowEditRange qui représentent les cellules qui peuvent être modifiées dans une feuille de calcul protégée.
Remarques
Utilisez la propriété AllowEditRanges de l’objet Protection pour renvoyer une collection AllowEditRanges .
Une fois qu’une collection AllowEditRanges a été retournée, vous pouvez utiliser la méthode Add pour ajouter une plage qui peut être modifiée dans une feuille de calcul protégée.
Exemple
Dans cet exemple, Microsoft Excel autorise les modifications de plage A1:A4 dans la feuille de calcul active, puis avertit l’utilisateur du titre et de l’adresse de la plage spécifiée.
Sub UseAllowEditRanges()
Dim wksOne As Worksheet
Dim wksPassword As String
Set wksOne = Application.ActiveSheet
' Unprotect worksheet.
wksOne.Unprotect
wksPassword = InputBox ("Enter password for the worksheet")
' Establish a range that can allow edits
' on the protected worksheet.
wksOne.Protection.AllowEditRanges.Add _
Title:="Classified", _
Range:=Range("A1:A4"), _
Password:=wksPassword
' 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
Méthodes
Propriétés
Voir aussi
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.