Excel vba从Date对象获取月份

Ans*_*Ans 5 excel vba excel-vba

我有一个充满日期值的单元格.然后我将它存储在一个变量中.

Sub dateTest()
    Dim min_date As Date
    min_date = ThisWorkbook.Worksheets("setup").Cells(22, 5).value

    MsgBox (min_date)
End Sub
Run Code Online (Sandbox Code Playgroud)

但是,我希望与该对象分开一个月和一天.怎么做?

Vit*_*ata 14

Month()并且Day()是您需要的功能:

MsgBox (Month(minDate))
MsgBox (Day(minDate))
Run Code Online (Sandbox Code Playgroud)

Microsoft月参考

微软日参考


另一种方法是使用Format函数:

MsgBox Format(minDate, "m")
MsgBox Format(minDate, "d")
Run Code Online (Sandbox Code Playgroud)