VBA日期解释DD-MM-YYYY

Question

我有一列以DD-MM-YYYY格式存储的日期。我正在使用VBA的cdate函数遍历它们，以将它们转换为值-但是，当月份中的日期不超过12天时，Cdate会将日期解释为MM-DD-YYYY。解决此问题最方便的方法是什么？

Answer 1

我将使用Sub ConvertDate() Dim datecell As Variant, i As Long With Workbooks("book1").Sheets(1) For i = 1 To .Cells(Rows.Count, 1).End(xlUp).Row datecell = Split(.Range("A" & i), "/") .Range("B" & i) = DateSerial(datecell(2), datecell(1), datecell(0)) Next i End With End Sub 函数。尝试以下操作：

IntStream

这假定您的工作簿称为“ Book1”，并且日期值在A列中。结果将被写入B列。