Gerer mots de passe

Résolu
bonjour
je voudrais changer mes mots de passe qui sont dans la feuille "P"
avec l'userform
le premier mot de passe est "toto"
j'arrive a l'initialiser mais pas a enregistrer en changeant 1,2 ou 3 valeurs si besoin
merci de votre aide
https://www.cjoint.com/?3ABaTupJl1x
a bientôt

1 réponse

  1. Bonjour,

    j'arrive a l'initialiser mais pas a enregistrer en changeant 1,2 ou 3 valeurs si besoin Pas tres clair!!!!!

    Pour changer infos password et noms:

    Private Sub CommandButton2_Click()
      flg_enr_ret = True
      With Sheets("P")
        '--- Transfert Formulaire dans P
        .Range("L" & papass & "").Value = TextBox2.Value
        .Range("M" & papass & "").Value = TextBox3.Value
      End With
      MsgBox "Mot de passe changé"
      Me.ComboBox1 = ""
      Me.TextBox3 = ""
      Me.TextBox2 = ""
      flg_enr_ret = False
    End Sub


    Bon courage
    1. bonjour
      j'arrive a l'initialiser mais pas a enregistrer en changeant 1,2 ou 3 valeurs si besoin Pas tres clair!!!!!
      je voulais pouvoir changer les 3 valeurs mais je pense pas possible
      ca marque erreur de compilation et me met en bleu "papass'
      et si je déclare "Dim papass"
      ça marque erreur d'exécution 1004 erreur définie par l'application ou par l'objet
      une idée
      merci
    2. bonjour
      autant pour moi Ca marche dans le fichier que j'ai déposé donc je dois l'adapter a l'original
      merci encore
      bon dimanche