![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
ACCESSにて 登録したデータの検索機能を作っているのですが、
文字列での検索は引用したサンプルプログラムの通りにして
問題なく検索できるのですが、日付の検索をすると、1件も検索されません。
どのような文法的な誤りがあるかご指導ください。
検索での「日付の比較」部分のコード
strWhere = strWhere & "R業務依頼日 = #" & "Me![txtYKSDay]" & "#"
strWhereでは、SELECT文のWHERE句の検索条件部分を文字列として作成しています。
後で、リストボックスの値集合ソースに突っ込む為。
私のレベルは、開発の経験はありません。
正規化とかクエリーが理解できるレベルです。
ACCESS:2000 OS:WindowsMe
800文字の制限を越えてしまったので、文字列の比較の部分と
日付の比較の部分のコードを付加します。
--------------------------------------------
'変数の初期設定
strWhere = ""
(略)
'業務依頼日で検索
If IsNull(Me![txtYKSDay]) <> True Then
If strWhere <> "" Then
strWhere = strWhere & " And "
End If
strWhere = strWhere & "R業務依頼日 = #" & "Me![txtYKSDay]" & "#" <==ココ
End If
(略)
'フリガナを部分一致で検索
If IsNull(Me![txtYKSFurigana]) <> True Then
If strWhere <> "" Then
strWhere = strWhere & " And "
End If
strWhere = strWhere & "Kフリガナ Like '*" & Me![txtYKSFurigana] & "*'"
End If
No.1ベストアンサー
- 回答日時:
とりあえず、Me![txtYKSDay]の部分がダブルクォートで囲まれているから。
(質問時のタイプミス?)ブレークポイントで止めて、strwhereの中身がどうなっているのか確認してみてください。
#と#間が日付になっていなかったら、format関数で日付の形式にするとできると思います。
解決しました。ご指摘の部分が原因でした。
>Me![txtYKSDay]の部分がダブルクォートで囲まれているから
文法の基本が理解できていない為、初歩的な部分で引っ掛かって
しまいました。
迅速且つ的確なご指摘、ありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) VBAで日付入力しているのですが 4 2023/03/02 11:25
- Excel(エクセル) VBAについて 3 2022/06/19 18:19
- Visual Basic(VBA) ユーザーフォーム「frm_基本❶」を立ち上げると新規で入力する行数を右下のNoとして表示しています。 1 2023/03/16 19:02
- Visual Basic(VBA) 検索のユーザーフォームの表示について 1 2023/03/27 23:31
- Visual Basic(VBA) このVBAでExcelアプリケーションを作成は必要ですか? 3 2023/07/19 21:13
- Visual Basic(VBA) ファイル全てを .xlsm に変更したところ、プログラムが途中で落ちてしまっています 17 2022/12/07 12:03
- Visual Basic(VBA) VBA 改行コードの取り方 1 2022/03/22 14:14
- Visual Basic(VBA) VBAの繰り返し処理について教えてください。 3 2022/08/02 13:21
- Excel(エクセル) PHPプログラムをエクセルに張り付けると検索ボックスがでてくる! 3 2022/05/08 07:10
- Excel(エクセル) 指定文字列が該当するA列をアクティブセルにするには 3 2022/08/17 13:18
関連するカテゴリからQ&Aを探す
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
「24日の0時」って・・・
-
パソコンで購入したデーターが...
-
日付の大小の表現
-
エクセル マクロ 名前を付けて...
-
「時間」、「期日」、「日付」...
-
回覧板の日付について質問です...
-
履歴書の日付間違いで落ちますか。
-
エクセルで日付け表示で、明治...
-
下の画像はアンドロイドタブレ...
-
差し込み印刷に当日の日付が入...
-
PDFファイルに日付を名前にして...
-
フォームの値をクエリーに反映...
-
日付の最大値を求めるには
-
Excel で日付入力のプルダウン...
-
2つの日付の中間の日付 エク...
-
エクセルVBAでFINDで年...
-
ACCESS フォームで入力した日付...
-
エクセルで日付別にシートを分...
-
ACCESSで1月1日~12月31日まで...
-
PCの日付が起動のたびにリセ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
パソコンで購入したデーターが...
-
「24日の0時」って・・・
-
「時間」、「期日」、「日付」...
-
差し込み印刷に当日の日付が入...
-
日付の大小の表現
-
回覧板の日付について質問です...
-
エクセル マクロ 名前を付けて...
-
履歴書の日付間違いで落ちますか。
-
EXCELで日付を****年上期、****...
-
エクセルで6ヵ月後を自動入力で...
-
ACCESSで日付ごとに自動連番(...
-
WEEKDAYが反映されない
-
ACCESSで1月1日~12月31日まで...
-
会社や役所などに提出する書類...
-
日付以外のデータを抽出したい...
-
エクセルで日付別にシートを分...
-
Excelでヘッダに前日の日付を表...
-
エクセルで日付け表示で、明治...
-
2つの日付の中間の日付 エク...
-
差込印刷 縦書きで和暦(漢数...
おすすめ情報