Partager via

Méthode AllowEditRange.ChangePassword (Excel)

  • Article

Cette méthode change le mot de passe pour une plage qui peut être modifiée dans une feuille de calcul protégée.

Syntaxe

expression. ChangePassword (Mot de passe)

Expression Variable qui représente un objet AllowEditRange .

Parameters

Nom Requis/Facultatif Type de données Description
Password Requis String Nouveau mot de passe.

Exemple

Dans cet exemple, Microsoft Excel autorise les modifications de la plage A1:A4 dans la feuille de calcul active, avertit l’utilisateur, modifie le mot de passe pour cette plage spécifiée, puis informe l’utilisateur de la modification. Vous devez annuler la protection de la feuille de calcul avant d'exécuter ce code.

Sub UseChangePassword() 
 
 Dim wksOne As Worksheet 
 Dim strPassword As String 
 
 Set wksOne = Application.ActiveSheet 
 
 ' Establish a range that can allow edits 
 ' on the protected worksheet. 
 
 strPassword = InputBox("Please enter the password for the range") 
 wksOne.Protection.AllowEditRanges.Add _ 
 Title:="Classified", _ 
 Range:=Range("A1:A4"), _ 
 Password:=strPassword 
 
 strPassword = InputBox("Please enter the new password for the range") 
 
 ' Change the password. 
 wksOne.Protection.AllowEditRanges("Classified").ChangePassword _ 
 Password:="strPassword" 
 
 MsgBox "The password for these cells has been changed." 
 
End Sub

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.