Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

7880 / 9994

←次へ　｜　前へ→


	【5296】Re:VBAでクエリ

kuri

- 05/6/6(月) 17:22 -


	引用なし

	パスワード

▼T さん：
>▼kuri さん：
>>根本的にわからないことは、ある抽出条件でクエリを実行するときのコードがわかりません。今まで日付で抽出するときは、クエリのデザインビューで、直接、抽出条件に
>>Betwee Forms![F_000]![txt1]And Forms![F_000]![txt2]
>>Betwee Forms![F_000]![txt1]And Forms![F_000]![txt2]IsNull
>>といった感じで入力してたので、いざVBAでコードしようとしても全くわかりません。
>
>クエリのデザインビューをＳＱＬビューに変えるとヒントになるかもしれません。
SQLで見たのですが、

WHERE (((T_001.受付月日) Between forms!F_001!txt1 And forms!F_001!txt2)) Or (((T_001.受付月日) Between forms!F_001!txt1 And forms!F_001!txt2 Is Null));
このWHERE以降に書かれている事を参考に下記の用にコードしてみましたが、上手くいきませんでした。どこが悪いのか検討がつきません。

Private Sub コマンド28_Click()
Dim stSQLWhere As String

stSQLWhere = "T_001.受付月日 between[forms]![F_001]! #" & txt1 & "#　AND[forms]![F_001]!　#" & txt2 & "# "

DoCmd.OpenForm "F_002", acFormDS, "", stSQLWhere

End Sub

3,541 hits

▼

【5253】VBAでクエリ kuri 05/6/4(土) 21:23