エクセルのオートフィルタで各項目別に自動保存するには？

質問

エクセルでオートフィルタで項目別にフィルタをかけた抽出結果を自動保存していく事は出来ませんでしょうか？

最終的には４、５列にわたる複数条件のオートフィルタによる抽出結果を保存したいのですが
第一列目だけでも項目別に自動的に保存が出来るような方法はありませんでしょうか？
関数では、出来ないようなのでＶＢＡによるものだと思うのですがやり方が分からないです。

具体的な例を簡素化した感じにすると、以下のようなものとなります。
（列の順番は固定的ではありません）

Ａ　発送受付支店（４０ポイント）
Ｂ　発送日付
Ｃ　発送先別（３０エリア）
Ｄ　受付担当者（１５人）　
Ｅ　受付番号
Ｆ　入金確認

手作業で一つ、一つ保存していく事は可能なのですが
頻繁なデータ更新により変化する度に、多数の項目を保存していくのに効率の良い方法をお教え下さい。
分かりづらいかもしれませんが、宜しくお願い致します。

回答No.4

mshr1962 · ベストアンサー

「フィルタオプションの設定」を使う方法もあるのでは？

別シートに
同じ項目で抽出する内容を設定しておきます。
「データ」「フィルタ」「フィルタオプションの設定」で
「リスト範囲」に現在の表の範囲
「検索条件範囲」に設定した条件の範囲
「抽出範囲」に保存する先の範囲（左上のセルでＯＫ）
でＯＫして実行する。

数が多い場合はマクロの記録で作業をショートカット化すれば楽です。

抽出する内容の設定の詳細はヘルプをご覧ください。

お礼

お礼遅くなってすいません。
大変助かりました、ありがとうございました。

回答No.3

noname#8185

＃１さんのようにマクロを使用すればいいのですが

フィルタはいらないものを隠しているだけです。
完璧に分けるようでしたら長くなりますが

お礼

回答、ありがとうございました。

回答No.2

deecyan

＃１です
半分ねむいので　説明忘れていました

シート全体を選んでコピーして
新しいシートにコピーすれば　結果のみが
コピーされるよ

後はマクロの作り方です　＃１をよんでやってみてください

回答No.1

deecyan

ツール　マクロ　新しいマクロの記録として

セル全体を選ぶ
コピーする
挿入-> ワークシートとする
A1を選んでペースト

ここでマクロの記録を終わると
下記のようなマクロの出来上がり！！

Sub Macro1()
Cells.Select
Selection.Copy
Sheets.Add
ActiveSheet.Paste
End Sub

あとは　表示ツールバー　フォームとして
ボタンを選び 上記のマクロを登録すればよい

お礼

お礼が遅くなり大変申し訳ありませんでした。
皆様のおかげで、なんとか出来ました。
ありがとうございました。