Answer to Question #44102 in Other Programming & Computer Science for brian
now Im trying to format column 2 to automatically type in hebrew letters via language bar.
So in other words, I want column 2 to be able to write in hebrew without using a special 3rd party installed font. But rather just from the language bar thats already on a windows operating system.
Can it be done?
text is located in column B.
Then themacro to change input language in column B woul look like:
Private DeclareFunction ActivateKeyboardLayout Lib "user32" (ByVal myLanguage As
Long, Flag As Boolean) As Long 'function to changelanguage
Private SubWorksheet_SelectionChange(ByVal Target As Excel.Range)
If Not Intersect(Target,Range("B:B")) Is Nothing Then 'if userclicks column B
Call ActivateKeyboardLayout(1037, 0) 'Hebrew language code is 1037
Else'if userclicks any other column
Call ActivateKeyboardLayout(1033, 0) 'English language code is 1033
This code is intended torun on x64 version of the Windows OS. If you are using x32 version, then Lib "user32" shouldbe changed to Lib "user32.dll". You can find numerical ID`s for other languages bythis link: http://www.trigeminal.com/frmrpt2dap.asp
Need a fast expert's response?Submit order
and get a quick answer at the best price
for any assignment or question with DETAILED EXPLANATIONS!