#264 検索ダイアログをボタンのクリックで表示させるには? フォーム、VBA

Accessでは、[編集]-[検索]メニューによって検索ダイアログを表示させることができますが、コマンドボタンのクリックによって特定のテキストボックスを対象とした検索ダイアログを表示させる方法です。

以下の例では、"cmd検索"という名前のボタンをクリックすることによって、"顧客名"という名前のテキストボックス(フィールド)を検索対象とした検索ダイアログを表示します。
Private Sub cmd検索_Click()
'cmd検索のクリック時イベント

  'フォーカスを顧客名に移動
  Me!顧客名.SetFocus
  '検索ダイアログを表示
  DoCmd.RunCommand acCmdFind

End Sub

実行結果
検索ダイアログ
| Index | Prev | Next |

この情報は参考になりましたか?、問題は解決しましたか?、もしまだなら......
T'sWareのワンポイトテクニカルアドバイスをご利用ください。3000円/件〜でご支援します。
スタンドアロンからSQL Server対応まで、オーダーメイドのシステムを短納期・安価でお届けします


Copyright © T'sWare All rights reserved