任意の範囲内の重複データを削除する


指定した範囲内にある重複したデータを削除したい場合は次のコードを使用します。

機能.範囲.C_重複削除(範囲 As Range, タイトル As タイトル定数)


このコードには二つの引数が必要です。

1,範囲 As Range
  重複データを削除したい範囲をここで指定します。

2,タイトル As タイトル定数
  タイトル行の有無をここで指定します。


たとえば「顧客」シートのA列にある重複データを削除したい場合は以下のように記述します。

Dim 重複削除列
Set 重複削除列 = 機能.範囲.S_範囲指定_列(Worksheets(“顧客”), 1)
Call 機能.範囲.C_重複削除(重複削除列, タイトル有)