Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
11166 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【17731】キーを押したらループを抜ける方法 さおり 04/9/6(月) 20:43 質問[未読]
【17733】Re:キーを押したらループを抜ける方法 角田 04/9/6(月) 21:27 回答[未読]
【17735】Re:キーを押したらループを抜ける方法 さおり 04/9/6(月) 22:02 質問[未読]
【17736】Re:キーを押したらループを抜ける方法 禰宜 04/9/6(月) 22:16 回答[未読]
【17737】すごい！できました！ さおり 04/9/6(月) 22:35 お礼[未読]
【17731】キーを押したらループを抜ける方法
質問  さおり  - 04/9/6(月) 20:43 -
引用なし
パスワード
   こんばんわ！
無限ループをあるキーが押されたら抜けるには
どういう記述をしたらいいでしょうか？
すみませんがお願いします。
【17733】Re:キーを押したらループを抜ける方法
回答  角田 WEB  - 04/9/6(月) 21:27 -
引用なし
パスワード
   この辺りが参考になるでしょう。
「世留と仙人」
http://www1.plala.or.jp/chikada/cell/0101/0101.htm
【17735】Re:キーを押したらループを抜ける方法
質問  さおり  - 04/9/6(月) 22:02 -
引用なし
パスワード
   ありがとうございます。
下のページをみてマクロプログラムを記述したのですが、
キーが押されたというイベントを使用する宣言？
↓
Declare Function GetAsyncKeyState Lib "User32.dll" (ByVal vKey As Long) As Long

記述するとどうしてもエラーになってしまいます。
エラー：コンパイルエラー
　　　　定数、固定長文字列、配列、ユーザー定義型、及びdeclareステートメントは、　　　　オブジェクトモジュールのパブリックメンバーとしては使用できません。

なにか、他の方法か、エラー回避策は、ないでしょうか？？


▼角田 さん：
>この辺りが参考になるでしょう。
>「世留と仙人」
>http://www1.plala.or.jp/chikada/cell/0101/0101.htm
【17736】Re:キーを押したらループを抜ける方法
回答  禰宜  - 04/9/6(月) 22:16 -
引用なし
パスワード
   失礼いたします。

>記述するとどうしてもエラーになってしまいます。

フォームモジュールや、WorkBookモジュールなどでは、

Declare Function・・・・と、Public宣言することは出来ません。

標準モジュールを追加してそちらに記述するか、

Private Declare Function・・・・・

とプライベートで宣言すれば大丈夫です。
【17737】すごい！できました！
お礼  さおり  - 04/9/6(月) 22:35 -
引用なし
パスワード
   角田 さん、禰宜 さん

やりたかった動きができました。
ありがとうございました！
本当にたすかりました。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
11166 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free