• ベストアンサー

エクセル 重複行の編集 色をつける

お世話になります。 エクセル2000にて以下のような表を作りました。    A |B |C 1 名称|1/11|123 2 ああ|1/11|456 ←行全体に色を付けたい 3 ああ|1/12|789 4 いい|1/11|999 ←行全体に色を付けたい 5 いい|1/11|888 ※行はA・B列をキーに、昇順(順序良く)並んでいます。 表の中に重複行(A・B列をキーとして)が存在していて、その一つ目の行に、色を付けたいのですが、 どうすれば実現できるでしょうか? 例でいうと、2・4行目に色を付けたいのですが、術が思いつきません。 どうぞご教授下さいm(__)m

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

  • ベストアンサー
回答No.5

こんにちは。 他にもっといい方法があると思いますが とりあえず‥ 作業列を2つ使います。 ---------- D2:=A2&B2 ---------- 以下、オートフィルでコピー ---------------------------------------------------------- E2:=(COUNTIF(D:D,D2)>1)*(COUNTIF($D$2:D2,D2)=1) ---------------------------------------------------------- 以下、オートフィルでコピー 重複データがあり、かつ最初のデータに 1 が E列に入ります。 (↑以外は 0) あとは条件付き書式で E列が 1 のものだけ色を付ければいいのではないでしょうか? 作業列は非表示にしてください。

hanahana223
質問者

お礼

完璧です! 大変助かりました。・勉強になりました。 お世話になり、ありがとうございましたm(__)m

その他の回答 (5)

  • char0078
  • ベストアンサー率27% (32/118)
回答No.6

#2です。 条件式を =AND($A2<>$A1,$A2=$A3) に変えて、後は同様にやってみてください。 これでいいように思うのですが、 自信はないです(^^;

hanahana223
質問者

お礼

度々ありがとうございました。 お蔭様で問題解決です。 助かりました!

回答No.4

条件付き書式と書式のコピー貼り付けツールを使ってください。 手順: 1、A2の条件付き書式に数式が=AND(A2 <> A1, A2=A3)、書式を適当につけて 2、カーソルをA2に止まって、書式コピーツールをクリック 3、設定したいセール(例えばA4)にクリック 4、2,3を重複して(場合によって1も)

hanahana223
質問者

補足

早々にご回答ありがとうございます。 説明不足で申しわけありません! 重複している行は2行、というわけではなく N行の重複です。 例を挙げますと、    A |B |C 1 名称|1/11|123 2 ああ|1/11|456 ←行全体に色を付けたい 3 ああ|1/12|789 4 いい|1/11|999 ←行全体に色を付けたい 5 いい|1/11|888 6 いい|1/11|777 7 いい|1/11|666 8 うう|3/21|001 ←行全体に色を付けたい 9 うう|3/21|002 10 ええ|4/01|555 11 おお|4/01|555 上記のような場合(重複した行が複数存在する) もあるのです。 そして、10・11行目のように、重複しない行も混在しています。(色はつけたくない) ややこしくて申しわけありません! 引き続きご教授、よろしくお願い致しますm(__)m

  • mito3310
  • ベストアンサー率20% (10/50)
回答No.3

