Private Declare Function LoadKeyboardLayout Lib "user32" Alias "LoadKeyboardLayoutA" (ByVal pwszKLID As String, ByVal flags As Long) As Long
Const APP_NAME As String = "Microsoft Word - Document1"
dim set_lang as long
VBA.AppActivate (APP_NAME)
set_lang = LoadKeyboardLayout("00000409", 2)
Переключение раскладки клавы для стороннего приложения
Скажите, как можно переключить язак для другого (не того где создан макрос) приложения?
Делаю вот что:
Язык переключается только для Excel в котором и пишу макрос.
Как победить?
Делаю вот что:
Код:
Язык переключается только для Excel в котором и пишу макрос.
Как победить?