[[20090424151925]]　『コマンドボタンを押してシート内からワード検索』（ぷうさん）　ページの最後に飛ぶ

『コマンドボタンを押してシート内からワード検索』（ぷうさん）

エクセルに関してはズブの素人ですが、シートの中からデータを検索する方法を教えて頂きたくお伺い致しました。
CTL+Fではなく、セルにキーワードを入力し、コマンドボタンを押すと、該当するキーワードが存在する行のみが表示されるというものを作りたいのです。

例えば、

 　　  A          B           C           D

1　　　 21 　　　みかん　　　　　100円　　　 ○店

2　　　　32　　　りんご　　　　　120円　　　　×店

3　　　　48　　　ぶどう　　　　　130円　　　　○店

4　　　　50 　　　トマト　　　　　150円　　　　○店

というシートがあった時に、E1のセルに「トマト」と入れてコマンドボタンを押すと4の行が表示される、「○店」と入れてコマンドボタンを押すと1、3、4の行が表示されるというものを作りたいのですが、どうしたら良いのかわかりません。
どなたか教えて頂けないでしょうか。
お願い致します。

 データ＞フィルタ＞オートフィルタではご不満でしょうか。
(みやほりん)(-_∂)b

アドバイス有難うございます。
今までオートフィルタとCtl+Fでやっていたんですが、行が2000ほどありまして、オートフィルタでは不便で、また素早く検索する必要があるということで、上記のような方法にできないかな、と思いまして・・・。

 衝突！

 >行が2000ほどありまして、オートフィルタでは不便で

 2000程なら重くはならない気がするのですが、数式がたくさんあるのですかね？
 せっかく書いてしまったので、敢えてもう一度オートフィルタ案で押してみます＾＾；

 一番上から3行くらいは検索語句を入力するために空けておいて、入力行のそれぞれの列に
 検索語句を打ち込むと、ボタンを押さなくてもオートフィルタが自動でかかる、という様な物が
 便利かなと思ったりしたのですが、そのようにレイアウト変更する事は可能ですか？

 下記のような感じで。

       [A]    [B]    [C]    [D]
 [1]  数量   品名    値段   店名

 [2]  入力   入力    入力   入力　←ここに検索したい語句を入力

[3]

 [4]  数量   品名    値段   店名  ←ここにオートフィルタを設定しておく

 [5]  21     みかん  100円  ○店

 [6]  32     りんご  120円  ×店

 [7]  48     ぶどう  130円  ○店

 [8]  50     トマト  150円  ○店

 これなら
 >素早く検索する必要がある
 というニーズは満たせると思いますが・・・。

 このような事で良いなら、コード組んでみます。

 (Dil)

 ツールバーで右クリック、ユーザー設定。
コマンドタブの分類データからオートフィルタコマンドのボタンを
任意のツールバーへドラッグ＆ドロップ。オートフィルタボタンが
作成されます。
このボタン、データメニューのオートフィルタコマンドとは違った
働きをします。
　
普通にデータ範囲にオートフィルタを設定。
見出し行の直下（１行目が見出しなら２行目）に行挿入。
この挿入した２行目を検索データ入力列としておきます。
任意のフィールドの２行目のセル（例えばB2）に「トマト」と入力、
B2を選択したままオートフィルタのボタンをクリックするとB列が
「トマト」である行が抽出されます。
　
※入力行を設定しなくても、リストから抽出したいデータを選択して
オートフィルタボタンをクリックするだけでもいいのですが。
「全て表示」のボタンも作っておいたほうが楽でしょう。
　
また、マクロなら、習作で次のようなものも作ったことがあります。
イベントで動くので、ボタンクリック不要。
[オートフィルタをマクロで]
http://miyahorinn.fc2web.com/schooltxt/filta20.html
(みやほりん)(-_∂)b

お二方、有難うございます。
それで対応してみます。

コメント返信：

[ 一覧(最新更新順) ]

[[20090424151925]] 『コマンドボタンを押してシート内からワード検索』（ぷうさん） ページの最後に飛ぶ

[[20090424151925]]　『コマンドボタンを押してシート内からワード検索』（ぷうさん）　ページの最後に飛ぶ