У меня проблема с файлом, использующим макросы VBA, созданные в GER-версии Excel. Этот макрос проверяет элемент сводной таблицы на "Alle", но когда кто-то открывает файл в версии EN, элемент сводной таблицы, очевидно, не "Alle", а "All", поэтому макрос не работает. Та же проблема с "leer" - "blank" или "# N/A" - "#NV" и т.д. Кто-нибудь сталкивался с этой проблемой и есть ли разработанное решение? Можно ли заблокировать настройку языка рабочей книги, чтобы "Все" не изменялись на "Все"? Или любое другое рабочее решение?

1 ответ1

0
Dim loc As Long
loc = Application.LanguageSettings.LanguageID(msoLanguageIDUI)

If loc = 1033 Then
    'english code here
ElseIf loc = 1031 Then
    'german code here
End If

Вот ссылка MSDN для идентификаторов локали.

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .