Bonjour,

ce code ci dessous permet de contrôler si la cellule est bien au format date "m/d/yyy", mais je remarque qu'il ne contrôle pas le contenu de la cellule date.
Exemple le fait d'écrire 1204/2009 au lieu 12/04/2009, c'est pareil pour lui, alors que ça devrait être faux.

Comment faire pour qu'il vérifie que le contenu est une vrai date ??

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
 
If x.NumberFormat <> "m/d/yyyy" Then Sheets(CONTROLE).Cells(8, 256).End(xlToLeft).Offset(0, 1) = x.Address(REF_ABS, REF_ABS)
Merci d'avance
Codialement