Changer le format d'une date

Le
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.
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Blaise Cacramp
Le #20387641
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"
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.


Publicité
Poster une réponse
Anonyme