• ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:Accessでのマウスホイールの無効化)

Accessでのマウスホイールの無効化

KenKen_SPの回答

  • KenKen_SP
  • ベストアンサー率62% (785/1258)
回答No.3

再度 URL 先のソースを試しましたが、特に問題なさそうです。  # 今度はうまく動きました 標準モジュール、クラスモジュール、フォームと3つのモジュールに ソースを間違いなく貼り付けてますか? 改造した部分はありませんか? それから、各モジュールはちゃんと Save してから実行してますか? 動作確認が取れてますから、念のため、今一度説明を良く読んで、 再度貼り付け作業からやってみて下さい。

Spacewatch
質問者

補足

 有り難うございました。  もう一度全てクリアして、最初からやり直してみたらうまくいきました。  前回どこがまずかったのか不明ですが、可能性としては以下の辺り かと・・・・ 1.フォームには貼り付ける際、前回は末尾に貼り付けたが今回は冒頭に  貼り付けた 2.前回もちゃんとセーブしたつもりでしたが、以下の手順8~10を厳格に  実行した    8.VBE画面を閉じ、データベースウインドウからモジュールを選択します。    9.Accessを一旦閉じます。    10.再度Accessを開き該当フォームを開きます。   なお、手順8の後半の意味がよくわからなかったのですが、データベース  ウィンドウにてオブジェクトのうちからモジュールを選択し、種々の モジュールオブジェクトがウィンドウ右側に表示されている状態で、 データベースウィンドウの右上の×をクリックして閉じる、ということを 厳格に行いました。   前回の手順の詳しいところは、よく記憶していませんが、もしかすると モジュールオブジェクトを選択していなかったかもしれませんし、Accessを 閉じる方法もデータベースウィンドウの×をクリックではなく、いきなり Accessのウィンドウの×をクリックで閉じていたかもしれません。   ともあれ、このあたりの操作の違いによって、セーブがうまく行ったり 行かなかったりということはあるのでしょうか?  それと、あと1点確認させていただきたいのですが、2回目の回答で触れて いただいていたサブクラス化の危険性を考慮した、より安全な手法による、 参考ソースの方はいかがでしょうか?    よろしくお願い致します。

