Objet AllowEditRanges (Excel)

  • Article

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.