|
|
|
ａ@081222 |
|
|||
|
|
||||||
|
|
|
|
||||
|
■ クエリを使用しない絞込み（フィルタ） |
||||||
|
@絞込み用のテキストボックスのプロパティ「イベント」タブの「更新後処理」で「…」ＶＢＡを記述する
|
||||||
|
A次のように記述する Me.Filter = "フィールド名='" & Me.[テキストボックス名] & "'" Me.FilterOn = True
|
||||||
|
Bクエリによらない絞込み（フィルタ）を実行することができました
|
||||||
|
（補足） |
フィルタを解除するコードも作っておきましょう
|
|||||
|
（補足） |
Aにおいて「'」で前後を囲ったのは、数値型ではなくテキスト型でフィルタをかける意味があります。
|
|||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
□──────────────────────────────────────────────────────────────────────────────────□