Bonjour à tous.
Mon Userform contient des dates à renseigner, Je veux donc tester le format date saisi.
Pour cela, j'utilise :
If Frm_Date1 <> "" Then
While Not IsDate(Frm_Date1)
Frm_Date1 = InputBox("Format de date non valide. Veuillez saisir la date sous format JJ/MM/AAAA")
If...