ExcelVBAマクロ『並べ替え』⇒『重複の削除』

質問

ExcelVBAマクロについて確認させてください。

いくつかの値がエクセルのB10から下方向に入力されてあります。
この値をExcelの機能である『並べ替え』⇒『重複の削除』をExcelVBAマクロで同様に実行したいのですが、
どのようにすれば良いでしょうか。
ご教授下さい。

以上、よろしくお願いします。

回答No.2

imogasi · ベストアンサー

(1)範囲指定ー並べ変え
マクロの記録で判る。
重複を判断する列（ｘ）のデータをソート第１キーとして並び替える。
（２）重複の削除
最終データ行を掴むーー質問の回答に頻出する事項。勉強のこと。
最終行から、第１０（この質問の場合）行まで（ＦＯＲ　I=最終行　TO 10　ＳＴＥＰ　－１ ＮＥＸＴを使う）
、ｘ列のセルの値について、前の行と今の行の同じかどうか判別し、同じならその行を削除する。そのためには前の行（下の行）の値を次の行の処理のために受け渡す,変数を１つ用意し使う。
行削除はマクロの記録を参照。またはＧｏｏｇｌｅででも照会。
ソーと列と重複を考える列が違う場合は、１工夫必要。
ーーー
これ以外に、フィルタオプションの設定ー重複するレコードは無視する、などのマクロの記録でも出来ると思う。非表示のみになるだけだが。その後１処理必要。
ーー
そのほかにも色んなロジックが使える。
例　http://pc.nikkeibp.co.jp/article/NPC/20060214/229179/?rt=nocnt
ーー
質問異はエクセルのバージョンを書くこと。２００７か２０１０か。
ーー
コードは敢えてここに書かない。勉強してください。

お礼

早速のご回答ありがとうございました。

アドバイスをもとに色々とやってみたところ、
うまく出来ました。

本当にありがとうございました。

回答No.1

noname#158634

まずは「マクロの記録」。

お礼

早速のご回答ありがとうございました。
マクロの記録機能を参考にしてマクロ改良してみたところ
うまく出来ました

本当にありがとうございました。