※ ChatGPTを利用し、要約された質問です(原文:Excel マクロ VBA: 抽出条件に一致したデータ全体を別シートに貼り付け)
ExcelマクロVBA:抽出条件に一致したデータ全体を別シートに貼り付け
このQ&Aのポイント
ExcelのマクロやVBAを用いて、特定の条件に一致するデータを別のシートに自動的に転記する方法を教えてください。
シート1にはマスターデータが記載されており、特定のキー(優先順位と解決状況)を基準にしてデータを抽出してシート2に転記したいと考えています。
具体的には、優先順位が「最優先」かつ解決状況が「完了」のデータを抽出し、シート2に転記したいです。その後、同じように優先順位や解決状況の組み合わせに基づいて他のシートにもデータを転記したいと思っています。
Excel マクロ VBA: 抽出条件に一致したデータ全体を別シートに貼り付け
以下の処理を教えて頂ける方がいらっしゃいましたらご教示ください。
状況: Excel Sheet1にマスタデータを記載 (600行くらい)
行いたい処理: 特定キー (今回の場合は、対応優先順位とその解決状況)を基準に、その特定キーに該当するデータを別シートに自動的に転記するマクロかVBAを組みたいと考えています。
具体例
シート1 : マスターデータ
(注: 上段のABC名はカラム、同様に一番左の数字は行番号)
A B C D E F
1 ID 日付 課題 優先順位 備考 解決状況
2 1 2007/10/20 a 最優先 12 未完
3 2 2007/10/25 b 高 12 完
4 3 2007/10/20 c 最優先 12 未完
5 4 2007/10/24 d 最優先 12 完
6 5 2007/10/27 e 高 12 完
7 6 2007/10/20 f 高 34 完
8 7 2007/10/23 g 高 34 完
9 8 2007/10/23 h 最優先 34 完
10 9 2007/10/20 i 中 34 完
11 10 2007/10/23 j 低 56 完
12 11 2007/10/25 k 中 5656 完
13 12 2007/10/20 l 最優先 78 完
14 13 2007/10/27 m 低 89 完
15 14 2007/10/27 n 最優先 9 未完
上記マスタデータから優先順位と解決状況キーにして、”最優先”且つ、”完”のデータを自動抽出しSheet2に転記。
A B C D E F
1 ID 日付 課題 優先順位 備考 解決状況
2 3 2007/10/20 c 最優先 12 完
3 8 2007/10/23 h 最優先 34 完
4 12 2007/10/20 l 最優先 78 完
後続処理として、シート3では、優先事項”最優先”且つ、"未完了"のデータを自動抽出/転記。 シート4以降は、他の優先順位とその解決状況(例、”高””完”の組み合わせ等)を上記同様に分けて各シートへの自動転記を希望しています。
恐れ入りますが、どなたかこの対応方法をご存知でしたらご教示ください。 宜しくお願い申し上げます。
お礼
以前教えて頂きました件、お礼が遅れて申し訳ありませんでした。 情報を頂き感謝しています。
補足
Mystleaf様 仰るとおり、ボタンひとつでの作業を希望しています。」 複数の人が共有するシートですので、可能な限り作業を楽にしたいと思っています。 教えてくださった式を組み込んでみたいと思います。 トライした後、ご報告申し上げます。 取り急ぎ、お礼まで。