VBA Excel：将“yyyy”stringinputdate

Noob问题：

如何将“yyyy”string转换为date？

我的目标是做到以下几点

If "yyyy" < VBA.Date then ... End If 

Answer 1

“yyyy”是一个string。 如果你想得到今天的date作为一个string，你可以使用：

 Format(Date, "yyyy") 

您可以使用CDate()将string转换为date。

 CDate("1/1/2013") 

如果你只是想比较一年，你可以做这样的事情：

 If CInt("2012") < Format(Date, "yyyy") Then Debug.Print True End If