日本語入力モードの設定

 

 

Sub test()
 

' 日本語入力モードの設定


    With Range("B3").Validation
        .Delete
        .Add Type:=xlValidateInputOnly
        .IMEMode = xlIMEModeOff  '日本語入力モードオフ (英語モード)
    End With

    With Range("B4").Validation
        .Delete
        .Add Type:=xlValidateInputOnly
        .IMEMode = xlIMEModeHiragana   '日本語入力モードひらがな
    End With

End Sub

 
実行結果

 

 

 

 

 

 

 

 

 

― ― ― ― ― ― ― ― ― ― → Excel VBA基礎入門もくじ へ戻る 

 

 

関連記事