Dato formatering

Du kunne indsætte en extra kolonne og indføre en formel der laver det om til rigtig dato: (din dato er i A1)
=DATO(MIDT(A1;1;4);MIDT(A1;5;2);MIDT(A1;7;2))

Du kan også markere dine datoer og køre denne lille makro:
Sub DatoTransform()
Dim cell As Range
Dim y As Integer, m As Integer, d As Integer
For Each cell In Selection
y = CInt(Mid(cell, 1, 4))
m = CInt(Mid(cell, 5, 2))
d = CInt(Mid(cell, 7, 2))
cell = DateSerial(y, m, d)
Next
End Sub

Mange tak
Det var lige hvad jeg skulle bruge.