Conversion de format d'une date sous VBA - Recherche aide
Bonjour à tous :D ,
Dans le cadre d'un projet, je cherche à convertir une date d'un format : 2 / 1 / 2018 vers un format concaténé tel que on aurait : 20180102
Autrement dit (Convertir dd/mm/yyyy vers yyymmdd)
J'ai donc rédigé un code simple :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
Sub Datetrait()
Dim MyDate As Date
Dim MyStr As String
MyDate = 2 / 1 / 2018
Annee = Format(MyDate, "yyyy")
mois = Format(MyDate, "MM")
jour = Format(MyDate, "dd")
MyStr = Annee & mois & jour
MsgBox (MyStr)
End Sub |
Le soucis étant que la MsgBox me renvoie bien une valeur concaténée mais qui n'a absolument rien à voir avec les chiffres de la date à priori (18991230)...
Je sais que dans Excel les dates correspondent à un nombre particulier et je me demande donc si l'erreur ne viendrais de la ligne 4, j'ai l'impression de mal renseigner la date à cet endroit ? Ou de mal déclarer mes variables ?
Je vous informe juste que VBA c'est du tout neuf pour moi, j'ai codé quelques trucs mais y'a encore du boulot à faire ^^"
Merci d'avance pour votre aide parce-que je sèche un peu là ^^
Bonne soirée,
Alex. 8-)
