Excel VBAのコーディングを教えてください。 削除
Message#1 2015年1月20日(火)22時58分 From: kintone |
Excel VBAのコーディングを教えてください。 ユーザフォームを起動して、ほかのウィンドウ(たとえばIE)を アクティブにした状態で、aというキーを押したときに MSGBOXで"aが押されました” また1というキーを押した時に MSGBOXで”1が押されました”というプログラムを書きたいです。 ユーザフォームのモジュール内に以下のコードを 書いたのですがうまく動いてくれません。 よろしくお願いします。Excelは2003です Private Declare Function GetAsyncKeyState Lib "user32" (ByVal nVirtKey As Long) As Long Private Sub UserForm_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger) If GetAsyncKeyState(vbKeyA) <> 0 Then MsgBox "aが押下されました" End If End Sub |
上のメッセージを削除します。
よければパスワードを入力し、削除ボタンをクリックしてください。