VBA Format 格式化

将日期格式化为字符串。


语法

Function Format(date, Format)

将日期对象date按格式Format进行格式化。


参数

Format中日期符号与时间符号如下。

日期符号

日期符号 范围
d 几号。1-31
dd 几号。01-31,不够两位补0。推荐使用。
w 星期几。1-7,从星期日 = 1 开始
ww 周份(年的第几周)。1-53。
m 月份。1-12
mm 月份。01-12,不够补0。推荐使用。
y 年份的第几天。1-366。
yy 两位数年份。00-99。
yyyy 三或四位数年份。100-9999。推荐使用。

时间符号

时间符号 范围
h 小时数。0-23。
hh 小时数,不够两位补0。00-23。推荐使用。
n 分钟数。0-59。
nn 分钟数,不够两位补0。00-59。推荐使用。
s 秒数。0-59
ss 秒数。不够两位补0。00-59,推荐使用。

示例

Sub sub5()

  Dim d1, d2 As Date

  d1 = Date
  Debug.Print Format(d1, "yyyy年mm月dd日")

  d2 = Now
  Debug.Print Format(d2, "yyyy年mm月dd日 h点nn分ss秒")
End Sub

输出内容:

2023 年06月15日
2023年06月15日 15点07分57秒