我希望能够使用 VBA 将 1-24 之间的任何数字显示为 2 位数字。显然，唯一有问题的是 1-9，我希望显示为 01、02、03 等。有没有办法执行此操作？

最佳答案

不能格式化整型变量，需要用字符串变量格式化。

您可以使用 Day 函数从日期中提取日期编号，然后使用 Format 将日期的日期部分转换为带有前导零的格式"00" 格式的函数在必要时添加前导零

Format(Day(myDate), "00")

myDate 是一个包含完整日期值的日期变量

以下宏可用作工作示例

Sub Macro1()
    Dim myDate As Date

    myDate = "2015-5-1"

    Dim dayPart  As String

    dayPart = Format(Day(myDate), "00")

    MsgBox dayPart
End Sub

https://stackoverflow.com/questions/28016643/