Dの列にダミーの式を入れます。 D1セルに「=IF(AND(A1=A2,B1=B2),1,2)」と入力します。以下、D列はD1セルをコピーしてください。 (この式は、A1とA2が同じ、かつ、B1とB2が同じ場合、「1」違う場合、「2」を書きなさいという式です。 次に、ctrl+Aで全てを選択して、 「書式」→「条件付き書式」で、条件(1)のところに 「数式が」を選択、右側に「=$D1=1」と入力します。 書式ボタンをクリックして、パターンからお好きな色を選択して、OKをクリックします。 ちょっとめんどくさいかもしれませんが、如何でしょうか?

hanahana223
質問者

補足

早々にご回答ありがとうございます。 説明不足で申しわけありません! 重複している行は2行、というわけではなく N行の重複です。 例を挙げますと、    A |B |C 1 名称|1/11|123 2 ああ|1/11|456 ←行全体に色を付けたい 3 ああ|1/12|789 4 いい|1/11|999 ←行全体に色を付けたい 5 いい|1/11|888 6 いい|1/11|777 7 いい|1/11|666 8 うう|3/21|001 ←行全体に色を付けたい 9 うう|3/21|002 10 ええ|4/01|555 11 おお|4/01|555 上記のような場合(重複した行が複数存在する) もあるのです。 そして、10・11行目のように、重複しない行も混在しています。(色はつけたくない) ややこしくて申しわけありません! 引き続きご教授、よろしくお願い致しますm(__)m

  • char0078
  • ベストアンサー率27% (32/118)
回答No.2

重複するA列の一つ目の行に色を付けるということで よろしいでしょうか。。。 A2に条件付書式を設定します。 A2を選択して書式→条件付書式 で 「数式が」「=$A2<>$A1」として、書式をクリックして 適当な色を選びます。 で、OKをクリックすればA1の設定は終わりです。 あとはA1をコピーして表全体に書式のみを貼り付ければ 出来上がりです。 でいいと思いますが、やってみてください(^^;

hanahana223
質問者

補足

早々にご回答ありがとうございます。 説明不足で申しわけありません! 重複している行は2行、というわけではなく N行の重複です。 例を挙げますと、    A |B |C 1 名称|1/11|123 2 ああ|1/11|456 ←行全体に色を付けたい 3 ああ|1/12|789 4 いい|1/11|999 ←行全体に色を付けたい 5 いい|1/11|888 6 いい|1/11|777 7 いい|1/11|666 8 うう|3/21|001 ←行全体に色を付けたい 9 うう|3/21|002 10 ええ|4/01|555 11 おお|4/01|555 上記のような場合(重複した行が複数存在する) もあるのです。 そして、10・11行目のように、重複しない行も混在しています。(色はつけたくない) ややこしくて申しわけありません! 引き続きご教授、よろしくお願い致しますm(__)m

回答No.1

セルをクリックするのではなく、行全体を選択して色を指定すればどうですか? 行全体を指定するには一番左の行番号(上の例だと、1、2、3・・・)をクリックすればOKです。質問の意図と合っていない場合はスイマセン。。。

hanahana223
質問者

補足

ご回答ありがとうございます! 「行に色を付ける」だけではなく その前の行(N行前)と、キーが同じか(A・B列) 判断しながら色を付けたいのです。 vbaでいうと 「for文の中でif文を書く・・」 という感じでしょうか。 きちんと伝えられず申しわけありません。 引き続き回答お待ちしております。 よろしくお願い致します!

関連するQ&A

  • エクセルまたはVBAで重複行を削除

    例えば、 A B 1 1 a 2 2 b 3 3 c 4 4 d 5 4 d 6 5 e 7 6 g 8 6 g といった表があるとします。 A列をキーに、昇順にされた一覧表です。 ここで番号が重複している行、この例では4行目と5行目、7行目と8行目がそうです。 こういった重複した行を検索して、行削除したいのですがどんな方法が可能でしょうか? 最終的にはVBAでのイベントになるでしょうが、それ以前にエクセルで前準備などしておくようなことは必要でしょうか? 表自体はかなり膨大な量のデータベースです。 よろしくお願いします。

  • 重複の数によって塗潰しの色を変える方法

    このカテゴリーのエクセルの達人の方々に質問です。 どなたか回答して頂ける方がおみえでしたらよろしくお願いします。 (ちゃんとした回答ではなく、文句やクレーム等を混ぜた記載はご遠慮ください。  私の質問が気に入らない場合は無視して頂ければ結構です。) 【質問】 添付図のとおり、A列とB列に数字が入っていて重複がありますが 昇順で並んでいます。それが100行あります。重複の数に応じて以下のとおりセルの塗潰しがしたいです。  A列&B列重複 ・・・2個なら”黄色”で塗潰し。  A列&B列重複 ・・・3個なら”青色”で塗潰し。  A列&B列重複 ・・・ 4個なら”緑色”で塗潰し。  A列&B列重複 ・・・ 5個なら”赤色”で塗潰し。 上記を実現する方法をVBAで実現する方法が知りたいです。   【注意事項】   ・A列、B列の数字は毎回異なります。   ・VBAで実現する方法~、と書きましたが、    同様のことが他の方法でも実現できればそれを教えて下さい。   ・使用するエクセルは2021です。 以上、よろしくお願いします。

  • エクセル 重複行色付(VBA)について質問です。

    Excelで、2ヶ所の場所を重複しているのかどうかチェックし、重複でしたらその行ごと色を付けたいと思っております。 |    A    |    B   |   C   |   D   |   E   |    田中    1046587920   8/2     8/6    100364987    鈴木    1098463612   8/3     8/5    125698001    森川    1548758743   8/20    8/23    103587410    川島    1046587920   8/22    8/23    100365871    森本    1046587920   8/25    8/26    100364987 例えば、上記の様な一覧があり 「B列」 と 「E列」 とで重複を確かめて、同じであれば色が付く様にVBAを組みたいのですが、現在調べて 「B列」 のみの重複に色付けは出来るようになったのですが、2ヶ所重複に色をつけることで困っております。 上の例で行きますと、田中さんと森本さんの行に色が付く形が理想でして、川島さんの、「B列」は該当しておりますが、「E」列が異なるため、色は付きません。 行数は。2万行前後になるのですが、関数を当てると処理が非常に重くなるため、VBAを試みております。 お知恵をお貸し頂けましたら幸いです。

  • Excel2010で行ごとの重複削除

    Excel2010です。 A行目 1 3 5 5 2 2 3 B行目 2 3 5 5 4 4 C行目 1 9 7 9 9 ↓ A行目 1 3 5 2 B行目 2 3 4 5 C行目 1 7 9 というように、行ごとに重複の削除をしたいと思っています。 データタブに重複の削除があるのですが、列ごとにやるようなので、一度シート全体を 行と列を入れ替えて別シートにコピーして、 1列目全体を選択して、1列目で重複の削除を実行 2列目全体を選択して、2列目で重複の削除を実行 ・・・ というやり方もあるのですが、今扱っているエクセルは197行197列あります。 列選択、重複の削除アイコンをクリックするのを197回繰り返すのは大変です。 自動化する方法はないものでしょうか?

  • 重複数字の数に応じてセルに色をつける。

    このカテゴリーのエクセルの達人の方々に質問です。 どなたか回答して頂ける方がお見えでしたらよろしくお願いします。 (ちゃんとした回答ではなく、文句やクレーム等を混ぜた記載はご遠慮ください。  また私の質問が気に入らない場合は無視して頂ければ結構です。) 【質問】  添付図のとおり、1列×25行の中に数字が1~31まであり、  重複数字を含んで昇順に並んでおり、それが4列あります。  1列毎に数字を見て以下の条件にあえばセルを塗り潰します。   2個重複⇒セルを黄色に塗り潰す。   3個重複⇒セルを青色に塗り潰す。   4個重複⇒セルを緑色に塗り潰す。   5個重複⇒セルを赤色に塗り潰す。   上記を実現する方法をVBAで実現する方法が知りたいです。   【注意事項】   ・1列×25行の中にある数字の並びは毎回異なります。   ・1列×25行の中に重複数字が無い場合があります。(例:A列)   ・VBAで実現する方法~、と書きましたが、    同様のことが他の方法でも実現できればそれを教えて下さい。   ・使用するエクセルは2021です。 以上、よろしくお願いします。

  • 重複した行と、重複していない行をわけて出力したい。

    お世話になります。Oracle9iで、 タイトル通りですが、一つの表から 重複したレコード・重複していないレコード を出力したいのですが、「こうかな?」と思った SELECT文が30分ちかく返ってきません(^^; 他に方法があれば教えて頂きたく質問致しました。 よろしくご教授下さい! (以下のSQLで、重複した行は"exists"で、 重複していない行は"not exists"もしくは "having count(*) = 1"でできるかな? と思ってましたが・・・) テーブル名:結果 キー項目(とみなすカラム):番号・名称・年月日 出力したい項目:結果.データ・もしくは結果.* --データが複数 select a.番号,a.名称,a.年月日,a.データ from 結果 a where exists --キーの重複SELECT ( select 番号,名称,年月日,count(*) from 結果 j where j.年月日 >= '1992/04/01' and j.年月日 <= '1993/03/31' and a.番号= j.番号 and a.名称= j.名称 and a.年月日 = j.年月日 group by j.番号,j.名称,j.年月日 having count(*) > 1 )

  • エクセルで重複行をすべて削除するにはどうすればよいでしょうか?

    例えば、昇順で並べ替えて以下のようにエクセルで準備したとします。   A列 1行 aa 2行 aa 3行 bb 4行 bb 5行 cc 6行 cc 7行 dd 8行 ee そこで重複する行ごと削除したいのですがどうすればよいでしょうか? 削除結果は   A列 1行 dd 2行 ee 上記のようにしたいです。 重複する1行だけは削除できたのですが、 2行ごと削除の方法がわかりません。 ご教授いただきたく存じます。 よろしくお願いいたします。

  • 同じ数字を3個~4個使用している重複行の塗り潰し

    いつもお世話になっております。 ご存じの方がお見えでしたら回答をよろしくお願い致します。 【質問】  添付図の様にA行~T行の第一数字から第五数字まで1から31の数字が重複して 入っています。(1行だけで見れば重複はしておらず、第一数字から昇順に第五数 字まで並んでいます。)初めにA行からB行~T行を1行ずつ見ていき、  A行の5つの数字のうち3個~4個同じ数字を使用している行があればどちらの行  の数字も黄色に塗り潰す、次にB行からC行~T行を1行ずつ見ていき・・・  と、最後はS行からT行を見るまでを繰り返し、5つの数字のうち3個~4個  同じ数字を使用している行があればどちらの行の数字も黄色に塗りつぶす方法が  知りたいです。  ◎添付図の結果として黄色に塗り潰される行は   (1)A行とG行・・・2、7、19、23が重複   (2)B行とH行・・・3、6、14,22が重複   (3)C行とI行・・・4,15、17,21が重複   (4)D行とJ行・・・8、9、18、25が重複   (5)M行とQ行・・・12,14、23,28が重複   (6)N行とS行・・・5,19,31が重複   (7)O行とT行・・・1,6,21が重複 【注意事項】   ・使用するエクセルは2016です。   ・A行~T行に入る数字は毎回異なります。    但し使用数字は1~31で、1行でみれば重複無しで左から昇順です。   ・3個~4個の数字が重複する行が存在しないことはありません。 以上、よろしくお願いします。

  • エクセル 行ごと色をつける方法

    エクセルの色をつける方法について解らない事があるので どなたか教えてください。 下記のような表があります。 A    B    C    D 番号  氏名  点数  回数 1   あああ 1000 20 2   いいい 3000 15 3   ううう  1000 30 4   えええ 5000 55 以下続く このような表で、D列に20以上の数値が入っている場合、 その行をまるまる色付する方法はありますのでしょうか? 今は条件付書式にて、D列に20以上の場合は色を指定して、 その後は手動でその行を色付けしているのですが、数が多く大変なので 最初から条件に合う行全体を色付ける方法があれば教えて頂きたいのです。 よろしくお願い致します。   

  • 1列について重複している行を除くかつ,他の列の値で抽出する行を変えたい場合

    SQLSeverを使い,SQL文を作成しているのですが, 下記のA列の重複行を取り除くかつ,B列の「5よりも4」,「4よりも1」,「1よりも2」,「2よりも3」(3>2>1>4>5)の行を抽出したいと考えています.下記の表1を抽出した場合,表2が出るようにしたいです. 表1 A B 1 1 1 3 1 3 1 5 2 1 2 2 2 5 表2 A B 1 3 2 2 もしB列が,5>4>3>2>1の順番ならMAXを使って取り出すことはできたのですが,3>2>1>4>5の場合だと,どんなSQL文にすればよいのでしょうか? よろしくお願いします.

専門家に質問してみよう