ここから本文です

マクロコードのkeydownについて。 同シート内にあるテキストボックス1に値を入...

satooomさん

2019/8/3112:07:21

マクロコードのkeydownについて。

同シート内にあるテキストボックス1に値を入力しエンターキー実行後テキストボックス2に移動したいのですが上手くいきません。

Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, _
ByVal Shift As Integer)
If KeyCode <> 13 Then Exit Sub ← テキストボックス2へ移動のコード

ご教授お願いいたします。。

閲覧数:
16
回答数:
1

違反報告

ベストアンサーに選ばれた回答

プロフィール画像

カテゴリマスター

tai********さん

2019/8/3112:43:16

If KeyCode <> 13 Then Exit Sub
の逆をやればいい?

Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 13 Then ActiveSheet.TextBox2.Activate
End Sub

質問した人からのコメント

2019/8/31 15:13:05

おかげさまで解決にいたりました!
やっと次のステップにすすめます!
本当にありがとうございました。

あわせて知りたい

みんなで作る知恵袋 悩みや疑問、なんでも気軽にきいちゃおう!

Q&Aをキーワードで検索:

Yahoo! JAPANは、回答に記載された内容の信ぴょう性、正確性を保証しておりません。
お客様自身の責任と判断で、ご利用ください。
本文はここまでです このページの先頭へ

「追加する」ボタンを押してください。

閉じる

※知恵コレクションに追加された質問は選択されたID/ニックネームのMy知恵袋で確認できます。

不適切な投稿でないことを報告しました。

閉じる