[ RESOLU par Lone-wolf ] : Changement de mot de passe InputBox

Hello Mada , joyeux Noël à toi et ta famille

Pas en le mettant directement dans le code. Il faut inserer une nouvelle feuille et inscrire le mot de passe. Dans le formulaire tu ajoute 2 textbox (Ancien mot de passe - Nouveau mot de passe) ; ensuite dans le boutton

Dim cel As Range

With Feuil2.Range("a2:a100")
Set cel = .Find(TextBox1, , xlValues, xlWhole)
If Not cel Is Nothing Then
cel.Offset(0, 0) = Format(Val(TextBox2), "0") Si Valeur numérique
End If
End With

Bonjour Lone-wolf
Merci beaucoup pour l'aide et pour votre code et vos conseils
C'est parfait
Cordialement
MADA

Bonsoir MADAGASCAR, Lone-wolf.


ℝOGER2327
#8434

Mercredi 25 Sable 144 (Nativité de l’Archéoptéryx - fête Suprême Tierce)
5 Nivôse An CCXXV, 9,9425h - chien
2016-W51-7T23:51:43Z

Bonjour Roger2327