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

AccessのレポートでNoDataでイベントキャンセル後もReport_Closeが実行されて困った

Accessのレポートで表示するデータがない場合は、以下のように書けばスマートにキャンセルできる。 Private Sub Report_NoData(Cancel As Integer) MsgBo …

Access「実行時エラー3061 パラメータが少なすぎます。2を指定してください」で意外な決着

クロス集計クエリをVBAで読むときで、かつパラメータクエリを使う場合には、クエリのパラメータパネルで、別途、パラメータを指定しなくてはならない(VBAで使わないなら不要) 本日のトラブルは、その後、W …

no image

LogMeIn

Going My Way: 外出先のブラウザーから自宅や会社のPCをリモートコントロールできるLogMeIn http://kengo.preston-net.com/archives/002128. …

no image

決裁システム

取引先から、「簡単な決裁システムを使いたいんだけど、何かいいものを知らないか」と聞かれた。 うちの会社ではそんなイイモノは使っていないし、他の取引先に納入した事もない。 知りません、と返事しかけたとき …

no image

AccessやExcelで作ったハイパーリンクではChromeブラウザ上のGmailの受信トレイを検索できんかった・・・がShellならできた

Accessのフォームにつくったボタンをクリックしたら、ハイパーリンクに変数がセットされ、その変数でGmailの受信トレイを検索する・・・・といった仕組みを作りたかった。 Private Sub cm …