Rétablir la valeur date de 04-Jun ?

Le
LANIMAL
Ma banque très moderne ! ! !
Me donne les dates sous la forme jour-mois comme ci-dessous :
04-Jun (sans l'année ! ben voyons !)

J'ai essayé CDate("04-Jun" & "-2010")
ou CDate("04-Jun" & "-" & Year(Date))
Mais ça passe pas !
Quel code faut-il utiliser pour transformer en Date reconnue par Excel ?

Ah ces dates ! !

Merci,
Michel
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
Patrick BASTARD
Le #22215881
Bonjour,"LANIMAL"

04-jun au format texte en A1
En B1 (format date), A1*1 me donne 04/06/2010
Et chez toi ?

--
Bien ,

Patrick




Ma banque... très moderne ! ! !
Me donne les dates sous la forme jour-mois comme ci-dessous :
04-Jun (sans l'année ! ... ben voyons !)

J'ai essayé CDate("04-Jun" & "-2010")
ou CDate("04-Jun" & "-" & Year(Date))
Mais ça passe pas !
Quel code faut-il utiliser pour transformer en Date reconnue par Excel ?

Ah... ces dates ! !

Merci,
Michel

Daniel.C
Le #22215861
Bonjour.
="04-jun"*1
Daniel

Ma banque... très moderne ! ! !
Me donne les dates sous la forme jour-mois comme ci-dessous :
04-Jun (sans l'année ! ... ben voyons !)

J'ai essayé CDate("04-Jun" & "-2010")
ou CDate("04-Jun" & "-" & Year(Date))
Mais ça passe pas !
Quel code faut-il utiliser pour transformer en Date reconnue par Excel ?

Ah... ces dates ! !

Merci,
Michel
michdenis
Le #22215921
Bonjour,

Voici une façon de faire en VBA :

Ce qui suit est valide, je crois, à partir de la version Excel 2002

'--------------------------------------
Sub test()
Dim MaDate As String

'Transformation de ta date de base : "04-Jun"
MaDate = "04-Jun" & "-" & Year(Date)

'Pour traduire un format date dans la langue du pays
'on doit utiliser le LCID en Hexadécimal

'Quelques exemples :
'France : 040c
'Canada français : 0c0c
'United States : 0409
'United Kingdom : 0809

MsgBox Application.WorksheetFunction.Text(MaDate, "[$-0c0c]dd-mmm-yyyy")

End Sub
'--------------------------------------



"LANIMAL" Op43#
Ma banque... très moderne ! ! !
Me donne les dates sous la forme jour-mois comme ci-dessous :
04-Jun (sans l'année ! ... ben voyons !)

J'ai essayé CDate("04-Jun" & "-2010")
ou CDate("04-Jun" & "-" & Year(Date))
Mais ça passe pas !
Quel code faut-il utiliser pour transformer en Date reconnue par Excel ?

Ah... ces dates ! !

Merci,
Michel
Publicité
Poster une réponse
Anonyme