Excelで、重複データを一括で削除する方法

質問

お世話になっております。

Excelで、重複データを一括で削除する方法について

300列ほどあるデータがあります。
（行数は、各列に30行ほどです）
各列には重複するデータがあります。これを削除したく。
なお、各列（隣の列）は、関連性がありません。
よって、複数の列を参照して重複データを削除する必要はなく
A列内の重複データ、B列の重複データをそれぞれ削除したいのですが、
フィルタオプションからの重複データを無視する、や、重複データの削除
機能では、1列ずつ実行することで可能ですが、300列以上あるので
現実的ではありません。
そこで、一括で各列の重複データを削除する方法を教えてください。

※なお、列は300ほどあるため、作業用(countifで重複をピックアップした後、フィルタして
削除など)の方法は、列分つくるのは現実的ではないため、それ以外の方法はないでしょうか。

よろしくお願いします。

回答No.3

mu2011

NO2です。
勘違いしておりましたので回答分は読み捨て下さい。

回答No.2

mu2011

列が３００以上あるのだとしたらエクセル２００７以上と想定すると次の方法は如何でしょうか。
対象範囲を選択→データタブ→重複の削除→ＯＫ

回答No.1

keithin

さくっとマクロを使って「重複データの削除」を300列やらせた方が簡単ですが，それはそれとして。

A41セルに
=INDEX(A:A,SMALL(IF(MATCH(A$1:A$30&"",A$1:A$30&"",0)=ROW(A$1:A$30),ROW(A$1:A$30),999),ROW(A1)))&""
と記入してコントロールキーとシフトキーを押しながらEnterして入力し，A70までコピー，右にコピー。

＃参考に
ALT+F11を押す
現れた画面でCtrl+Gを押す
現れたウィンドウに

for each h in activesheet.usedrange.columns : h.removeduplicates columns:=1, header:=xlno : next

と記入してEnterする。

お礼

keithin さま

さっそく、式をいれてフィルコピーしましたら重複解除ができました。
ありがとうございました。