'日期小于今天的
If IsDate(Worksheets("xxx").Range("A" & 0)) And CDate(Worksheets("xxx").Range("A" & 0)) < Date Then
...
End If
xxx Sheet中A0单元格为日期字符串且小于当前日期的。(完)
VBA 单元格日期与当前日期比较
来源:清泛原创 2018-03-27 15:24:57 人气: 我有话说( 0 人参与)
VBA 单元格日期与当前日期比较的代码:& 39;日期小于今天的If IsDate(Worksheets("xxx") Range("A" & 0)) And CDate(Worksheets("xxx
'日期小于今天的
If IsDate(Worksheets("xxx").Range("A" & 0)) And CDate(Worksheets("xxx").Range("A" & 0)) < Date Then
...
End If
xxx Sheet中A0单元格为日期字符串且小于当前日期的。
上一篇:VBA 获取某列最后一行非空行号
下一篇:VBA 行剪切到其他Sheet