VBA的Excel： 「YYYY」 字符串類型爲日期

Question

noob問題：

我怎麼變換 「YYYY」 字符串轉換成日期？

我的目標是做到以下幾點

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

Answer 1

「YYYY」 是一個字符串。如果你想獲得今天的日期爲一個字符串，你可以使用：

Format(Date, "yyyy") 

您可以使用CDate()將字符串轉換爲日期。

CDate("1/1/2013") 

如果你只是想在今年來比較，你可以做這樣的事情：

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