Table of contents
在这篇文章中，我将向你展示如何在以下内容中获取当前日期 VBA 你将学会显示当前日期，显示当前时间，以及以你所需的格式格式化日期和时间。
如何在VBA中获取当前日期（快速查看）
下载实践工作手册
下载这本练习册，在你阅读这篇文章时锻炼一下任务。
在VBA中获取当前日期.xlsm在VBA中获取当前日期的3种方法
让我们来探讨一下在一个文件中获得当前日期和时间的最佳方法。 宏观 在 VBA .
1.通过VBA的日期函数获取当前日期
首先，让我们看看如何获得当前的日期。 你可以在下列文件中获得当前日期 VBA 颇为全面地使用了 日期功能 的 VBA .
这一行代码将是。
Current_Date=Date() 显示当前日期的完整代码将是。
⧭ VBA代码。
Sub Get_Current_Date() Current_Date = Date MsgBox Current_Date End Sub 请注意。 这段代码创建了一个 宏观 叫做 获取当前日期 .
⧭ 输出。
运行这个宏程序 ，你会得到一个 信息箱 显示当前日期。 1月11日-22日 .
阅读更多：如何在Excel中插入当前日期
2.通过VBA的Now函数插入当前日期和时间
你可以使用 现在 功能的 VBA 来获取当前日期和当前时间。
这一行代码将是。
当前日期和时间 = Now() 因此，完整的 编码 来显示当前的日期和时间将是。
⧭ VBA代码。
Sub Get_Current_Date_and_Time() Current_Date_and_Time = Now() MsgBox Current_Date_and_Time End Sub 请注意。 这段代码创建了一个 宏观 叫做 获取当前日期和时间 .
⧭ 输出。
运行这个 宏观 ，你会得到一个 信息箱 显示当前的日期和时间。 11-Jan-22 11:23:20 AM .
阅读更多：Excel VBA中的现在和格式函数
类似读物
- VBA代码中的日期变量（宏的7种用途及示例）
- 如何使用Excel日期快捷键
- 在Excel中用公式计算到期日（7种方法）
- 如何使用日期的IF公式(6个简单的例子)
3.通过VBA的格式化功能对当前日期和时间进行格式化
到目前为止，我们已经学会了如何获得当前的日期和时间。 这一次，让我们看看如何以我们想要的格式显示日期和时间。
3.1 当前日期格式
首先，我们只对当前日期进行格式化。
我们将使用 格式 功能的 VBA 为此，该公司 句法 的函数是。
=Format(Date,Format) 因此，要显示当前日期的格式为 日/月/年 ，这一行的代码将是。
Current_Date = Format(Date, "dd/mm/yyyy")
而完整的 VBA代码 将是。
⧭ VBA代码。
Sub Format_Date_and_Time() Current_Date = Format(Date, "dd/mm/yyyy") MsgBox Current_Date End Sub 请注意。 这段代码创建了一个 宏观 叫做 日期和时间格式 .
⧭ 输出。
如果你运行这段代码，它将以你想要的格式显示当前日期。 日/月/年 , 11/01/2022 .
3.2 格式化当前日期和时间
你也可以使用 格式 函数将当前日期和当前时间一起格式化。
让我们以格式显示当前的日期和时间 日/月/年 hh:mm:ss 上午/下午 .
这一行代码将是。
当前日期和时间 = Format(Now), "dd/mm/yyyy hh:mm:ss am/pm") 而完整的 VBA代码 将是。
⧭ VBA代码。
Sub Format_Date_and_Time() Current_Date_and_Time = Format(Now), "dd/mm/yyyy hh:mm:ss am/pm") MsgBox Current_Date_and_Time End Sub 请注意。 这段代码创建了一个 宏观 叫做 日期和时间格式 .
⧭ 输出。
如果你运行这段代码，它将以你想要的格式显示当前日期和时间。 日/月/年 hh:mm:ss 上午/下午 , 11/01/2022 下午12:03:45 .
阅读更多：如何在Excel中用VBA格式化日期
摘要
- ǞǞǞ 现在 功能的 Visual Basic应用程序 返回当前的日期和时间。
- ǞǞǞ 日期 函数返回当前日期。
- ǞǞǞ 格式 功能以任何需要的格式显示日期和时间。
总结
使用这些方法，你可以获得并显示当前的日期和时间，在一个 宏观 您有任何问题吗？ 请随时向我们提问。
