Question

我有将日期序列转换为英国格式的短日期的代码。

我正在通过C＃程序调用该模块，并且得到了美国格式的日期。

max - min + min = max

如何强制将格式设置为英国日期，或者如何检查日期格式是否为英国格式，如果不是，则将结果从美国转换为英国？

Answer 1

这是处理日期的一种方法（在此处ColA中）

Sub ImportAndFixDates()

    Dim wb As Excel.Workbook, c As Range, v, arr

    Set wb = Workbooks.Open("C:\Users\UserHere\Desktop\tmp.csv")

    With wb.Sheets(1)
        For Each c In .Range(.Range("A2"), .Cells(.Rows.Count, 1).End(xlUp)).Cells
            v = c.Text
            If v Like "#*/#*/#*" Then Then
                c.NumberFormat = "d/m/yyyy"
                arr = Split(v, "/")
                c.Value = Join(Array(arr(1), arr(0), arr(2)), "/")
            End If
        Next c
    End With

End Sub

强制将短日期转换为英国格式DD-MM-YYYY

1 个答案: