タイトル : Re^3: エンターKeyでFocus移動 投稿日 : 2009/11/13(Fri) 09:52 投稿者 : 花ちゃん
> 早速、試させて頂きましたが、残念ながら、エンターKeyでは > TextBox1_KeyPressイベントが発生しませんでした。 失礼しました。VBA では動作が違うようですね。 (ヘルプの記載も間違っているようですね。) 下記のように、KeyCode = 0 を追加して Return キーを無効にして見て下さい。 Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, _ ByVal Shift As Integer) If KeyCode = vbKeyReturn Then KeyCode = 0 '追加 Call CommandButton1_Click End If End Sub ヘルプより抜粋 KeyPress イベントは、次のいずれかのキーを押すと発生します。 印刷可能キーボード文字 標準のアルファベット キーと Ctrl キーの組み合わせ 特殊文字キーと Ctrl キーの組み合わせ Enter キー BackSpace キー KeyPress イベントは、次のいずれかの条件では発生しません。 Tab キーを押したとき Enter キーを押したとき 方向キーを押したとき コントロール間でフォーカスの移動を引き起こすキーを押したとき |