エクセルVBAで作るワークシート内検索窓

この検索マクロは元々は透析データベースとして作りましたマクロの一部分です。当時透析室のスタッフでしたが、経過表や処方箋を手作業で毎週作っておりました。その手間ひまを何とかできないかと思い立って作ったのが透析データベースです。

その透析データベースで８０人近くいらっしゃった患者さんの情報の修正のために、エクセル名簿を検索する必要がありました。そのために作りましたのが今回ご紹介する検索窓です。

あらかじめ入っているシート

反転した範囲が検索するところ(初期設定）

左の画像は、ダウンロード時にあらかじめ入っているワークシートです。ファイルをダウンロードすると、あらかじめテスト用のワークシートが入っております。このワークシートは作者が使っていたものですので、お使いになる際にはご自分が使っているワークシートをこの上からペーストしてください。

新しく名簿を作る場合にはこのままお使いになっていただいてもかまいません。注意点としては、

検索は上から３行目からが対象になっています。（マクロを変更することで変えることはできます）ですのでデーターは３行目から記載してください。

１個ボタンが配置されておりますのでこれは消さないようにしてください。（もちろんごじぶんでカスタマイズされる場合は別です）

そのほかは特に制限はありません。各項目のタイトルは自由に変えてください。一番上の行には数字が列ごとに書いてありますが消してくださってかまいません。特に動作には関係ありません。

ただしワークシート名(初期では"透析患者リスト”）を変える場合には別と定めてある作業が必要です。この作業については

「検索窓を使うための準備」をごらんください。

ダウンロードしていただきましたエクセルファイルはZip形式で圧縮しておりますので、解凍します。

解凍しますと左の絵のようなファイルが表れます。このファイルをダブルクリックします。

先ほどのファイルをダブルクリックしますとしばらくして「マクロの警告」画面が出ます。これはたちの悪いマクロの場合パソコン内のデーターを破壊するものもあるためです。

検索機能を使う場合はここで「マクロを有効にする｣を押さないと使えません。

検索機能は使わずにとりあえず中身を見たい場合は「マクロを無効にする」を押していただいてかまいません。

ここでは、前の画面で「マクロを有効にする」を押したことを前提に書かせていただきます。

「マクロを有効にする」を押してしばらくすると左の絵のような画面が開きます。これが検索する対象になるワークシートです。

ワークシート左上の「検索フォームを表示」をクリックすると検索窓が出てきます。

左の絵のような検索窓が出てきます。

一番上の丸で囲ったところの入力欄にキーワードを入力します。

検索窓のキーワード入力欄に入力しましたらキーワード入力欄の右下の「検索」ボタンを押します。

もし検索はしないで検索窓を閉じる場合、もしくは検索が終わって検索窓を閉じる場合には検索窓の一番下にあります「終了」ボタンを押してください。検索窓は表示されなくなります。

検索窓へキーワードを入力して「検索」ボタンを押した後の画面が左の画像です。検索結果が出たところです。

検索キーワードに該当する名前があった場合には舌の大きなリストウインドウに表示されます。

そのリストウインドウの名前をクリックしますとワークシート上でもその名前のところが選択状態になります。

フォームは表示したままでワークシートの書き込みや削除など編集が行えます。