如何用VBA比较单元格日期值大小
2个回答
展开全部
日期可以直接使用,比如,A1的值为 2010-1-31 ,:
a=date ’将当前日期赋值给 a
if a>=range("a1").value then ……
a=date ’将当前日期赋值给 a
if a>=range("a1").value then ……
追问
可不可以写:a="2010-1-31"
追答
那是字符串,正规的写法是用#括起来,如:
a=#2010-1-31#
VBA会自动将写法改成:a = #1/31/2010# ,就是:#月/日/年#
不过,VBA也能识别字符串格式的日期,但要求先定义变量为date型,否则不能参与计算,如:
Public Sub sss()
Dim a As Date, b As Date, c
a = #1/30/2010#
b = "2010-1-31"
c = "2010-1-31"
MsgBox b - a '这句能正确计算
MsgBox c - a '这句出错
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询