Excelのセルの色を変えた行(すべてのシート)を別シートに抽出したい

Excelの条件付き書式で特定の文字が含まれる行の色を変えています。
シートの数30シート程ある(すべてではない)色を変えた行のみを
別シート(１シートの中)に抽出したい場合どのようにするのが最適でしょうか。

No.3 回答者： googoo900 回答日時： 2024/08/02 01:34

マクロは使えないとのことですので、別シートに集めるのは手作業でやるのがよさそうです。

◆手順
１．すべてのシートのデータを抽出シートにコピペする。(これ以降は抽出シートでの作業)
２．条件付き書式で行の色を変えた式を使って、作業列に色を変えたセルは1、色を変えてないセルが0 or 空白になる数式を入れる。
４．作業列を第一優先にして並べ替えを実行する。
５．作業列が1の行(つまり色を付けた行)とそうでない行を分けることができたので、不要な行を一括削除したら完了。

『別シートに集める』と『並べ替え』のどちらを先にするかについては、上記手順に書いたように、『別シートに集める』のを先にするほうが効率がよいです。
理由は、並べ替えが1回ですむことと、元データに手を加えなくてもよいことです。


PS
関数で抽出しようとすると、抽出先のシートは関数で埋め尽くされることになりますので、実用的でないと思われます。
・動作が遅くなる。
・データの数がわからないと必要以上の範囲に関数を設定する必要がある。

No.2 回答者： fujillin 回答日時： 2024/07/26 12:57

No1です。

＞その場合はどのような関数になりますでしょうか？
あのね・・
質問者様がどのようなシートを元に何をなさりたいのか、そのシートを見ているわけではないので、「関数を示せ」と言われても当方にはわかりようもありません。

バージョンも不明ですが、365等のスピル機能を使えるものであれば、
　FILTER(対象範囲, 条件式)
で、1シート分のデータ抽出が可能です。
https://support.microsoft.com/ja-jp/office/filte …


例えば、Sheet1のA:Cの3列からなるデータで、Ｂ列が"有料"である行のみを抽出したいのなら
　=FILTER(Sheet1!A:C,Sheet1!B:B="有料","")
とでもしておけば良いでしょう。
これを、Sheet1、Sheet2でまとめて抽出したいのなら、
=VSTACK(FILTER(Sheet1!A:C,Sheet1!B:B="有料",""),FILTER(Sheet2!A:C,Sheet2!B:B="有料",""))
とすることなどで可能です。

一発で求めようとすると式が長くなるので、各シートで抽出しておく方式にして、集計したいシートでは、
（仮に、F:H列に抽出しておくとして）
　=VSTACK(Sheet1!F1#,Sheet2!F1#)
のような式で集計する方法にしておく方が簡単になるでしょう。


※ 質問者様のシートの状態や抽出条件がどうなっているのかわかりませんが、要領は上記のような感じですので、あとはご自身の状態に合わせて考えてください。
出来ないようならば、手操作という選択肢もあります。

この回答へのお礼

無知ですみません。
ご丁寧にありがとうございました。

参考にしてやってみます！

お礼日時：2024/07/26 14:03

No.1 回答者： fujillin 回答日時： 2024/07/25 17:30

こんにちは

1）関数等で行う方法
関数等では条件付き書式の色を判別することはできません。
ですので、条件付き書式の条件そのものを利用するか、あるいは作業列を設けて転記したい行にマークを（例えば、○とか連番とか・・）を設けておくことで判別が可能になります。

判別さえできれば、関数での抽出は可能ですので、各シートから抽出すれば良いでしょう。
ただし、対象が30シートあると「詰めて抽出」する場合には、少々面倒かも知れません。
365等の環境であれば、一旦中間シートに各シートを別列で抽出しておいてから、更に各列を連結するという手順にしておけば、「詰めて抽出」も比較的容易にできます。


2）マクロで行う方法
マクロであればセルの色を判定することは可能ですので、抽出列の判別は簡単にできます。（もちろん、条件付き書式の条件を用いても可能です）
各シート、各行を2重ループで処理するような手順にしておけば、さほど難しくはないと思います。
ただし、質問者様がマクロを扱えることが条件にはなりますが・・


3）手操作で行う方法
1）で記した条件式を利用するか作業列を利用する方法で、対象範囲に対してフィルターをかけます。
その上で、コピペを繰り返せば良いので、30シート程度であればそれほど時間はかからないと思います。
あるいは、この手順を「マクロの記録」で記録しておけば（若干の手直しが必要かも知れませんが）、各シートで実行すればコピーを繰り返すことも可能でしょう。

この回答へのお礼

沢山の候補をありがとうございます！

マクロは触ったことがありませんので
1)の関数で行う方法でしてみようかと思います！

その場合はどのような関数になりますでしょうか？
例えば特定の文字が『有料』と条件付き書式で設定していた場合、この条件を利用できるなら適用したいと思っております！

お礼日時：2024/07/26 07:40