日期格式显示自定义日期无效的日期。当我使用“日期”代替“5月25日”时,它会显示昨天的日期。
function GetYD()
Dim dt, yesterday
dt = DateAdd("d", -1, "25th May")
yesterday = Right(Year(dt),2) & Right("0" & Month(dt),2) & Right("0" & Day(dt),2)
msgbox yesterday
GetYD = yesterday
end function
答案 0 :(得分:2)
请务必为其提供可以解析的字符串。如果可能的话,总是使用数字,你甚至没有指定一年。
格式yyyy-mm-dd
可能效果最好,因为它(对人类和计算机而言)完全没有模糊。所以尝试使用
DateAdd("d", -1, "2017-05-25")