Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
3053 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【64582】テキストボックス間をTabキーで ＭＡＸ 10/2/24(水) 12:31 質問[未読]
【64585】Re:テキストボックス間をTabキーで Jaka 10/2/24(水) 14:04 発言[未読]
【64587】ありがとうございました。⇒Re:テキストボ... ＭＡＸ 10/2/24(水) 14:54 お礼[未読]
【64582】テキストボックス間をTabキーで
質問  ＭＡＸ  - 10/2/24(水) 12:31 -
引用なし
パスワード
   ２つのテキストボックスを使っています。
次のテキストボックスに移るときに、Tabキーが使用出来ません。
VBAでTabキーが使えるようにならないものでしょうか？
ご教授よろしくお願い致します。
【64585】Re:テキストボックス間をTabキーで
発言  Jaka  - 10/2/24(水) 14:04 -
引用なし
パスワード
   ▼ＭＡＸ さん：
>２つのテキストボックスを使っています。
どのテキストボックスかわからないので適当にみつもって、

アクティブXコントロール（コントロールツールボックスの方）だったら、
これでできるけど、図形描画のテキストボックスだとできません。

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

Private Sub TextBox2_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = vbKeyTab Then
　 TextBox1.Activate
End If
End Sub
【64587】ありがとうございました。⇒Re:テキスト...
お礼  ＭＡＸ  - 10/2/24(水) 14:54 -
引用なし
パスワード
   ▼Jaka さん：

ありがとうございました。
出来ないことが判っただけでスッキリです。


>▼ＭＡＸ さん：
>>２つのテキストボックスを使っています。
>どのテキストボックスかわからないので適当にみつもって、
>
>アクティブXコントロール（コントロールツールボックスの方）だったら、
>これでできるけど、図形描画のテキストボックスだとできません。
>
>Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
>If KeyCode = vbKeyTab Then
>　 TextBox2.Activate
>End If
>End Sub
>
>Private Sub TextBox2_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
>If KeyCode = vbKeyTab Then
>　 TextBox1.Activate
>End If
>End Sub
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
3053 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free