- ベストアンサー
※ ChatGPTを利用し、要約された質問です（原文：アクセス Between Andの使い方 日付型）
アクセスBetween Andの使い方日付型
このQ&Aのポイント
- フォームをテーブルに紐づけて、コマンドボタンを押下したら、日付にフィルタをかけたいですが、０件で抽出されます。
- 具体的には、フィールド1に2013/05/19、2013/05/20、2013/05/21というテーブルがあり、フォーム上のコマンドボタンのクリックイベントでは、フィールド1の値が現在の日付から1日後の範囲内にあるレコードを抽出するように設定されています。
- しかし、なぜか何も抽出されず、エラーも表示されません。
- GRFXUNTOPDUPZ
- お礼率100% (46/46)
- オフィス系ソフト
- 回答数1
- ありがとう数1
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
＞Me.Form.Filter = "フィールド1 Between " & Date & " And " & Date + 1 のところ、 Me.Form.Filter = "フィールド1 Between '2013/05/19' And '2013/05/20'" としてみてください。うまく行けば、 Me.Form.Filter = "フィールド1 Between '" & Date & "' And '" & Date + 1 & "'" うまくいかなければ Me.Form.Filter = 'フィールド1 Between "2013/05/19" And "2013/05/20"' としてみてください。うまくいけば、 Me.Form.Filter = 'フィールド1 Between "' & Date & '" And "' & Date + 1 & '"' うまくいかなければ Me.Form.Filter = "フィールド1 Between ""2013/05/19"" And ""2013/05/20"" としてみてください。うまくいけば、 Me.Form.Filter = "フィールド1 Between """ & Date & """ And """ & Date + 1 & """ こちらにテスト環境がないので、申し訳ない。
お礼
Me.Form.Filter = "フィールド1 Between '2013/05/19' And '2013/05/20'" だと、「抽出条件でデータ型が一致しません」になりました。 Me.Form.Filter = 'フィールド1 Between "2013/05/19" And "2013/05/20"' だと、コード自体がコンパイルエラーになります。 Me.Form.Filter = "フィールド1 Between ""2013/05/19"" And ""2013/05/20""" も、「抽出条件でデータ型が一致しません」になりました。
補足
Me.Form.Filter = "フィールド1 Between #" & Date & "# And #" & Date + 1 & "#" で、できました。 maiko0318さんのご回答がヒントになりました。