Protection Macro avec Date de validité

Salut,

J'ai une macro qui fonctionne bien, qui s'exécute en cliquant sur une forme dans un tableau.

Je voudrais mettre une date de validité dans la macro afin qu'après cette date la liaison bouton macro ne s'exécute plus.

Et tout ça transparent pour l’utilisateur du fichier.

Pour qu'elle re fonctionne à nouveau il faudrait que je change la date de validité dans la macro.

Quel code utiliser et ou le mettre ?

@+ Arnaud

Bonjour,

En tête de macro :

Code:

---

If Date > #12/31/2013# Then End Sub

---

Le projet étant protégé par mot de passe. (ca vaut ce que vaut la protection du projet par mot de passe).

Salut,

Merci, j'ai une erreur,

Erreur de comppilation erreur de syntaxe :

Code:

---

If Date > #1/31/2013# Then End Sub

---

Code:

---

If cdate( format(now,"dd/mm/yyyy")) > cdate("01/31/2013") Then exit sub

---

Salut,

Merci parfait, y a-t-il moyen dans ce code de mettre la date en JJ/MM/AAAA plutot qu'en MM/JJ/AAAA ?

@+ Arnaud

En ce qui me concerne, j'ai mis la date au 31/12/2013. C'est VBA qui convertit automatiquement. Tu n'as pas à introduire de format pour une comparaison de dates, une date, c'est un nombre.

Salut,

Ok merci a "Daniel.C" et a "rdurupt"

@+ Arnaud