テーブル1
---------------------------------------
IDフィールド1フィールド2
1あA
2いB
3うC
4えD
5おE
---------------------------------------
を作成し、そのテーブルをもとに、帳票フォームを作成しました。
そのフォームに非連結のテキストボックス
ID_テキスト
フィールド1_テキスト
フィールド2_テキスト
3つを設置しました。
行いたい事をクエリ(SQL文)で例えると、
---------------------------------------
SELECT テーブル1.ID, テーブル1.フィールド1, テーブル1.フィールド2
FROM テーブル1
WHERE (((テーブル1.ID) Like "*" & Forms!テーブル1!ID_テキスト & "*") And ((テーブル1.フィールド1) Like "*" & Forms!テーブル1!フィールド1_テキスト & "*") And ((テーブル1.フィールド2) Like "*" & Forms!テーブル1!フィールド2_テキスト & "*"));
---------------------------------------
なのですが、
これをクエリを作成せずに、VBAで行いたいです。
各非連結のテキストボックスには、
更新後処理:[イベント プロシージャ]
としています。
---------------------------------------
Private Sub ID_テキスト_AfterUpdate()
Me.Form.Filter = _
"ID like '" & "*" & Me.ID_テキスト.Value & "*" & "'"
Me.Form.FilterOn = True
End Sub
---------------------------------------
は、問題なくできるのですが、
Private Sub ID_テキスト_AfterUpdate()
Me.Form.Filter = _
"ID like '" & "*" & Me.ID_テキスト.Value & "*" & "'" and & _
"フィールド1 like '" & "*" & Me.フィールド1_テキスト.Value & "*" & "'"
Me.Form.FilterOn = True
End Sub
にすると、エラーになります。
andの繋げ方が良くないと思うのですが、どうすればいいでしょうか?
最終的には、
Private Sub ID_テキスト_AfterUpdate()
Me.Form.Filter = _
"ID like '" & "*" & Me.ID_テキスト.Value & "*" & "'"
"フィールド1 like '" & "*" & Me.フィールド1_テキスト.Value & "*" & "'"
"フィールド2 like '" & "*" & Me.フィールド2_テキスト.Value & "*" & "'"
Me.Form.FilterOn = True
End Sub
のような感じにしたいです。
ご回答よろしくお願いします。
No.1ベストアンサー
- 回答日時:
Private Sub ID_テキスト_AfterUpdate()
Me.Form.Filter = _
"ID like '" & "*" & Me.ID_テキスト.Value & "*" & "' and " _
& "フィールド1 like '" & "*" & Me.フィールド1_テキスト.Value & "*" & "'"
Me.Form.FilterOn = True
End Sub
でしょ。
Me.Form.Filter = _
"ID like '" & "*" & Me.ID_テキスト.Value & "*" & "' and " _
& "フィールド1 like '" & "*" & Me.フィールド1_テキスト.Value & "*" & "' and " _
& "フィールド2 like '" & "*" & Me.フィールド2_テキスト.Value & "*" & "'"
Me.Form.FilterOn = True
できました!!!! ありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(データベース) 更新クエリをリンクデータベーステーブルに実行し実行時エラー3362固有インデックスに重複する値が含ま 1 2022/09/21 11:44
- Access(アクセス) テキストボックスの値をテーブルに入力したい 2 2022/06/28 12:08
- Access(アクセス) Accessテーブルの結合で別々のテーブルのフィールドを組み合わせて値を出す方法について 2 2022/07/20 19:43
- Access(アクセス) アクセスの更新クエリでカレントレコードのみ更新したい 1 2022/06/02 23:32
- SQL Server ACCESSで表が作りたく、そのためのSQL文や設定方法を教えてください。 1 2022/08/15 12:28
- Access(アクセス) Accessテキストボックス内に2つのフィールドの値を比較して大きい方の値を表示させる方法 1 2022/09/09 10:50
- Access(アクセス) access,vbaでフォルダ内のファイルをテーブルにインポート、ファイル名もフィールドに追加したい 1 2022/08/31 11:11
- JavaScript javascriptのちょっとした動作不良(原因は突き止めたのですが) 1 2023/06/15 19:58
- Access(アクセス) チェックボックスにチェックが入った後の挙動 1 2022/08/21 12:39
- PHP php テーブルが作成できない 1 2022/11/17 23:41
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教えるわが家の防犯対策術!
ホームセキュリティのプロが、家庭の防犯対策を真剣に考える 2組のご夫婦へ実際の防犯対策術をご紹介!どうすれば家と家族を守れるのかを教えます!
-
アクセスのfilter、複数条件の記述方法を教えてください。
Access(アクセス)
-
ACCESSの複数抽出方法を教えてください!
Access(アクセス)
-
アクセス フォーム複数条件でのフィルタエラーになる
Access(アクセス)
-
-
4
access マクロでのフィルタの解除の方法
Access(アクセス)
-
5
Access 複数条件検索の設定が上手く行きません
Access(アクセス)
-
6
アクセスのフィルタ nullについて。
その他(データベース)
-
7
サブフォームに対してGoToRecordするには?
その他(Microsoft Office)
-
8
Accessフォームでの複数条件検索
Excel(エクセル)
-
9
Accessで別テーブルの値をフォームに表示したい
その他(データベース)
-
10
ACCESS──メインフォームでサブフォームのレコード件数をカウントしたい
Access(アクセス)
-
11
Access コンボボックスの値をクリアしたい。
PowerPoint(パワーポイント)
-
12
ACCESSでVBAから選択クエリの抽出条件を指定したい
Access(アクセス)
-
13
ACCESSのフォームからハイパーリンクで開く
Access(アクセス)
-
14
SQL文で パラメータが少なすぎます エラー
Access(アクセス)
-
15
コンボボックスで選択したものをクリアーしたい(アクセス VBA)
Access(アクセス)
-
16
Access サブフォームでの選択行の取得
その他(データベース)
-
17
ACCESS フォームをそのまま印刷について
その他(データベース)
-
18
Accessの画面更新を一時的に停止する方法。
その他(データベース)
-
19
レコードを保存するコード アクセスvba
その他(Microsoft Office)
-
20
実行時エラー '3464': 抽出条件でデータ型が
Access(アクセス)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
テキストボックスにクエリ結果...
-
更新クエリをリンクデータベー...
-
Accessのテーブルのフィールド...
-
Accessで、テーブルに入力した...
-
アクセスで追加した項目に全て...
-
ACCESSで2つフィールドの日付...
-
Access2007のテーブルにハイパ...
-
アクセスのクエリ 1文字以上を...
-
Access:値が求めたい値の2倍...
-
ACCESSで今日までの勤務時間の...
-
Access で 特定の文字の個数を...
-
アクセスのクエリに「PHONETIC...
-
Accessを開きなおすとテキスト...
-
AccessのDLookUpの第3引数の値...
-
Accessの電話番号フィールド
-
開所日数の計算
-
ACCESSでの桁数を指定して数値...
-
Access クエリの演算フィールド...
-
Accessで、1つの項目に複数の...
-
テーブルでメモ型になっている...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
アクセスで追加した項目に全て...
-
Accessを開きなおすとテキスト...
-
Accessで、1つの項目に複数の...
-
テキストボックスにクエリ結果...
-
Accessのテーブルのフィールド...
-
テーブルでメモ型になっている...
-
Access:値が求めたい値の2倍...
-
アクセスのクエリ 1文字以上を...
-
Accessで、テーブルに入力した...
-
Accessのクエリでハイパーリン...
-
accessでの文字列の混ざった連...
-
Access で 特定の文字の個数を...
-
アクセス クエリのフィールド...
-
access フォームを開くと「パ...
-
追加クエリで特定フィールドの...
-
途中で改行されたCSVをAccessに...
-
更新クエリをリンクデータベー...
-
Access2010での、レポートの両...
-
ACCESSのテーブル複数行...
-
Access2002の重複クエリで大文...
おすすめ情報