不同的日期格式？

Question

为什么不excel让我更改我的一个列中的日期格式？基本上，我在Excel工作表的两列上有一个日期格式。列“D”9/2/2013 m / d / yyyy和列“E”17/9/2013 d / m / yyyy。问题是我能够将“D”列中的格式更改为任何日期格式，但不能在“E”列中这样做。

发生了什么事？

Answer 1

仅选择需要修复并运行的单元格：

Sub FixDates()
    Dim D As Date
    Dim r As Range
    For Each r In Selection
        s = r.Text
        ary = Split(s, "/")
        D = DateSerial(ary(2), ary(1), ary(0))
        r.Value = D
        r.NumberFormat = "mm/dd/yyyy"
    Next r
End Sub