Comment crée un code de sécurité au lancement d'une Macro

Résolu
Bonjour,

Alors je préviens tout de suite, je suis débutant en la matière et donc pour vous dire la fonction Macro ne viens pas de moi ^^

J'ai un tableau de noms, et un bouton qui fait office de mélange aléatoire. Suite a ce mélange j'ai construit tout un système de gagnant perdant (c'est pour du sport) automatiquement quand je mettrais mes points !

Sauf que si par inadvertance je reclique sur cette fonction, je suis mort car tout bouge. donc j'aimerais juste protéger ce bouton par un code pour plus de sécurité. faisable ? :)

Merci

Je met le fichier en PJ, c'est sur la feuille Enfant D

https://www.cjoint.com/?3CfpnXs9ciz

3 réponses

  1. Contributeur
    Bonjour,

    Une confirmation te suffit ?
    Si oui ajouter au début :
    If MsgBox("Confirmez-vous ?", vbQuestion + vbYesNo) = vbNo Then Exit Sub

    eric

    En essayant continuellement, on finit par réussir.
    Donc plus ça rate, plus on a de chances que ça marche.(les Shadoks)
    En plus du merci (si si, ça se fait !!!), penser à mettre en résolu. Merci
    0
    1. Bonjour,

      Merci de votre réponse, oui c'est ça que je recherche !

      Pour information, existe-t'il un code de sécurité ?

      Bonne journée
      0
      1. Bonjour si tu veux avoir un code à entrer pour lancer la macro

        Au début de la macro test, au lieu d'un message de confirmation tu mets ces 3 lignes
        code = "ABCD12" 'Remplacer ABCD12 entre les guillemets par le code de ton choix
        a = InputBox("Entrer code")
        If a <> code Then MsgBox ("Code erronné"): Exit Sub 


        Cdlmnt

        0
        1. Parfait !!

          Merci beaucoup

          Problème résolut !
          0