如何获取用户'；用VBA实现Excel中的s语言？

我需要通过VBA获取Excel中的用户语言，因为Excel不会自动翻译数据透视表，并且我正在使用

VBA

在数据透视中搜索

刚刚发现在德语中，轴心是这样的：

在英语中是这样的：

我可以考虑一个选项，在Excel中编写一个

=VLOOKUP（）

公式，检查单词是否为“VLOOKUP”或

=SVERWEIS（）

，并根据结果决定是德语还是英语

无论如何，这看起来太“丑陋”。有更好的主意吗？

请尝试：

Application.LanguageSettings.LanguageID(msoLanguageIDInstall)

或

---

如果它们以不同的方式返回…

另一个选项是检查属性。例如，使用

xlCountryCode

：

Application.International(xlCountryCode)

---

在使用2个EXCEL（英语和德语）进行测试后，证明有效的方法是：

Application.International（xlCountryCode）

为不同的Excel国家/地区版本返回以下内容：

• 美国-1
• 德国-49
• 法国-33
• 西班牙-34
• 俄罗斯-7
• 其他-

注意-以下情况不起作用且很危险：

---

• Application.LanguageSettings.LanguagePreferredForEditing（msoLanguageIDEnglishUS）

---

• Application.LanguageSettings.LanguageID（MSOLanguageId安装）

---

• Application.LanguageSettings.LanguageID（msoLanguageIDExeMode）

可能它不是以excel的语言显示的，而是以Windows的语言显示的，这可能与我自己的电脑不同：

---

也许吧？实际上还没有尝试过。可能

Application.LanguageSettings.LanguageID（MSOLanguageId安装）

@BigBen，@brax-

Application.LanguageSettings

返回438，答案是从2011年开始，检查网站不起作用（我真的不想从Excel中检查网站…），抱歉，这不起作用。看看我的家用电脑得到了什么，不幸的是，它有德语Excel和英语Windows-我知道是我在评论中说的，谁说它应该工作。。。但我还没有在另一台电脑上测试过。

Application.International(xlCountryCode)