在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中，您始终可以设置数组和索引。