HOME > 即効テクニック > AccessVBA > Access設定 > [検索と置換]ダイアログボックスをコマンドボタンのクリックで表示する

即効テクニック

Access設定

[検索と置換]ダイアログボックスをコマンドボタンのクリックで表示する

(Access 2000/2002)
フォームやクエリを開いて[検索と置換]ダイアログボックスでレコードの検索を行う事ができます。

この[検索と置換]ダイアログボックスを、コマンドボタンをクリックして表示するようにするには、SendKeysステートメントを使います。

SendKeysステートメントは、キーストロークまたはキーストロークの組み合わせを、キーボードから入力したときと同様にアクティブウィンドウに渡します。

サンプルプロシージャでは、フォームに配置されたコマンドボタン「コマンド0」をクリックした時に発生するイベント「Click」で、[検索と置換]ダイアログボックスを表示する処理を行っています。

Private Sub コマンド0_Click()
    
    SendKeys "%EF", True

End Sub

「%」は[Alt]キーを表します。[Alt]キー+[E]キー+[F]キーで、[編集(E)]メニューの[検索(F)]をクリックしたときと同じ操作が行われます。