Microsoft Access 掲示板

Microsoft Access 掲示板

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

11 コメント
views
4 フォロー
1
hatena 2022/03/25 (金) 13:07:51

現在は、目的ごとに検索画面を立ち上げて検索しております
目的ごと3画面を作っております

これはVBAで実装してますか。
もしそうなら、そのVBAを提示してください。

通報 ...
  • 2
    mov8 2022/03/25 (金) 15:00:34 2a2fa@fa904 >> 1

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

    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