Re : Format date calendar
Allô!
La problématique, que tu as, est celle du conflit de format d'affichage de la date entre le format de Windows (Panneau de configuration > Options régionales et linguistique > bouton Personnaliser > onglet Date) et le format utilisé dans Excel.
Le mieux est de le contrôler par le code, surtout si ton chiffrier est susceptible d'être utilisé sur plusieurs ordinateurs où chacun n'a peut-être pas le même format de date Windows.
MJ13 suggère : "CDATE"
L'aide de Excel 2003 suggère : MyStr = Format(MyDate, "jjjj j mmm yyyy")
Dans un projet où un chiffrier devait être utilisé sur plusieurs ordinateurs configuré différemment au niveau du format de la date, j'ai utilisé ce code :
LeFormatDate = Application.International(xlDateOrder)
''''''''''xlDateOrder Long Ordre des éléments de la date :
'''''''''' 0 = mois-jour-année
'''''''''' 1 = jour-mois-année
'''''''''' 2 = année-mois-jour
Select Case LeFormatDate
Case 0
DDateFormat = "mm/dd/yyyy"
Case 1
DDateFormat = "dd/mm/yyyy"
Case 2
DDateFormat = "yyyy/mm/dd"
Case Else
DDateFormat = "yyyy/mm/dd"
End Select
.......................... snip ......................
DateDebut = Format(Worksheets(Address3).Cells(LaLigne, 2), DDateFormat)
.