• 締切済み

オートフィルターで一つずつ抽出したものを....

Bの行にオートフィルターをかけ、列の11で一つずつ抽出したものをコピーし、新規シートに貼り付けたいのですがどうやれば良いですか? 見出し『商品』として抽出されるもの全て新規シートにそれぞれコピーしたいです。 VBAの場合、初心者ですのでわかりやすくお願いします。 わかる方には面倒な事ばかりで申し訳ありませんが宜しくお願いします。 エクセル2010です。

みんなの回答

  • MackyNo1
  • ベストアンサー率53% (1521/2850)
回答No.3

>抽出された項目ごとに自動で新規シート作成して、コピーしたいのです。 >Ｆａｘ用紙として複数の相手にそれぞれ送りたいのです。 >貼り付けは、値のみで構いません。 補足説明になっていません（基本的に質問の内容と大差ありません）。 どのようなデータベースからどのようなデータをFAX用紙にしたいのでしょうか？ 例えば、ある列に特定の名前のあるデータだけの表を作成したなら、特定の名前をリストにして選択し、その該当データを関数で表示することも可能です。 すべての名前に対して一覧を印刷したいような場合は、VBAで対応することになりますが、この場合も関数と併用して表示するのが簡単です。 オートフィルタで対応する場合は、単純にフィルタしたデータを新規シートにコピー貼り付けするだけで目的は達成されそうです。 いずれにしろ、もう少し具体的にどの部分がわからないのか、例示されたほうが良いと思います。

jungjuin10
質問者

補足

現在別シートに入力された発注数が、ＦＡＸ専用に作ったシートに 反映されます。 ＦＡＸ専用シートにはＡ商品コード、Ｂ商品名、Ｃ発注数、Ｄ納期 Ｅ仕入先業者名などとなっています。 Ｅ仕入先業者名にオートフィルターをかけそれぞれの業者へＦＡＸ発注するのですが、現在仕入先業者ごとに表示して新規シートにコピーしプリントしてＦＡＸしています。 この単純な作業を簡略化したくて質問しました。 オートフィルターで例えば１０件の業者が出たら、１０件にそれぞれ対象になる、商品コード、商品名、発注数、納期が記されたＦＡＸを送ります。 Ｅ仕入先業者名はＦＡＸ専用シートの上の方に○○(株)　御中と言うように 表記されるようになっています。 まだ補足説明足りないでしょうか？ オートフィルター以外の方法でも構いませんが、現在できているものを 使っていきたいので宜しくお願いします 　　　

noname#204879
noname#204879
回答No.2

》 Bの行に…をかけ、列の11で…抽出したものを… 上の「行」と「列」は“てれこ”になってませんか？つまり、… 　 Bの列に…をかけ、行の11で…抽出したものを… 列記号・行番号とはいうけれど、行記号・列番号は聞いたことないなぁ～ シッカリしてくださいネェ～！

  • MackyNo1
  • ベストアンサー率53% (1521/2850)
回答No.1

オートフィルタで抽出されたデータをそのまま新規シートにコピー貼り付けすれば、その抽出されているデータだけが貼り付けられますが、どのような形式のコピー貼り付けをしたいのでしょうか？ 目的などを含めて、ご希望の操作をもう少し具体的に例示してください。

jungjuin10
質問者

補足

質問が分かりにくくてすみません。 抽出された項目ごとに自動で新規シート作成して、コピーしたいのです。 Ｆａｘ用紙として複数の相手にそれぞれ送りたいのです。 貼り付けは、値のみで構いません。 どうぞ宜しくお願いします。

  1. カテゴリ
  2. パソコン・スマートフォン
  3. ソフトウェア
  4. その他MS Office製品

