Autres mettre un code de 4 chiffres pour ouvrir une macro

[bernard1721]

Bonjour,
je désire installer un code de 4 chiffres ((exemple) sur une macro existante.
Ex; Quand je clique sur le bouton qui déclenche la macro, on me demande d'entrer un code à 4 chiffre par exemple sur Excel 2007
Merci pour vos réponses

 

[Compte Supprimé 979]

Bonjour Bernard1721

Si ton bouton est lié à une macro que nous nommerons "Test", il suffit alors

' Code lancé par le bouton
Sub Test()
    If InPutBox("Merci de saisir le code à 4 chiffres") <> "1234" then
        Msgbox "Désolé, mauvais code = arrêt de la macro"
        Exit Sub
    endif
    ' Sinon on continue le code ICI
End Sub

A+

 

[bernard1721]

Bonjour Bernard1721

Si ton bouton est lié à une macro que nous nommerons "Test", il suffit alors

' Code lancé par le bouton
Sub Test()
    If InPutBox("Merci de saisir le code à 4 chiffres") <> "1234" then
        Msgbox "Désolé, mauvais code = arrêt de la macro"
        Exit Sub
    endif
    ' Sinon on continue le code ICI
End Sub

A+

Merci pour votre réponse ultra rapide
bonne journée

 

[bernard1721]

Merci pour votre réponse ultra rapide
bonne journée

 

[Compte Supprimé 979]

Mais de rien