Bonjour,

Dans un UserForm, je demande la saisie d'une date au format jj/mm/aa dans une TextBox (txtDate). Dans ma macro, j'analyse différents éléments de cette date sans problème ... sauf lorsque je cherche à obtenir l'année au format "aaaa". Je n'y arrive pas
J'ai essayé avec
Code : Sélectionner tout - Visualiser dans une fenêtre à part
TestAnnee = Format(txtDate.Value, "yyyy")
(j'attribue une valeur à ma variable TestAnnee). Si la date saisie est 28/02/68, aucun problème, TestAnnee = 1968. Mais si j'essaye avec la date 29/02/69, la macro plante sur cette partie du code. Excel m'affiche une erreur d'exécution '13', avec comme info une incompatibilité de type.
Vous l'aurez compris, il s'agit d'un test par rapport aux années bissextiles.

Est-ce que quelqu'un peut m'aider ? Si besoin, je peux donner le code complet de l'analyse de la date saisie qui fait appel à une fonction pour déterminer si l'année est bissextile.

Merci d'avance
Bruno