Convertir un texte en date

Bonjour,

J'ai pas mal cherché mais je n'ai pas trouvé tout seul de réponse à mon problème.

J'ai une variable texte contenant la valeur "03FEB2019" (par exemple) et représentant donc une date. Je souhaite convertir cette variable en date, et en utilisant/forcant la localisation "anglaise" (mon pc et mon excel sont en français, je ne veux pas les modifier).

Savez vous comment faire?

Merci!

Bonjour

Via une fonction personnelle

Code:

---

1 2 3 4 5 6 7

Function Text2Date(ByVal T As String) As Long Dim Months   Months = Array("Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct", "Nov", "Dec") T = Left(T, 2) & "/" & WorksheetFunction.Match(Mid(T, 3, 3), Months, 0) & "/" & Right(T, 4) Text2Date = DateValue(T) End Function

---

You are a god ! Merci ca marche parfaitement !