• ベストアンサー

Exvelで、特定の文字が含まれる行(レコード)を抽出したい

 一般的な顧客データベースをExcelで作成して おりますが、例えば資格を複数持っている人がいる 場合を考えて、資格1、資格2・・・という風に列を分けて入力しております。  資格は特に順番(ヘルパーなら資格1とか)を特に考えずに入力しておりますので、資格1にヘルパーと入力されている人と、資格3にヘルパーと入力されている人がおります。  オートフィルタでは特定の列だけしか抽出されませんので、列うんぬんは関係なく、例えばヘルパーを含む人の行だけを抽出したいです。  何かの機能か、マクロで実現できたらうれしいです。よろしくお願いします。

質問者が選んだベストアンサー

  • ベストアンサー
  • toshi_2000
  • ベストアンサー率30% (306/1002)
回答No.1

資格1,2・・・の文字列を連結した式を入力したセルに対してオートフィルタを適用すればどうでしょう。

reimy1
質問者

お礼

レスありがとうございます。確か文字列連結の関数があったと思いますので、試してみます。参考になります。

全文を見る
すると、全ての回答が全文表示されます。

その他の回答 (2)

noname#204879
noname#204879
回答No.3

》 オートフィルタでは特定の列だけしか抽出されません… [フィルタオプションの設定]なら「例えばヘルパーを含む人の行だけを抽出」出来ます。

reimy1
質問者

お礼

ご連絡ありがとうございます。フィルタオプションの設定もいけそうですね。昔習いましたが、思い出しながら試してみます。

全文を見る
すると、全ての回答が全文表示されます。
  • mshr1962
  • ベストアンサー率39% (7418/18948)
回答No.2

1.作業列で、「=資格1&資格2&資格3」のようにして、この列で検索する。 2.「フィルタオプションの設定」を使う http://office.microsoft.com/ja-jp/assistance/HP052001781041.aspx 3.マクロを使って、特定のセルの内容を条件にしたオートフィルターを作成する。 上記のいづれかですね。

reimy1
質問者

お礼

初めまして。作業列を作成してワードを連結するのは思いつかなかったです。ためしてみます。

全文を見る
すると、全ての回答が全文表示されます。

