在 VBA 中强制使用英文 MonthName

Question

我的系统配置设置为希伯来语。

我希望这个函数返回一个英文字符串：

MonthName(month(ActiveSheet.Range("i9").Value)))

但它返回希伯来月份名称。

我试图在 excel 格式菜单中应用对我有用的东西，但它似乎在 Vba 中不起作用。 我尝试的是添加另一个参数：

MonthName(month(ActiveSheet.Range("i9").Value)),"b1mmmm")

没有运气......

我将不胜感激。

Answer 1

如果我是你，我会避免与语言环境设置作斗争，因为你所做的任何事情最终都可能无法移植。

一种方法，就它是基于电子表格的解决方案而言非常好，是使用

=CHOOSE(,"January","February", "March", "April", ..., "December")

第一个参数指向 1 到 12 之间的数字。

在VBA 中，您始终可以设置一个数组并为其编制索引。