VBA 複数列データを一括重複削除

複数列を一括重複削除

Sub test()
 ’　複数列データを一括重複削除

    ActiveCell.CurrentRegion.Select
    Selection.RemoveDuplicates Columns:= _
        Array(1, 2, 3, 4), Header:=xlYes

End Sub

Array(1, 2, 3, 4)　は、4列ともに重複する場合、それを削除する。1列と3列だけ重複する場合、Array(1, 3)にすれば良いです。

実行結果

― ― ― ― ― ― ― ― ― ― → Excel VBA基礎入門もくじ へ戻る 

参考記事

『VBA 連続データの作成　AutoFillメソッド』

『VBA セル選択範囲の変更 Resizeプロパティ』

『VBA セル入力規則の設定（Validation）』