IT仕事 MS Access

パラメータクエリにパラメータをセットして実行した結果をデータシートで表示する」というコードの実行で3065エラー

投稿日:

Accessの仕様として、パラメータクエリだけが駄目なのかと思ったら、なんと選択クエリが駄目なのだそう。

理由は、Executeメソッドはアクションクエリのもので、選択クエリのものではないからだそう。

けれどもネット上のあちこちに、「ばっちりこれで動作するよ」というサンプルコードの残骸が残っているところを見ると、以前のAccessのバージョンでは動いていた、ということなのかな?

これらとか?
http://tsware.jp/study/vol16/vbabegin_42.htm
http://stackoverflow.com/questions/30240329/ms-access-vba-open-select-query-with-parameters-run-time-3065-cannot-execute-a
http://www.pcreview.co.uk/threads/3065-cannot-execute-select-query-why-not.1638292/
http://answers.microsoft.com/en-us/office/forum/office_2010-access/error-3065-cannot-execute-select-query-but-its-not/e4284949-09ae-4a82-9c83-84f721be704f

ともかく、VBAで、結果をデータシートビューで欲しい選択クエリ(更新クエリや削除クエリなどの「アクションクエリ」はOK)では、Docmd.runsql や dbs.Execute のような書き方では、どうあってもエラーになるのであった。
一方で、ややこしいのは、「選択クエリをデータシートビュー」は駄目で、「選択クエリをレコードセット」にしてあれこれ操作するのはOK。

で、結論ですが、「選択クエリをデータシートビュー」で表示したい場合ですが、見方を変えて「フォームをデータビューに」仲介して、こうやったらうまくいきます。

「フォームのデータソースに、選択クエリをセットして、データシートビューで開く」

ずばり、コレデス。
実際、「DoCmd.OpenForm “入金催促”, acPreview」 みたいな書き方です。

パラメータクエリ(qdf.Parameters = “aaa”)も、レコードセットのフィルタ(rst.filter = “eメール = ‘test@test20160113.com'”)も、うまくいきます。

こりゃ便利だ!

-IT仕事, MS Access

執筆者:

関連記事

no image

CliborとPythonで明日(昨日)の日付を出す

Clibor、使ってますか? 私は毎日使っています 例えば、「2018/07/02(月)」のように明日の日付を書きたいと思ったら、どうやって入力していますか? キーボードで13個以上のキーを押して、曜 …

no image

XOOPSとWordPressが同居しているDBでWP側のデータをいじりたいとき。

かたやEUC、かたやunicodeなので、なかなか思ったようにいかず、しばらく試行錯誤。 苦労した結果、以下の手順でやればうまくいきそうなので、覚え書き。 ■PhpMyAdminで既存DBからエクスポ …

no image

SqlServer 2008 Express R2 をインストールしようとしているのだが、最後の最後でうまくいかない

前回、試しに自分の普段のPCでSqlServer2008をインストールしたのだが、今回はサーバ(といってもXP)を対象に同様のことをしてみた。 しかしインストールの最後で「there was an e …

no image

Accessで DoCmd.RunSQL を CurrentDb.Executeにしたら、1秒高速化した

処理が遅いので速くして欲しいとの要望があったので、コードを調査。 DoCmd.RunSQL を CurrentDb.Execute に置き換えると非同期で実行されるとの情報を得たので、試す。 結果、6 …

no image

ExcelブックをAccessで読みたいときにリンクテーブルを使わない方法があったとは・・・知らなかった

とある業務で、Access内でExcelブックをリンクテーブルで読む・・・という使い方をしてきた。 (AccessのmdbはNASにおいて共有している。Excelのxlsも同じく) これはこれで便利な …