Bonjour,
@tdemsi
ComboBox1.Value = CDate(ComboBox1.Text)
La fonction CDate est utilisée pour convertir une chaîne de caractères en Date.
Mais au final, le résultat contenu par la ComboBox sera une chaine de caractères.
Ta formule permet donc d’obtenir une notation texte standardisée de la date.
01/12 ou 01-déc ou 01-12-12 ou 41244 seront traduits 01/12/2012.
Par contre, cela sous-entend que l’expression texte initiale peut être interprétée comme une date.
Dans le cas contraire, tu as une incompatibilité de type.
@bifconsult
En revanche, j'ai dû ajouter un +1 car sinon, 1 me renvoie 31/12/1899, 2 me renvoie 1/1/1900...
Voici une explication tirée du document suivant :
http://didier-gonard.developpez.com/...l-et-vba/#LIII
En VBA, le calendrier débute au 31 décembre 1899 (numéro de série 1).
La date nulle (numéro de série 1) correspond bien au 30 décembre 1899 mais, VBA ne sait pas l'afficher (il retourne 00:00:00).
Cordialement.
Partager