No.4
- 回答日時:
#1です
すみません
肝心なの忘れてました
> Me.Filter = "Between #" & _
Me.Filter = "[フォームのレコードソースに使われるフィールド] Between #" & _
> Format(Me.[開始],"yyyy/mm/dd") & "# And #" & _
> Format(Me.[終了],"yyyy/mm/dd") & "#"
Betweenの前に、どのフィールドが!って指定して無いですね
他は、ぱっと見大丈夫そうですが・・・
検索フォームと、表示したフォームって別物?
No.3
- 回答日時:
#1です
立て続けで申し訳ない
Me.Requery
は、Acc97の場合は、必要だったと思うけど・・・Acc2000以降だと、2回フィルタが動作するので、消してね
この回答への補足
この様にしてみました。
Private Sub 期間検索_Click()
Me.Filter = "Between #" & _
Format(Me.[開始], "yyyy/mm/dd") & "# And #" & _
Format(Me.[終了], "yyyy/mm/dd") & "#"
Me.FilterOn = True
End Sub
同じエラーが出てしまいます。。
No.2
- 回答日時:
#1です
あらま^^;;;
> Private Sub 期間検索_Click()
> Between [開始] And [終了]
> End Sub
こう言う使い方するなら・・・
Private Sub 期間検索_Click()
Me.Filter = "Between #" & _
Format(Me.[開始のコントロール名],"yyyy/mm/dd") & "# And #" & _
Format(Me.[終了のコントロール名],"yyyy/mm/dd") & "#"
Me.FilterOn = True
Me.Requery
End Sub
と、言う使用方法かな?
この回答への補足
Private Sub 期間検索_Click()
Me.Filter = "Between #" & _
Format(Me.[開始],"yyyy/mm/dd") & "# And #" & _
Format(Me.[終了],"yyyy/mm/dd") & "#"
Me.FilterOn = True
Me.Requery
End Sub
この様に、作ってみましたが、エラーが出てしまいます。。
このオブジェクトに値を代入できません、と言うエラーが出てしまいます。
No.1
- 回答日時:
> このフォームに、開始と終了のテキストボックスを設置しています。
これが、曲者だね・・・日付としてデータがなってるのか?ただのテキストとしてデータが、入ってるのか?
期間として行うなら
Between [開始] And [終了]
で、抽出可能だけど・・・これは、日付として入力されている場合
テキストの場合は、日付に変換
Between CDate([開始]) And CDate([終了])
あたりで、簡単に行けばよいのだけど・・・
"20080901"あたりで、入ってれば、Format関数で形式を整えてとなるね
この回答への補足
日付フィールドは、日付/時刻型でyyyy/mm/ddで入力しています。
この様にやってみました。
Private Sub 期間検索_Click()
Between [開始] And [終了]
End Sub
エラーが出て、表示できませんでした。。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) ユーザーフォーム「frm_基本❶」を立ち上げると新規で入力する行数を右下のNoとして表示しています。 1 2023/03/16 19:02
- Visual Basic(VBA) 検索のユーザーフォームの表示について 1 2023/03/27 23:31
- Access(アクセス) Access 複数条件検索の設定が上手く行きません 1 2022/07/22 20:37
- Access(アクセス) Accessでセレクタをダブルクリックで別フォームで詳細表示 3 2022/12/20 10:36
- JavaScript ラジオボタンによるフォームの開閉を行いたい 3 2022/03/31 21:30
- その他(ブラウザ) Mycrosoft Edge フォームの履歴を完全に削除したい 3 2022/08/11 09:59
- Access(アクセス) Accessフォーム 一部のレコードだけを抽出する方法について 1 2022/06/28 18:45
- Access(アクセス) AccessVBAで降順にするテーブル作成クエリを使用して作成したテーブルを削除し同一のテーブル作成 1 2023/01/06 11:17
- Access(アクセス) Accessで予定表を作成しようとしてます。 テーブル フィールド名 連番 オートナンバー型 年月日 2 2023/07/23 11:40
- その他(データベース) Accessフォームからパラメーターで表示したレコードを指定のExcelのセルへ転送する方法について 2 2022/08/22 18:04
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
アクセスのfilter、複数条件の記述方法を教えてください。
Access(アクセス)
-
Access 複数条件検索の設定が上手く行きません
Access(アクセス)
-
Access 日付/時間型を検索するには?
Access(アクセス)
-
-
4
レコードを保存するコード アクセスvba
その他(Microsoft Office)
-
5
Access レポート印刷するときに1ページに収める方法
Access(アクセス)
-
6
年月日を持つテーブルから年月を指定して抽出したいのですが
その他(データベース)
-
7
空白はダメというエラーの表示(アクセス)
その他(データベース)
-
8
Accessレコードの追加や変更が出来ません。
その他(データベース)
-
9
Accessで値がnullの場合は計算せずにnullをかえす方法
Access(アクセス)
-
10
アクセスVBAのMe!と[ ]
Access(アクセス)
-
11
日付型のテキストボックスに数値を入れて日付にしたい
Access(アクセス)
-
12
Accessで別テーブルの値をフォームに表示したい
その他(データベース)
-
13
アクセスのVBAで「日付」の期間と「種別」のフィールドの検索をしたい。
Access(アクセス)
-
14
access2019 チェックボックスと連動したクエリ抽出条件について
Access(アクセス)
-
15
Accessで、フォームに情報を入力途中で、やめる(レコードに保存しない)ということは出来ますか?
Access(アクセス)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
日付型のフィールドに空白を入...
-
SQL文で パラメータが少なすぎ...
-
BCPでCSV内の文字列をテーブル...
-
Excleピボットでデータのない部...
-
Accessの日付時刻型から日付、...
-
VBA 別シートの同じ日付の欄に...
-
Excel→Accessへの日付データの...
-
sql update で 抽出条件データ...
-
【エクセル】指定した日付に一...
-
エクセルで書式設定ではなく、...
-
ビュー定義をプログラムで動的...
-
DSumの計算式の入れ方
-
ACCESSにてフィールド間の平均...
-
Access クエリで、レコードの無...
-
アクセスで日付を入力すると曜...
-
【Accessで困っています...
-
クロス集計のユニオンクエリー...
-
【vba】日付の形式が勝手に変わ...
-
アクセス クロス集計結果の列...
-
前日分のデータだけをスケジュ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
日付型のフィールドに空白を入...
-
SQL文で パラメータが少なすぎ...
-
Excleピボットでデータのない部...
-
VBA 別シートの同じ日付の欄に...
-
Accessの日付時刻型から日付、...
-
BCPでCSV内の文字列をテーブル...
-
アクセスで月単位の抽出
-
Excel→Accessへの日付データの...
-
指定日付を起点にして最新日付...
-
Access クエリで、レコードの無...
-
ACCESSの空白をカウントする
-
【vba】日付の形式が勝手に変わ...
-
【エクセル】指定した日付に一...
-
アクセス:既定値に土日含まず...
-
Accessで日付の比較がうまくい...
-
【Accessで困っています...
-
Accessのデータ型の日付/時刻型...
-
クロス集計のユニオンクエリー...
-
アクセスの昇順並び替えで空白...
-
Accessでnow()で取り出した日付...
おすすめ情報