如何获取当前日期和时间？

在本教程中，我们将学习使用 VBA 代码获取今天日期和时间的不同方法。

VBA 中的今天日期

在 VBA 中，有一个名为“ DATE ”的函数，您可以使用它来获取当前日期。当您使用此函数时，就像下面的示例一样，它会根据系统日期设置返回当前日期。

 Sub myMacro() Range("A1") = Date End Sub

当您运行此代码时，它会在单元格 A1 中输入当前日期，并使用 Excel 中的当前日期格式。

您还可以使用此函数在消息框中获取今天的日期，就像下面的代码一样。

 Sub myMacro() MsgBox Date End Sub

同样，有一个名为“ NOW ”的函数，您可以使用它来获取今天的日期和时间。正如您所看到的，我们在以下代码中使用它来获取单元格 A1 中的当前日期和时间。

 Sub myMacro() Range("A1") = Now End Sub

现在，如果您只想获取当前时间而不是日期和时间，则需要使用另一个函数“Format”（您可以在此处阅读有关此函数的更多信息）以及 now 函数。

在上面的代码中，我们使用 now 函数提供 format 函数的值，然后仅使用时间格式。

 Sub myMacro() Range("A1") = Format( Now , "HH:MM Am/Pm") End Sub

您还可以使用 format 函数更改当前日期的格式。在下面的代码中，我们使用了format函数并将格式指定为“YYYYMMDD”。

 Sub myMacro() Range ("A1"). Value = Format ( Date , "YYYY/MM/DD") End Sub

注意：在上面的代码中，我们使用 value 属性在单元格 A1 中输入日期。