vba获取当前日期年月日

在 VBA 中获取当前日期的年、月、日，可以使用 VBA 内置函数 DatePart()，该函数可以获取日期的各个部分，例如年、月、日、小时、分钟等。

下面是获取当前日期年月日的示例代码：

Dim Year as Integer
Dim Month as Integer
Dim Day as Integer
Year = DatePart("yyyy", Date)
Month = DatePart("m", Date)
Day = DatePart("d", Date)
在这个示例代码中，我们先声明了三个变量，分别用于存储年、月、日的值。接着使用 DatePart 函数获取当前日期的年、月、日部分，将其分别赋值给 Year、Month 和 Day 变量。
需要注意的是，DatePart 函数的第一个参数是指定要获取日期的哪个部分，例如 "yyyy" 表示获取年份，"m" 表示获取月份，"d" 表示获取日期。第二个参数是要获取日期的变量名，这里我们使用了 VBA 内置的 Date 函数，它会返回当前日期的值。
当然，以上示例代码中的变量类型可以根据您的需要进行更改，例如您可以将 Year、Month 和 Day 声明为字符串类型，然后将获取到的值转换为字符串再使用。