Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/date/2.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
excelvba';s Date()函数正在运行_Excel_Date_Vba - Fatal编程技术网

excelvba';s Date()函数正在运行

excelvba';s Date()函数正在运行,excel,date,vba,Excel,Date,Vba,VBA在抱怨什么,但我不知道那是什么 我的代码: Sub datesnstuff() Const today = Now() Const yesterday = Date(Year(today),Month(today),Day(today) - 1) End Sub 它给出了以下错误: Compile error: Expected: ) 我想我很清楚我想要它做什么,但是Excel是一种痛苦。它甚至不允许我使用日期(2015,1,1) 任何帮助都将不胜感激。Date是一个

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

我的代码:

Sub datesnstuff()
    Const today = Now()
    Const yesterday = Date(Year(today),Month(today),Day(today) - 1)
End Sub
它给出了以下错误:

Compile error:

Expected: )
我想我很清楚我想要它做什么,但是Excel是一种痛苦。它甚至不允许我使用日期(2015,1,1)


任何帮助都将不胜感激。

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

您需要
DateSerial()

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

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

此外,不能使用
=
符号右侧的函数声明
常量。它必须是一个常量值。

所以我可以在电子表格中使用的函数DATE()在VBA函数中不存在?这个特定函数不存在(因为VBA中已经有一个函数具有相同的功能,尽管它的名称不同),但是许多其他工作表函数都在
应用程序下。WorksheetFunction
。还有一件事,VBA中是否有与NETWORKDAYS()等效的函数?此函数来自分析包。首先,您需要确保在Excel中启用了“Analysis pack-VBA”加载项,然后从Project-References中引用
atpvbaen
,然后才能使用该函数。