プロが教える店舗&オフィスのセキュリティ対策術

いつもお世話になっております。

Accessでフォームのボタンを押すと、追加クエリを12回実行させるよう、下記のように作っています。

Private Sub 年次請求_Click()
Dim i As Integer

For i = 1 To 12
DoCmd.OpenQuery "請求按分4"
Next i

End Sub

しかし、追加クエリが実行される数だけ、メッセージが表示され、非常に鬱陶しいのです。。。

追加クエリを実行する際のメッセージを、表示させない方法をご存知でしたら教えてください。

A 回答 (2件)

使用するパソコンで動作するAccess全てに影響してしまいますが、「ツール」-「オプション」-「編集/検索」-「確認」にある「レコードの更新」と「アクションクエリ」のチェックを外すという方法でも良いと思います。

    • good
    • 0
この回答へのお礼

あ!それを度忘れしていました!!!
そういう方法も、ありましたね~☆
いやぁ、勉強になります。
ご回答、ありがとうございました!!

お礼日時:2003/12/15 16:23

PrivateSub の下に



「 Docmd.SetWarnings False 」の一文を追加してみて
 ください。

どうでしょう?
    • good
    • 0
この回答へのお礼

あ!いきました!
感動です(T0T)/"
とってもたすかりました!
本当にありがとうございました☆☆

お礼日時:2003/12/15 16:20

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!