Tarih Formatı

[bosweer]

Merhaba arkadaşlar,

Tarihleri farklı şekilde yazlmış bir liste var elimde.
gg.aa.yyyy ve aa.gg.yyyy formatında yazılmış karışık bir liste.
Hepsinin formatını gg.aa.yyyy formatına nasıl dönüştürebilirim.

İlginize teşekkürler

 

[Murat OSMA]

Sub Tarih_Formatı()
    Dim i As Integer
    For i = 2 To Range("A65536").End(3).Row
        Cells(i, 2) = Format(Cells(i, 1), "dd.mm.yyyy")
    Next i
    i = Empty
End Sub

 

[bosweer]

İlginize teşekkürler.