photosdematures.com

Excel VBA Now功能

现在是两个VBA中的日期和时间函数 用来获取当前系统日期和时间的方法，就像工作表函数中不包含任何参数一样，在VBA now函数中也不包含任何参数，该函数的返回输出为date。

VBA NOW函数类似于excel工作表函数中的函数。就像VBA中的DATE函数“现在”也没有要传递的参数一样，我们只需要传递带有封闭括号的函数，或者也不需要括号。通过在VBA中使用DATE函数，我们可以生成当前日期，以显示我们正在使用的系统。但是，我看到了这样的情况：我们还需要当前时间以及日期。在excel中，我们可以做很多事情，类似地，我们可以使用excel中称为NOW的简单函数来生成当前日期和时间。

VBA NOW的公式很简单。

现在 （）

VBA Excel中的NOW函数示例

看一下VBA中NOW函数的简单示例。请按照以下步骤来编写VBA代码，并且对NOW以及编写代码都有一定的了解。

步骤1： 通过提供宏名称来启动子过程。

代码：

 Sub Now_Example1（）结束Sub

第2步： 将该变量声明为“ Date”。之所以需要将变量声明为“日期”，是因为最终结果是“日期和时间”格式。

代码：

 Sub Now_Example1（）Dim k作为日期结束Sub 

第三步： 通过应用VBA NOW函数将值分配给变量“ k”。

代码：

 Sub Now_Example1（）昏暗k作为日期k =现在结束 

第4步： 现在，在VBA的消息框中显示已分配给变量“ k”的函数NOW的值。

代码：

 Sub Now_Example1（）昏暗k作为日期k =现在MsgBox k结束Sub 

好的，我们完成了。

使用F5键或手动运行代码，然后查看结果。

结果显示4/15/2019在5:03:35。

我的计算机日期格式为“ mm-dd-yyyy”。

我们还可以使用FORMAT函数更改日期格式。下面是更改日期格式的代码。

代码：

 Sub Now_Example1（）昏暗k作为日期k =现在MsgBox Format（k，“ DD-MMM-YYYY HH：MM：SS”）结束Sub 

运行代码，看看有什么不同。

现在我们有了正确的日期和时间格式。使用这种格式，任何人都可以理解日期和时间格式。

易挥发：

如您在第一个示例中看到的，我们得到的时间结果为5:03:35，在第二个示例中，我们得到的结果为17:19:02。因此，这表明NOW函数是每秒变化的易失函数。

VBA中计时器功能的替代方法

作为VBA TIMER的替代方法，我们可以使用“ VBA NOW”功能来计算宏完成任务所花费的总时间。

使用下面的代码来计算您的代码所花费的时间。

C0de：

 Sub TotalDuration（）昏暗k作为日期k =现在''''在此处输入代码'''MsgBox“宏完成任务所花费的总时间是：”＆_ Format（（Now-k），“ HH：MM ：SS“）结束子 

在绿色区域中复制并粘贴您的代码。

通过按F5键或按运行按钮来执行代码。一旦完成执行，我们将在消息框中获得宏完成任务消息所花费的时间。以下是相同的示例。

这样，我们可以在VBA中以多种方式使用NOW函数。

您可以在此处下载此Excel VBA Now功能模板– VBA Now功能模板