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

執筆者:

関連記事

FileMaker Pro 12 での汎用トグルボタンの作り方

Accessではとっても簡単なトグルボタンだが、FileMakerでそれを作るのは簡単ではない。むしろとっても面倒。 それなのに、画面いっぱいにいくつものトグルボタンを作る仕事が出てきた。 一つ一つの …

no image

秀丸マクロ

薬品費を消耗品費にするのと22を23にするのとを、20個以上のファイルに対して行って、別のファイルに保存する・・・。 これを昨日からやっているのだが、だんだんめんどくさくなって来て。 明日移行も、同じ …

no image

HTML整形関係の秀丸マクロ

久々の投稿。 自分のHTMLファイルの作成スタイルは、 1.Artisteerでおおざっぱなデザインを決める。 2.同ソフトでHTMLソース(またはWPテンプレート)を出力する。 3.ソースを秀丸&F …

no image

深追い.com

会社で新規仕事を探してる。 そんなときに見つけたサイト、これ。 深追い.com http://www.fukaoi.com/ 「Yahoo! JAPANのキーワード検索で前日と比較して検索回数が急上昇 …

no image

Accessでフォームフィルタの結果をExcelにエクスポートする

ちょっと、苦労した。 Private Sub cmdDMデータ作成_Click() On Error GoTo Err_cmdDMデータ作成_Click Dim rstf As String Dim …