如何以mmm格式格式化一个月？

Question

我正在尝试使用VBA格式化Excel中的日期,当前月份为mmm格式.不知怎的,我上个月而不是当月.我已经检查过,我的电脑月份是2月,但是我得到的是Jan.

这是我的代码:

Cells(1, 2) = Format(month(Date), "mmm")

Answer 1

只需直接格式化现有日期,即

Cells(1, 2) = Format(Date, "mmm")

Answer 2

你正在形成日期1/1/1900

让我解释:

• Date 值得 21/02/2012
• Month(Date) 值得 1
• Format 将这个月(日期)视为日期 1/1/1900
• 因此Format(month(Date), "mmm")将Jan作为月份返回1/1/1900

为了教你钓鱼,当你遇到这种问题时,你可以尝试找到每个陈述的价值:

• Debug.Print (Date)返回21/02/2012所以这部分是好的
• Debug.Print (Format(Month(Date), "mmm"))返回jan所以这不是显示单元格问题