関連するQ&A

  • マウスホイールを動かしても次のレコードに移動しない

    マウスホイールを動かしても 次のレコードに移動しないように制御したいのですが http://www.accessclub.jp/bbs2/0027/beginter08905.html の通りに行ったら、 私の環境ではフリーズしてしまいます。 OS:XP OFFICE:2003 です。 フォームを開くと、VBEがずっと実行中になり、 フォームを動かすことも、フォームに値を入れる事もVBEを終わらせる事も出来ずにいます。 タスクマネージャーから無理やり終わらせるしかないです。 アクセス2003ではこの方法はダメなのでしょうか?

  • Access 既定値を使って・・・

    お世話になります 下記参考URLになります http://www.accessclub.jp/bbs2/0043/beginter14146.html 2つめの方法ですが PC本体・パーツフォームがサブフォームの場合は どのような呼び方をすればいいのでしょうか? Public Sub SelectParts()   Me.パーツ名=メインフォーム名!PC本体・パーツフォーム!.パーツ名 End Sub どなたかわかるかた宜しくお願いします

  • Access

    お世話になります 参考URL http://www.accessclub.jp/bbs2/0043/beginter14146.html 1つめの方法 「PC本体・パーツフォーム」側コマンドボタンクリック時に 注文フォーム.パーツ名=Me.パーツ名 注文フォーム.金額=Me.金額 上記の手法でおこなうとえらーがでます エラー:実行エラー424 オブジェクトが必要です デバック:注文フォーム.パーツ名 = Me.パーツ名←エラー箇所 解決方等ありましたらよろしくおねがいします

  • ACCESSがクラッシュ?

    ACCESS初心者です。 一応、対応できたので緊急ではありませんが非常に不思議な現象が発生しました。 もし原因や対応等についてご存知の方があればご教示願います。 経緯は時間を追って以下の通りのです。 1.ACCESSでシステムを開発(具体的にはメイン・サブフォームの作成)を行っていました。 2.一旦ウィザードでフォームを作った後、かなりあちこちをいじっておりました。いろいろなエラーメッセージが表示されていました。 3.突然、砂時計が出っ放しになってどこをクリックしても受け付けられなくなりました。 4.30分以上待っていましたが全く変わらないため、やむを得ず強制終了をかけました。(前日にDBを別名でセーブしてあったのでそこからやり直してもいいと思っていました) 5.再度ACCESSを立ち上げ、当該フォームを呼び出すと「コンパイルエラー」が表示されVBAが表示されましたが、それは作業中であったフォームではない、別のフォームのもののようです。 6.そのフォームをフォームビューで開いてもコンパイルエラーになるのはいいとして、同じDB内の全く別のフォームを実行してもコンパイルエラーが出ます。 7.何をやってもエラーになり、表示されているVBAの画面を見ると「 ate Sub ・・・・」等となっていてどうも元のコマンドの最初の方が消えてしまって不完全なコマンドになっているようです。 (当然私は初心者ですしそんなところを触った覚えも何もないのですが) 8.どうもDB全体が壊れているようでした。ACCESSの場合はすぐに壊れるという話を聞いていましたので、このDBはあきらめて閉じて、昨日セーブしておいたDBを開きました。 9.なんと!、昨日セーブしてあったDBを立ち上げ、あるフォームを実行したところ、また先ほどと同じコンパイルエラーが出ます!DBが違うはずなのになぜ??? 10.ACCESS経験者に応援を求め、とりあえず壊れたコマンドが表示されている画面の全ての行に「’」を入れてコメント行にしたところ、なんとかエラーは起きなくなりました。 以後どのDB、どのフォームを開いても大丈夫です。 以上が経緯ですが、こんなことってACCESSではありえることなのでしょうか? とりわけ、あるDBの不具合が全く別のDBにも波及するというのは全く理解できませんしこんなことではACCESSをこれから使う気も失せてしまいそうです。 何かアドバイス等あればよろしくお願いいたします。

  • エクセル(VBE)について

    エクセル(VBE)について SubまたはFunctionの定義がされてません。とエラー表示が出てしまうのですが

  • リストボックスのスクロールバーをマウスで動かしたい

    エクセル2007です。 Sheet1のA列に 1行目から順に 1 2 3 4 5 6 7 8 9 10 といれました。 ユーザーフォームを新規作成し、リストボックスを設置しました。 VBAコードは、 Private Sub UserForm_Initialize() Me.ListBox1.RowSource = "Sheet1!a1:a10" End Sub にしました。 VBE画面でF5を押して、フォームを表示させるとリストボックスにスクロールバーが表示されますが、 フォームをクリックして、マウスホイールでぐりぐりしても、リストは動きません。 画像のように、4にカーソルをあて、グリグリしてもダメです。 どうしたら動くようになるのでしょうか?

  • マクロ ユーザーフォームが表示されない

    いつも回答して頂き、ありがとうございます。 Sub UserForm1() UserForm1.Show End Sub と記述しましたが、エラーが発生し、ユーザーフォームが表示してくれません。 コンパイルエラー:Functionまたは変数が必要です フォームはコマンドボタンを一つ配置し、 Private Sub CommandButton1_Click() Unload UserForm1 End Sub と記述してあるだけです。何が悪いのでしょうか?御教授の程宜しくお願い致します。

  • アクセス イベントの発生を停止させたい

    アクセスでイベントを発生しないようにしたいのですが エクセルで使用できる、Application.EnableEvents = Falseを使うと、 コンパイルエラーになります。 フォームを指定して、 .FilterOn = True を通ると、 該当のフォームのPrivate Sub Form_Current()イベントが発生してしまうので、 Application.EnableEvents = Falseのように、イベントの発生を停止させたいです。

  • アクセス2007でのエラー

    初めてアクセス使用してます。アクセス2007でマクロ実行でエラーが出て困っています。 「マクロ式またはVisual Basicコードで参照されている'***'フォームが見つかりません。」 後記として、'***'のフォームがないかコンパイルエラーかと表示されています。 '***'の名のフォームは存在しますので、どうしていいのかわかりません。アクセス自体をインストールし直すと正常に動作します。 素人作なので初歩的、根本的なミスなのかもしれませんが、良い方法があればお願いします。

  • Access2000のVBAでコンパイルエラー

    Access2000のVBAで初歩的な質問があります。 「tblShi」というテーブルがあります。 フォームにボタン「btn1」を作り、 デザインビューでボタンのプロパティを開いて イベントのクリック時のところで、 「ビルダの選択」をコードビルダにしました。 そして「Private Sub btn1_Click()」の中に、最初に   Dim db As Database という記述をしています。 このフォームを開いてボタンを押すと、なぜか   コンパイルエラー   ユーザ定義型は定義されていません というエラーが表示されてしまいます。 たしかにコードを書いているときに、   Dim db As のところまで入れると、小さいウィンドウの中に たくさん候補が表されますが、 その中に「Database」というのがないです。 「QueryDef」とか「Workspace」とかもありませんでした。 (「Recordset」はありまして、それはコンパイルが通ります) いろいろな解説を見ても、やはり最初はどれも 「Database」型を宣言しているようなんですが… 何がよくないのでしょうか。 もしわかる方がいらっしゃったら教えてください。