Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Changer le format d'une date

1 réponse
Avatar
Isa
Bonjour,

Je dois exporter des données sous un format précis et entre autre des dates.
A l'origine, ma date = 15/08/2009 et je dois la transformer en dd-mmm-aaaa
00:00:00 soit 15-AUG-2009 00:00:00, le mois doit être en anglais.
Y a-t-il une formule qui le permette ?

D'avance merci pour vos réponses.

1 réponse

Avatar
Blaise Cacramp
Selon : Bonjour ou bonsoir

=format([ma date];"dd-mmm-yyyy hh:nn:ss")

Mais pour le mois en Anglais quelque soit les paramètres régionaux


Function DateAnglaise(MaDate As Date) As String
Dim sToto As String
sToto = Format(MaDate, "dd-mmm-yyyy hh:nn:ss")
sToto = Left(sToto, 3) _
& Choose(Month(MaDate), "JAN", "FEB", "MAR", "APR", "MAY",
"JUN", "JUL", "AUG", "SEP", "OCT", "NOV", "DEC") _
& Right(sToto, 14)
DateAnglaise = sToto
End Function

debug.? dateanglaise("15/8/9 15:35")
15-AUG-2009 15:35:00


Cdt, Blaise
---- ---- ----


"Isa" a écrit dans le message de news:

Bonjour,

Je dois exporter des données sous un format précis et entre autre des
dates.
A l'origine, ma date = 15/08/2009 et je dois la transformer en dd-mmm-aaaa
00:00:00 soit 15-AUG-2009 00:00:00, le mois doit être en anglais.
Y a-t-il une formule qui le permette ?

D'avance merci pour vos réponses.