Excel VBA的Date()函数正在运行

时间:2015-06-11 19:37:39

标签: excel-vba date vba excel

VBA抱怨什么,但我不知道那是什么。

我的代码:

Sub datesnstuff()
    Const today = Now()
    Const yesterday = Date(Year(today),Month(today),Day(today) - 1)
End Sub

它给了我以下错误:

Compile error:

Expected: )

我认为很清楚我想要它做什么,但Excel很痛苦。它甚至不允许我使用Date(2015,1,1)

任何帮助都将不胜感激。

2 个答案:

答案 0 :(得分:1)

Date是一个属性,不接受参数。

您想要DateSerial()

答案 1 :(得分:1)

Date()函数不接受任何参数,并返回当前系统日期。尝试:

yesterday = DateAdd("d", -1, today)

此外,您无法Const符号的右侧声明一个带有函数的=。它必须是常数值。