Excel VBA質問箱 IV

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

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


30202 / 76738 ←次へ | 前へ→

【51805】Re:コンボボックスで選択したのをシートに。
発言  Jaka  - 07/10/5(金) 11:11 -

引用なし
パスワード
   ▼gori さん:
>ユーザーフォームなのですが、コマンドボタンまでは勝手にエンターで移動します。
>コマンドボタンでエンター後textbox1に移動したんですが。。。
これ、逆に使いづらくないですか?
コマンドボタン上でENTキーを押すとクリックと同じ効果があるんですけど、
これがなくなると余計に使いづらいような気がしますし、使う側から見ると
「何これ?」って感じになりませんか?
私だったら、KeyDownを使って矢印キーで対応させますけど。

こんな感じに押されたキー番号を判定して、フォカーカスを持たせたいコントロールにファーカスを移動させる。

Private Sub CommandButton1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)

MsgBox KeyCode '←キー番号は、これで調べられます

KeyCode = 0 '←KeyCodeに対応したキーが押されたことを無効にする。
       'Entキーだったら、キーを押したこと自体を無効にしないと、
       'ボタンクリックイベントが発生するから、必須。(IF分等で分岐処理する)
End Sub

0 hits

【51785】コンボボックスで選択したのをシートに。 gori 07/10/4(木) 15:37 質問
【51787】Re:コンボボックスで選択したのをシートに。 Jaka 07/10/4(木) 16:15 発言
【51789】Re:コンボボックスで選択したのをシートに。 gori 07/10/4(木) 17:04 発言
【51790】Re:コンボボックスで選択したのをシートに。 Jaka 07/10/4(木) 17:39 発言
【51802】Re:コンボボックスで選択したのをシートに。 gori 07/10/5(金) 10:04 発言
【51805】Re:コンボボックスで選択したのをシートに。 Jaka 07/10/5(金) 11:11 発言
【51807】Re:コンボボックスで選択したのをシートに。 gori 07/10/5(金) 11:57 発言
【51810】Re:コンボボックスで選択したのをシートに。 Jaka 07/10/5(金) 13:14 発言
【51814】Re:コンボボックスで選択したのをシートに。 gori 07/10/5(金) 15:26 お礼

30202 / 76738 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free