我有一个 Excel 文件,它包含多张工作表的数据。在那一列中,时间戳为 21/6/12 10:33:07:AM。我的系统日期格式是“m/d/yyyy”
,同时将其转换为日期 21/06/2012。我能够得到日期,但它显示错误。06-12-2021 这应该是 21-06-2012。我正在使用下面的代码。
例如:26/6/12 11:15:07:AM 应该是 26/06/2012
21/6/12 10:33:07:AM 应该是 21/06/2012
Public Sub ConvtDate()
Dim ParseDateTime As Date
Application.ScreenUpdating = False
For Each datcol In ws_Raw2.Range("I2:I65536")
x = InStr(1, datcol, " ", vbTextCompare) - 1
If x > 0 Then
ParseDateTime = DateValue(Left(datcol, x))
datcol.Value = ParseDateTime
End If
Next
Application.ScreenUpdating = True
End Sub
请帮助如何获取日期。
提前致谢。