Bonjour à tous,

J'ai un drôle de truc avec le format date.
Je cherche à saisir la date dans un InputBox et à l'afficher dans une cellule.

Pour que le format soit valide dans l'InputBox j'utilise une mise en forme Format:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
Dim règlement as String
règlement = Application.InputBox("Date de règlement", "Saisie", Format(Date, "dd/mm/yyyy"))
La cellule recevant la valeur a un format Date: *14/03/2001
Code : Sélectionner tout - Visualiser dans une fenêtre à part
Range("B" & ligne) = règlement    'Date réglement
Si je saisis dans l'InputBox:
29/01/2010 l'affichage est correct

Si je saisis un jour <=12 dans l'InputBox:
11/02/2010 l'affichage inverse date et jour en: 02/11/2010

Késaco

PS: Que ce soit la méthode ou la fonction cela donne la même chose...