IMPUTBOX pour saisir une date

Bonjour,

Dans le fichier joint, j'utilise l' "imputbox" suivante, mais le problème c'est que la date s'inverse.

ex : quand je saisi 02/07, il s'inscrit en K1 le 07 février 2022 au lieu du 02 juillet....., je ne comprends pas!!!

Help me!

Cdlt

Galiax

nom = InputBox("Saisir la date de livraison au format XX/XX", "Date de livraison")
Range("K1").Value = nom
Range("B2").Select

Bonjour;

Sub saisi_date()

     nom = InputBox("Saisir la date de livraison au format XX/XX", "Date de livraison")
Range("K1").Value = CDate(nom)
    Range("B2").Select

End Sub

Cool, merci Xmenpl

@++