関連するQ&A

  • オートフィルターで抽出してコピー＆印刷するマクロ

    いつもお世話になります。 エクセル2002です。 (1)オートフィルターでデータを抽出（部署ごと）する。（インプットボックスで） (2)抽出された行を１行ずつコピーし、【編集シート】のＡ1セルに貼り付け (3)【印刷シート】の印刷 （データが３行あれば３枚の印刷がしたいのです） 《データ》 　　Ａ列　　Ｂ列 1　（部署）（商品名） 2　　01　　　商品1 3　　01　　　商品2 4　　02　　　商品1　 5　　02　　　商品3 ・・・・・・・・・・ ---------------- Sub Macro1() Dim 部署 部署 = InputBox("部署コードを入れてください") Selection.AutoFilter Field:=1, Criteria1:=部署 Range("A1").Select End Sub ------------------ ↑のマクロにどう追加すればよいのかわからないので、教えてください。 よろしくお願いします。

  • Excel2003　オートフィルタで「*」を抽出

    Excel2003でオートフィルタを使って文字列「*」を含む行を抽出したいのですが、どのようにすれば抽出できますか？

  • ＥＸＣＥＬのオートフィルタのコピーについて

    ＥＸＣＥＬ２０００を使用しています。 オートフィルターにて抽出し一部をコピーし同じシートの別の列に貼り付けすると 隠れている行にもコピーされ表示されたところだけにコピーされません。 よい方法はありますか？

  • エクセルＶＢＡでフィルタ抽出部分のみのコピー

    エクセルＶＢＡで売上帳を作成していますが、オートフィルタでデータ抽出した後、表示されている行のみをコピーして別シートに貼りつけるにはどうすればよいのでしょう？ 別シートは指定したセルに値のみの貼り付けをしたいと思っています。 宜しくお願いします。

  • エクセル・オートフィルタを使わず関数で抽出をするには

    excelのデータで、該当する項目のある行のみの抽出をオートフィルタもマクロも使用せずに、関数で行う方法があれば教えてください。 　　　　A B 1　　桃太郎　123456 2　　猿　　　122222 3　　キジ　　123555 4　　桃太郎　122245 　　　… 1000　桃太郎　002145 ↑このような表で「桃太郎」だけを抽出したいのです。 イメージとしては、ボックスに「桃太郎」と入力するだけで結果が一覧として出るようなものを作りたいのです。 さらにＢ列が昇順に並び替えされていると、なおよいのです。 随時更新するデータなので、その都度の最新の表が欲しいのです。 オートフィルタ→並べ替えをすれば簡単なのですが、エクセルを全く使えないような人がいる職場環境でして、教えるのが面倒というのとデータがぐちゃぐちゃになったら困るので、誰でも簡単にできる方法はないものかと考えています。 また環境的にマクロはあまり使いたくないのです。 よろしくお願いします。

  • VBA のオートフィルタについて

    ExcelVBA初心者でございます。 2点質問がございます。 (1)エクセルVBAのオートフィルタの機能を使い、"マスタ0701"シートの13行目が”ABC”の行を、"検索結果"というシートにコピーしたいです。 以下のマクロを実行しますと、まず"マスタ0701"のB1のセル（13行目はブランク）がコピーされ、その下に13行目が”ABC”に該当する行がコピーされます。 なぜ、B1セルまでコピーされるのかご教示頂けますと幸いです。 (2)また検索結果だけでなく、オートフィルタのタイトル行もコピーするようにするにはどうしたら良いでしょうか？ よろしくお願いいたします。 Sub 絞り込み() With Worksheets("マスタ0701").Range("A1") .AutoFilter Field:=13, Criteria1:="ABC" .CurrentRegion.SpecialCells(xlVisible).Copy Worksheets("検索結果").Range("A1") .AutoFilter End With End Sub

  • オートフィルタでデータ抽出したものをコピー

    こんにちは。 excelでオートフィルタでデータを抽出したものをコピーし違うsheetに貼り付けると、欲しいデータだけでなくすべてのデータが貼り付いてしまいます。欲しいデータだけ貼り付けるやり方を教えてください。 よろしくお願いいたします。

  • オートフィルタで抽出したデータの切り取り

    エクセルのオートフィルタ機能でデータを抽出した時、 そのデータを切り取ると抽出したデータの最初の行から最後の行までが切り取られてしまいます。 (表示(抽出)されていないデータも一緒に切り取られてしまう) 抽出されたデータだけを切り取る方法はありませんか？ コピーではなく切りとっていきたいのです。

  • オートフィルタ抽出データのみ

    エクセルで　オートフィルタで　抽出するさいに その列に打ち込まれている内容が選択できますが　その打ち込まれているものだけ　別シートにほしいのですが　方法はありますか？ 下記のエクセルシートで　フィルタした場合　Aの抽出データの「青　赤　黄」を別シートに 　A 　B 　C　 D 1 青 10　済　A社 2 赤 50 未　B社 3 黄 10　済　A社 4 赤 10　未　B社 5 青 11　済　F社 6 ↓ 　A 　B 　C　 D 1 青 2 赤 3 黄 4 5 上記のようにしたい場合どうしたらいいかお願いします。

  • オートフィルタの結果を違うブックに貼り付ける

    マクロの初心者です。 Excel2003を使用しています。 仕事で作らなくてはならなくなったのですが、思うように動いてくれません。 【A・Bとブックが二つあります。AのブックのセルDにランダムで文字を入力します。その文字をコピーし、Bのブックを開き、オートフィルタでコピーした文字を貼り付けて、抽出します。その結果を上から３行コピーしてAのブックの他のシートに貼り付ける。】 このマクロを作りたいのですが、うまく出来ません。 あまり難しくないマクロで出来ればいいと思います。 よろしくお願いします。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する