| 
    
     |  | IROCさん、ichinoseさん 有り難う御座いました。ばっちりです。 
 ▼ichinose さん:
 >▼hisao さん、IROCさん、こんばんは。
 >
 >>お世話になります。
 >>inputboxに入力する際のIMEを半角カタカナ等に自動切り替え出来ないでしょうか?
 >入力規則を使用してみてはいかがでしょうか?
 >
 >例えば、セルA1に入力規則を設定、その際、日本語入力は、「半角カタカナ」に設定。
 >'=====================================================================
 >Sub Macro1()
 >  With Range("a1").Validation
 >    .Delete
 >    .Add xlValidateInputOnly
 >    .IMEMode = xlIMEModeKatakanaHalf
 >  End With
 >End Sub
 >VBAでなくても、事前に手動設定でもかまいません。
 >
 >設定後に
 >'=======================================================================
 >Sub test()
 >  Range("a1").Activate
 >  wk = Application.InputBox("please iput")
 >End Sub
 >
 >Excel2000では、これで半角カタカナになっています。
 
 
 |  |