| 
    
     |  | こんにちは 
 確認させてください
 
 >UserForm1のTextBox1のIMEModeを半角カナにして
 これはTextBox1のプロパティでIMEModeを半角カナに設定したという事ですか?
 
 
 >1.シートのIMEModeは「直接入力」(IMEModeー0)の状態でUserForm1を開く
 >      ↓
 >2.UserForm1のTextBox1を編集後、UserForm1を閉じ、IMEModeを元に戻す
 >      ↓
 >3.シートで[半角/全角]ボタンを押して入力モードを変えると、「半角カナ」になってしまう
 >
 >というもので、シートでは[半角/全角]ボタンを押したとき、「ひらがな」入力モードに
 >したいのですが、やり方はないでしょうか?
 >よろしくお願いします。
 
 フォームを開く前のモードが何であってもフォームを閉じた後、
 [半角/全角]ボタンを押したとき、「ひらがな」入力モードにしたいということでしょうか?
 
 >
 >
 >下記の様にテストしましたが、上手くいきませんでした。
 >―――――――――――――――――――――――――――――――――――――
 >
 >'ユーザーフォーム**********************************************************
 >
 >Private Sub UserForm_Initialize()
 >  imem = IMEMode
 >End Sub
 >
 >Private Sub CommandButton1_Click()
 >  IMEMode = 4
 >  IMEMode = imem
 >  UserForm1.Hide
 >End Sub
 >
 >
 >'標準モジュール**********************************************************
 >
 >Public imem As Integer
 >
 >Sub test()
 >  UserForm1.Show
 >  Unload UserForm1
 >  IMEMode = 4
 >  IMEMode = imem
 >End Sub
 >
 >
 >―――――――――――――――――――――――――――――――――――――
 
 IMEMode は単独で使えるものではなく、
 
 テキストボックスのプロパティ
 セルの入力規則
 
 を設定する為のものはずです。
 
 上記の場合、IMEMode は宣言されていない、ただの変数扱いになっているんだと思います
 
 |  |