関連するQ&A

  • エクセル特定の文字を含む行の抽出方法

    すいません!至急で困っております。 何千という行の中から、例えばヨドバシカメラという文字を含む行を抽出したい場合はどうすればいいでしょうか? ヨドバシカメラ~店という行なので、単純にオートフィルタでは抽出できません。 オートフィルタのオプションからもうまくいかず。。 すいませんが、何卒よろしくお願いいたします。

  • エクセルで、異なる日付の入っている行を抽出する。

    1 あ  20060102  20060102  さる 2 い  20060203  20060203  いぬ 3 う  20060303  20060301   きじ 4 え  20060404  20060404  ねこ 5 お  20060501           わに 2つの列に年月日が入力されてますが、上のように数値として入力されています。 5の行のように右の列の日付が空白になっているものもあります。 この中から2つの列の日付を比較して、両方に日付が入力されていてかつ異なる行を下記のように、抽出したいのです。 3 う 20060303 20060301 きじ オートフィルタのフィルタオプションでやろうと思ったのですが、うまくいきませんでした。 よろしくお願いします。

  • 列から特定の文字列検索→該当以外の「行」隠すマクロ

     顧客情報のマクロを組んでおります。  2列目  3列目   総務課 鈴木一郎  営業課 山本一郎  庶務課 田中一郎  営業課 本田一郎  …といったデータがあります。  「総務課」というボタンをおしたら、   2行目の中から、「総務課」という文字列を探し出し、  (オートフィルタの作業そのものなのですが)それ以外の行は「隠す」にしたいと思っております。  総務課の人間だけを表示するようなマクロにしようと。    これまでオートフィルタを使用したマクロを組んでいたのですが、  どうもオートフィルタボタンが表示されてしまうと、表が見づらくなるので、美しくありません…。  そこで、このようなマクロを作ろうと考えました。    とくに「ROW2」から特定の文字列を検索して…  という下りがわかりません。  アドバイスをいただけると、ありがたく思います。  どうぞ、よろしくお願いいたします。  

  • データベースの最後の行は抽出対象にしたくない

    大変初歩的な質問かもしれないのですが、データベースの最後の行に、「合計」が入っている場合、(例えば年間売上表など)オートフィルタを使い、例えば「30,000以上」で抽出しても、最後の行は抽出されないようにすることはできるでしょうか? また「トップテン」を使い、「上位5項目」で抽出した際、合計行以外を抽出対象としたい場合などもあります。 オートフィルタでの抽出の際に、範囲を決めて抽出することはできるのでしょうか? 教えていただければ大変助かります。どうぞ宜しくお願いします。

  • Excelで特定文字が含まれる行の別のセルをずらす

    添付画像にあるように、2つの列に記号とキーワードが入力されており、上から順番に検索し、キーワード列に特定文字(この場合”りんご”)を含むセルがある場合、記号列のみを下に順番にずらしていきたいと思っています。 行数が1万行くらいある為、マクロなどで実現したいです。 よろしくお願いいたします。

  • Excelのオートフィルタでデータ抽出するマクロについて

    オートフィルタで指定した期間のデータ抽出のマクロを作成しているのですが上手くいきません。 例えばA列に 10月29日 11月1日 11月3日 11月5日 と日付を入力しており、B列、C列にデータを入力していたとして D列1行目に10月31日、D列2行目に11月4日と入力し D列1行目からD列2行目までと指定したデータを抽出するマクロを教えていただけませんか。 マクロ初心者で、困っております。どうかよろしく御願いします。

  • エクセル抽出について

    初歩的な質問で大変恐縮です。 エクセルで10列×5行でひとまとまりの下に続く表があり、その中の1列目2行目に入力してある「支店」別にデータを抽出したいと思っています。オートフィルタを使うと1行づつなら抽出できるのですが、10列×5行のまとまりごと抽出する方法はありますでしょうか? つたない文章で申し訳ありませんが、ご教授ください。

  • エクセルで、データのある行だけを抽出したい。

    エクセルのSheet1にデータが入っており、セルが空白でない行のデータのみを、Sheet2に抽出したいと思っています。 Sheet2にあらかじめ関数を入れておく方法にしたいため、関数について教えてください。 タイムテーブルで予定を管理するような表で、A~Hまでにデータが入っています。 予定を入れる際にはE列には必ず入力をするため、E列が空白でない行のみを抽出したいです。 A|B|C|D|E|F|G|H 月|日|時間|… 11|22|10:00|… 11|22|10:30|… 時間枠は10:00~17:00の30分刻みで、1日15行使用するので、1年で5475行まで使用します。 1行目はタイトル行なので、データは2行目から入力しています。 フィルタオプションで抽出する方法や、それをマクロで登録しておく方法は分かったのですが、あとから予定を追加することがあるため、マクロを実行する度にデータが置き換わると困ってしまいます。 また、抽出したSheet2のI列以降には備考などを入力したいため、やはり後から列がずれると困るため、A~H列に関数を入れておく方法で実行したいと思います。 よろしくお願いいたします。

  • EXCELで100行に1行ずつ抽出したい

    現在卒業研究中でエクセルを使っています。 そこで分からない事があるんですが、約10万行のデータがある列から100行に1行ずつ抽出し、横に1000行の列を作りたいと思ってます。 抽出する行は[1,101,201...]や、[100,200,300]等、番号は問いません。ただランダムではなく、100行ずつ順番に並べたいです。 どなたか詳しい方いらっしゃいましたら、教えていただけないでしょうか? よろしくお願いいたします。

  • 重複しないレコードを抽出するとオートフィルタの矢印が消える

    リストを作成しています。 B列に氏名が入っています。その他C列には地域、D列には分類などそれぞれのデータが入力してあり、オートフィルタで抽出できるようになっています。 ここでB列の重複しない人の名前をAF列に抽出・転記したマクロを作ったのですが、マクロが動作すると同時に、今まであったオートフィルタの矢印も消えてしまいます。 重複しない人の名前を抽出・転記したあとも、今まで通りオートフィルタの矢印(機能)を表示するにはどうしたらいいのでしょうか。 Private Sub Workbook_Open() With Worksheets("顧客管理表") .Columns("B").AdvancedFilter _ Action:=xlFilterCopy, _ CopyToRange:=.Columns("AF"), _ Unique:=True .EnableAutoFilter = True End With End Sub いろいろ試したのですが、ダメでした。よろしくお願い致します。

専門家に質問してみよう