Microsoft Access 掲示板

複数項目の検索画面を一画面で検索したい / 2

現在は【検索目的】ごとに、検索画面を作成しております
見よう見まねで作動いたしておりますが
【検索目的】を変更する場合に
現在の画面を閉じて、別な画面を立ち上げております

Private Sub メニューを閉じる_Click()
DoCmd.Quit acQuitPrompt

End Sub

Private Sub Form_Current()

End Sub

Private Sub 解除ボタン_Click()
Me.FilterOn = False
Me.検索.Value = ""
End Sub

Private Sub 検索ボタン_Click()

Me.Filter = "行先 like'" & 検索 & "'"
Me.FilterOn = True

End Sub

ソース表示通報 ...

VBA (411) Office2016 (295) フォーム (259) クエリ SQL (235) Office2021 or 2019 (233) テーブル (145) レポート (134) Office2013 (64) Microsoft365 (59) Office2010 (55)

Accessのテーブルやクエリのデータを貼り付ける場合は下記で、Markdown書式のテーブルに変換して貼り付けてください。