Kode til konvertering af dato

Lige en ting der er altså ikke noget dato format med punktum..

Dim strDato As String
  strDato = "01.01.2006"
  strDato = Replace(strDato, ".", " ")
  MsgBox FormatDateTime(strDato, vbLongDate)

Nu koder jeg selv i en anden variant af Basic, så jeg kan ikke give dig konkret hjælp, men umiddelbart kan det vel løses med en simpel replace funktion? Prøv f.eks. http://www.romankoch.ch/capslock/strfun.htm

Så kan du f.eks. starte med at erstatte, f.eks.:
.01. med " januar "
.02. med " februar "
.03. med " marts "
osv.

Dernæst kan du undersøge om det første tal er er et nul (hvis der f.eks. står 01 januar 2006) og så fjerne nullet hvis det står der.

Håber det hjælper lidt.

// Old-Faithful™

Tusinde tak

:-)

selv tak