上个月名称的 VBA 代码答案

【问题标题】：VBA Code for name of previous month上个月名称的 VBA 代码
【发布时间】：2017-04-27 15:40:59
【问题描述】：

我在我的电子邮件中添加了如下文本：

“请提供 MMMM 月底的数字” - 其中 MMMM 是上个月的名称。

所以今天是四月，MMMM 将显示三月。

我有以下代码：

Dim newDate: newDate = DateAdd("M", -1, Now)

但结果是 27/03/2017 16:37:58

我希望它显示三月。

有什么建议吗？

【问题讨论】：

【解决方案1】：

将返回格式化为"MMMM":

Dim newDate: newDate = Format(DateAdd("M", -1, Now), "MMMM")

【讨论】：

【解决方案2】：

如果设置为 True，月份名称会缩写，例如四月

newDate = MonthName(Month(DateAdd("m", -1, Date)), False)

【讨论】：

【解决方案3】：

这将确保月份在English 中，而与计算机上的区域设置无关。这对于在全球范围内发布 Excel VBA 工具的人会有所帮助。

previousmonth = WorksheetFunction.Text(DateAdd("m", -1, Date), "[$-409]mmmm")

对于缩写月份eg: Apr 使用

previousmonth = WorksheetFunction.Text(DateAdd("m", -1, Date), "[$-409]mmm")

【讨论】：