Вводимый текст в ComBox печатался на английском.  
Есть ComBox 5 штук везде печатается на русском, а при вводе в 6 чтобы на английском.(чтобы не задействовать клавиатуры)

А вот и пример в виде файла:  
 
http://excelvba.ru/XL_Files/Sample__12-08-2009__19-10-19.zip  
 
 
Вот весь код формы:  
 
Private Sub ComboBox1_Enter()  
   ActivateKeyboardLayout kb_lay_ru, 0  
End Sub  
Private Sub ComboBox2_Enter()  
   ActivateKeyboardLayout kb_lay_ru, 0  
End Sub  
Private Sub ComboBox3_Enter()  
   ActivateKeyboardLayout kb_lay_ru, 0  
End Sub  
Private Sub ComboBox4_Enter()  
   ActivateKeyboardLayout kb_lay_ru, 0  
End Sub  
Private Sub ComboBox5_Enter()  
   ActivateKeyboardLayout kb_lay_ru, 0  
End Sub  
 
Private Sub ComboBox6_Enter()  
   ActivateKeyboardLayout kb_lay_en, 0  
End Sub  
 
 
 
А это - код модуля:  
 
Declare Function ActivateKeyboardLayout Lib "user32" (ByVal HKL As Long, ByVal flags As Long) As Long  
Public Const kb_lay_ru As Long = 68748313, kb_lay_en As Long = 67699721

Ещё возник вопрос.  
Макрос прописные и строчные буквы.

Вопрос такой же как и предыдущий только  
нужен Макрос при переходе в TexBox со строчных на прописные?