特定の文字(部分一致)で検索する

Pocket

ある特定の文字を含むデータだけ抽出する方法です。

下の図のように簡単なフォームを作ります。フォームデザインでフォームを
作り、テキストボックスとコマンドボタンを配置するだけです。
2806061
コマンドボタンに次のVBAコードを入力します。
Private Sub コマンド2_Click()
DoCmd.OpenForm “車一覧”, , , “車名 Like ‘*” & Me!テキスト0 & “*'”
End Sub

実行結果です。
2806062
これは部分一致のVBAコードなので、下の図のような検索もできます。
2806063
部分一致でも最初の文字のみの指定もできます。
そのときのVBAコードです。
Private Sub コマンド2_Click()
DoCmd.OpenForm “車一覧”, , , “車名 Like ‘” & Me!テキスト0 & “*'”
End Sub
2806064
このような設定もできます。

特定の文字を入力するだけで、それに該当するデータを引っ張ってきてくれる
ので、システムを組む場合は、是非組み込みたい機能です。

=================================
5月の忙しさが嘘のように落ち着いた日々が続いています。
そうならないように忙しい時期に種まきをしないといけない
と毎年思いますが、時すでに遅しという感じです。

本日も最後までお読み頂きありがとうございます。