conversion chaine en date

Bonjour tout le monde je souhaiterais convertir une chaine de caractère de la forme suivante :

Code:

---

1 2 3 4 5 6

A20080528.2330-2345.1.xml et 20080528041500Z

---

en chaine de la façon suivante:
20080528 23h45mn pour le 1er

et 20080528 04h15mn pour le second

j'ai essayé avec les methodes cdate et datevalue mais sa ne m'a rien donnée.
on m'a dit de cherché du coté de la fonction

Code:

---

mid

---

je suis en train de le faire actuellement mais je n'y arrive pas.
quelqu'un aurait-il une idée???

J'ai réussi a trouver la réponse
je vous la donne:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23

Sub DATE_test()       Dim date_xml As String, date_xml2, date_ok, date_ok2   date_xml = "A20080528.2330-2345.1.xml" date_xml2 = "20080528001500Z"       date_ok = Mid(date_xml, 2, 8) + " " + Mid(date_xml, 16, 2) + "h" + Mid(date_xml, 18, 2) + "mn"     MsgBox (date_ok)     date_ok2 = Mid(date_xml2, 1, 8) + " " + Mid(date_xml2, 9, 2) + "h" + Mid(date_xml2, 11, 2) + "mn"   MsgBox (date_ok2)   End Sub

---