如何以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

至teach you fishing，当您遇到此类问题时，您可以尝试查找每个语句的值：

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