ExcelVBA RemoveDuplicatesで重複値を取り除く

Excel VBAのRemoveDuplicatesは、特定の範囲から重複した値を取り除くためのメソッド。RemoveDuplicatesの使い方にサンプルコードをもとに解説します。

Excel VBA RemoveDuplicatesの基本的な使用方法

Option Explicit

Sub RemoveDupes()
    ' 対象範囲の指定
    Dim rng As Range
    Set rng = Range("A1:A10")  ' 重複をチェックしたい範囲を指定
    
    ' 重複データの削除
    rng.RemoveDuplicates Columns:=1, Header:=xlNo
End Sub

Excel VBA RemoveDuplicatesで複数列を指定

Option Explicit

Sub RemoveDupesMultipleColumns()
    ' 対象範囲の指定
    Dim rng As Range
    Set rng = Range("A1:C10")  ' 重複をチェックしたい範囲を指定
    
    ' 重複データの削除
    rng.RemoveDuplicates Columns:=Array(1, 2, 3), Header:=xlNo
End Sub

この例は、A列、B列、C列の組み合わせで重複をチェックして削除します。