エクセルデータのレコード重複修正

質問

７０００件程度のレコード数があるエクセルデータで、一部（およそ５００件程度）レコードが重複していることがわかりました。

本来ないはずの重複レコードを削除するにはどのような方法があるでしょうか？
ご存知の方ご教授ください。

回答No.4

ぜ り～（@-Jelly-）

SELECT　*　FROM テーブル
　　Where　重複発見に至った条件

これで、重複があれば２～件、なければ１件になりますよね。

件数をCount(*)などでカウントし、

If カウント > 2 then
　DELETE　FROM　テーブル
　　WHERE　重複してるレコード
End if

で良いかとおもいます。
全く同じレコードで、レコード番号もないという場合はつかえませんが。

その場合は、
SELECT時にORDER　BYして並び替えて、
Do　Until　レコード.EOF　=　True
　IF 前のレコード = 今のレコード then
　　DELETE　FROM　テーブル
　　WHERE　今のレコード
　End if
　前のレコード　=　今のレコード
　レコード.MoveNext
Loop

で、できるとおもいます。