vba怎么获取日期的年月日

vba
1422
2023/11/16 22:35:31
栏目: 编程语言
开发者测试专用服务器限时活动,0元免费领,库存有限,领完即止! 点击查看>>

在VBA中可以使用YearMonthDay函数来获取日期的年份、月份和日期。

下面是一个示例代码,演示如何使用VBA获取日期的年月日:

Sub GetDateParts()
    Dim myDate As Date
    Dim myYear As Integer
    Dim myMonth As Integer
    Dim myDay As Integer
    
    ' 设置日期
    myDate = DateSerial(2021, 4, 15)
    
    ' 获取年份
    myYear = Year(myDate)
    MsgBox "年份:" & myYear
    
    ' 获取月份
    myMonth = Month(myDate)
    MsgBox "月份:" & myMonth
    
    ' 获取日期
    myDay = Day(myDate)
    MsgBox "日期:" & myDay
End Sub

运行上述代码,将输出以下结果:

  • 年份:2021
  • 月份:4
  • 日期:15

辰迅云「云服务器」,即开即用、新一代英特尔至强铂金CPU、三副本存储NVMe SSD云盘,价格低至29元/月。点击查看>>

推荐阅读: vba中怎么用msgbox设置字体颜色