- ベストアンサー
Accessクエリ実行時のメッセージ表示について
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
VBAですよね。 僕もメッセージ表示を回避する際にはこの方法を使うんですけど、メッセージが出なくなるってことはないんですが・・・。 一度F8を押しながら、1行づつ実行して、 DoCmd.SetWarnings True が実行されているかどうか確認されてはどうでしょうか？
関連するQ&A
- access 確認メッセージのはい/いいえの結果で分岐したい
クエリ実行時に表示されるメッセージがありますが、 （DoCmd.SetWarnings False で非表示にできるメッセージ） この「はい/いいえ」を利用して if文のように分岐したいのですが、可能でしょうか？ よろしくお願いします。
- 締切済み
- オフィス系ソフト
- アクセス2000→エクセル2010へエクスポート
Private Sub cmd出力ボタン_Click() DoCmd.SetWarnings False DoCmd.TransferSpreadsheet acExport, 8, "出力クエリ", "C:データ.xlsx", True, "" DoCmd.SetWarnings True End Sub 実行すると 外部テーブルのフォーマットが正しくありません と出てしまいます。 エクセル97の形式にエクスポートする際は大丈夫でした。 spreadsheettypeの引数が違うのかとは思いますが適切な数値がわかりません。 他のやり方等もあれば教えて下さい。
- ベストアンサー
- オフィス系ソフト
- アクセスVBA 追加クエリ
下記クエリが一つあります。 [Q_商品] ID 商品名 価格 色 サイズ 重さ 送料 備考 [Q_商品]から、[T_テスト]をテーブルの作成から作りました。 [T_テスト]は、毎回利用する時に、すべてデリートして、[Q_商品]のデータを追加したいです。 [T_テスト]のデータの、すべてデリートは下記VBAでできました。 Private Sub コマンド40_Click() 'システムメッセージの非表示 DoCmd.SetWarnings False DoCmd.RunSQL "DELETE FROM T_テスト" 'システムメッセージの表示 DoCmd.SetWarnings True End Sub [Q_商品]のデータを追加するVBAを教えて下さい。 よろしくお願い致します。
- ベストアンサー
- その他(データベース)
- Access 追加クエリ実行時のメッセージを表示させない方法
いつもお世話になっております。 Accessでフォームのボタンを押すと、追加クエリを12回実行させるよう、下記のように作っています。 Private Sub 年次請求_Click() Dim i As Integer For i = 1 To 12 DoCmd.OpenQuery "請求按分4" Next i End Sub しかし、追加クエリが実行される数だけ、メッセージが表示され、非常に鬱陶しいのです。。。 追加クエリを実行する際のメッセージを、表示させない方法をご存知でしたら教えてください。
- ベストアンサー
- オフィス系ソフト
- SendKeyで解決できないでしょうか？
こんにちは。どうぞ、よろしくお願いします。 テーブル作成のクエリに関することです。 コマンドボタンのクリック時のイベントに テーブル作成クエリを指定しています。 其の場合、以下のような確認のダイアログボックスが出ますが、 これを出ないように、出来ないものでしょうか？ （2つのダイアログボックス共に、"Y"を押下します。） テーブル作成クエリを実行すると、 新しくテーブルが作成されます。 **** 件のレコードが新規テーブルにコピーされます。 -------------- クリック時のイベントに付いてですが、 SendKeyを使ってみましたが、上手く行きませんでした。 SendKeyはアクティブウィンドウについて作用するとのことなので、 フォームを閉じて…、などを考えて、次のような感じでやりました。 DoCmd.Close acForm, "フォーム名" DoCmd.DeleteObject acTable, "テーブル名" DoCmd.OpenQuery "作成クエリ", acNormal, acEdit SendKeys "y", True SendKeys "y", True DoCmd.OpenForm "フォーム名" DoCmd.DeleteObjectは、 テーブルを削除していないと上書きするかどうかを聞いてくるので、 削除しておこうと思い書きました。SendKeyでは、可能に出来ないのでしょうか？ DoCmd.SetWarnings False も少し試しましたが、違うようですし。 それとも、簡単には解決できないようなことでしょうか。どうぞ、お願いします。
- ベストアンサー
- オフィス系ソフト
- ＡＣＣＥＳＳ２０００のクエリ実行時
ＡＣＣＥＳＳ２０００でクエリを実行する時にでる「クエリを実行するとテーブルのデータが変更されます」というメッセージが表示されないようにしたいです。 色々本や他の質問等で調べてみたのですが、なかなか同じような質問の解答がみつかりません・・・・ どなたか助けてください。お願いいたします。
- ベストアンサー
- オフィス系ソフト
- Accessクエリにて
お世話になります。 下記テーブルがあります。 ■型番テーブル ID 型番 数量 1 A 1 2 B 1 3 C 1 4 D 1 5 E 1 ■発売日テーブル ID 型番 発売日 削除 1 A 2010/01/01 False 2 B 2010/05/01 False 3 C 2011/03/01 False 4 D 2011/05/01 True 5 E 2011/06/01 False ■上記テーブルを用いたクエリ ・型番テーブルの「型番」と発売日テーブルの「型番」を 紐付ける ・表示したいフィールドは「型番」「発売日」。 ・表示したいのは型番テーブル全件（5レコード）。 ・発売日テーブルの削除がTrueの場合、発売日を空白とする。 *************** ここで質問です。 型番テーブルの全件を表示したいところですが、条件として発売日テーブルの 削除がFalseである為、型番Dが表示されません。 発売日テーブルであらかじめ削除がFalseのみでクエリを作成し、そのクエリと 型番テーブルの「型番」で紐付ければ全件表示されることは分かっており ますが、1つのクエリで表示する方法をご教授頂ければと思います。 宜しくお願い致します。
- 締切済み
- その他(データベース)
- オブジェクトの削除や更新クエリ時に確認画面がでない
Sub メッセージ表示() DoCmd.SetWarnings True End Sub を実行したり、 ツール→オプション→編集/検索→確認 ・レコードの変更 ・オブジェクトの削除 ・アクションクエリ 全てにチェックを入れているのに確認画面がでてきません。 OS：2000、Access2003です。 何かわかる方よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- ACCESSのクエリー表示について
ACCESSのクエリー表示について 困っています。 現象としましては、私が作成したMDBなのですが、フォームから日付入力を行い、その指定範囲のみのデータを表示するだけなのですが、私のパソコンでは正常に表示されるのに、他のパソコン（ネットワークでつながっていて、ＭＤＢもネットワークのフォルダーにおいています）では表示されません。 クエリー単体で動かすと正常に動いているようなのですが、フォームに結果を映すとなるとなぜか表示されなくて、クエリーのデータも０件のようです（確実にあるはずなのに） パソコンが違って、動く動作が違うと、どこを調べていいのやらわかりません。 クエリー自体もあるテーブルのデータの日付範囲のみ指定している簡単クエリーなので、 別に複雑なわけでもありません。 困っています。よろしくお願いいたします。
- ベストアンサー
- その他（プログラミング・開発）
- テーブル作成クエリを実行した時に出るメッセージを表示させたくない
Access97を使用しています。 テーブル：T実績 テーブル作成クエリ：Q実績（←実行後は、T実績に上書きされる） Q実績(テーブル作成クエリ)を実行すると「既存の"T実績'テーブル'は、実行しようとすると削除されます。よいですか？」というメッセージが出ます。 そして、ここは常に「はい」を選択します。 そこで質問です。 この時に、このメッセージを表示させたくありません。 このメッセージを表示せずに、常に「はい」を選択して処理をする事はできないのでしょうか？ マクロでいろいろ探してみたのですが、うまくいきません。 ご存知の方がいらしたら、教えてください！！ 宜しくお願い致します。
- ベストアンサー
- その他（プログラミング・開発）
お礼
DoCmd.SetWarnings Trueがコマンドボタンのコードの一番下にあったのが悪かったみたいで、 クエリ実行のすぐ下に持ってきたらちゃんと動くようになりました。 位置が違うとそんなに動作が違うんでしょうか… でも無事に動くようになったのでよしとします。