Dates sous VBA

Bonjour à tous,

Je souhaite connaître votre avis sur un petit problème que je rencontre.

Je dispose dans une cellule d'une date du type (01012001), donc le 1er janvier 2001.

Existe t-il une fonction sous VBA qui renvoie directement la date associée sous le format jj/mm/aaaa ?

Cordialement

Bonjour

Code:

---

1 2 3 4 5 6 7 8 9

Private Sub transformation()   a = Sheets("liste").Range("h7") jour = Left(a, 2) mois = Mid(a, 3, 2) annee = Right(a, 4) Sheets("liste").Range("h8") = Format((jour & "/" & mois & "/" & annee), "dd mmmm yyyy")   End Sub

---

Doit y avoir plus simple, fin de journée difficile.

Bonjour,

De la lecture ici

Sinon tout dépend de ce que tu veux en retour, une date, une chaine de caractères formatée.... A priori c'est juste du formatage donc:

Code:

---

1 2 3

Dim strDate as String, strDate2 as String strDate = "01022012" strDate2 = Left(strDate, 2) & "/" & Mid(strDate, 3, 2) & "/" & Right(strDate, 4)

---

Merci, sa marche très bien :)