Vba Format Date Anglais/Français
Résolu
Bonjour,
Je souhaite afficher une boite de saisie de date sous la forme "jj/mm/aaaa".
Lorsque l'utilisateur saisit la date sous la forme indiquée, cette date s'affiche dans le fichier sous la forme "mm/jj/aaaa"
-----------------------------------------------------------------------------------------
ActiveCell.FormulaR1C1 = InputBox("Saisir la Date sous la forme jj/mm/aaaa")
Selection.NumberFormat = "dd/mm/yyyy"
-----------------------------------------------------------------------------------------
Auriez vous une idée pour m'aider, je vous remercie d'avance.
Je souhaite afficher une boite de saisie de date sous la forme "jj/mm/aaaa".
Lorsque l'utilisateur saisit la date sous la forme indiquée, cette date s'affiche dans le fichier sous la forme "mm/jj/aaaa"
-----------------------------------------------------------------------------------------
ActiveCell.FormulaR1C1 = InputBox("Saisir la Date sous la forme jj/mm/aaaa")
Selection.NumberFormat = "dd/mm/yyyy"
-----------------------------------------------------------------------------------------
Auriez vous une idée pour m'aider, je vous remercie d'avance.
4 réponses
-
Bonjour,
Merci, c'est impeccable !
Plus simplement
Sub Date()
Dim Date As Date
Date= InputBox("Saisir la Date sous la forme jj/mm/aaaa")
ActiveCell.Value = Date
End Sub
Cordialement-
ModérateurPlus simplement, oui.
Mais je voulais juste, par mon code, te montrer qu'une InputBox renvoie un String :Dim strDate As String strDate = InputBox("Saisir la Date sous la forme jj/mm/aaaa")
Et que l'on peut convertir un String représentant une date, en Date :maDate = CDate(strDate)
Voilà.
A++
-
