[已解决]日期为何不相等

murphys1989

1.     Cells(3, 5) = Format(Date, "yyyy-m-d")
   
2.     MsgBox Cells(3, 5) = Format(Date, "yyyy-m-d")

复制代码

最佳答案

月排行榜 / 总排行榜

wanao2008

2016-9-26 21:57

Cells(3, 5) = Format(Date, "yyyy-m-d")是将日期赋值给单元格，
EXCEL自动将其转换为日期格式：#2016/9/26#
而 Format(Date, "yyyy-m-d") 只是将日期转换为字符串 "2016-9-29"
因为日期格式无法和字符串进行比对，所以可以将第二句改为：
MsgBox Cells(3, 5) = DateValue(Format(Date, "yyyy-m-d"))
即两个日期格式对比，
函数解释：DateValue(字符串) 字符串转换为日期

跳转到最佳答案楼层

wanao2008

Cells(3, 5) = Format(Date, "yyyy-m-d")是将日期赋值给单元格，
EXCEL自动将其转换为日期格式：#2016/9/26#
而 Format(Date, "yyyy-m-d") 只是将日期转换为字符串 "2016-9-29"
因为日期格式无法和字符串进行比对，所以可以将第二句改为：
MsgBox Cells(3, 5) = DateValue(Format(Date, "yyyy-m-d"))
即两个日期格式对比，
函数解释：DateValue(字符串) 字符串转换为日期