Excel VBA質問箱 IV

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

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


28722 / 76734 ←次へ | 前へ→

【53304】Re:ファンクションキーへのマクロ割り当て
お礼  PIKO  - 07/12/26(水) 16:37 -

引用なし
パスワード
   Jakaさんありがとうございます。

なぜか、UserFormにフォーカスが当たっておらず・・・
コントロール数がボタン含め6個でしたので、すべてにPrivate Sub オブジェクト名_KeyDownにて、できました。

Private Sub 登録_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
  test KeyCode
End Sub
Private Sub 閉じる_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
  test KeyCode
End Sub





Private Sub test(n As MSForms.ReturnInteger)
  
  Select Case n

    Case vbKeyF10

    Case vbKeyF12

  End Select

End Sub

ありがとうございました!
6 hits

【53297】ファンクションキーへのマクロ割り当て PIKO 07/12/26(水) 13:00 質問
【53298】Re:ファンクションキーへのマクロ割り当て Jaka 07/12/26(水) 13:27 発言
【53299】Re:ファンクションキーへのマクロ割り当て PIKO 07/12/26(水) 14:17 発言
【53301】Re:ファンクションキーへのマクロ割り当て Jaka 07/12/26(水) 15:23 発言
【53304】Re:ファンクションキーへのマクロ割り当て PIKO 07/12/26(水) 16:37 お礼

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