Range.RemoveDuplicates Method

Rangeオブジェクト.RemoveDuplicatesメソッド

値の範囲から重複した値を削除します。

構文
expression.RemoveDuplicates (Columns , Header)
※expression is Rangeオブジェクト

Parameters
Name	必須/オプション	データ型	説明
Columns	必須	バリアント型	重複情報を含む列のインデックス。
Hedder	省略可	XlYesNoGuess	ヘッダ行を含むかどうかの列挙。

例)

ActiveSheet.Range("A1:C100").RemoveDuplicates Columns:=Array(1, 2), Header:=xlYes

'ActiveSheet.Range("A1:C100") _   'アクティブシートの "A1"から "C100"の範囲の
'.RemoveDuplicates _              '重複を削除する
'Columns:=Array(1, 2), _          '左から1行目と2行目の重複に対する。
'Header:=xlYes                    '最初の行はヘッダ行なので並べ替えしない。

ActiveSheet.Range("A1:C100").RemoveDuplicates Columns:=Array(1, 2), Header:=xlYes

'ActiveSheet.Range("A1:C100") _ 'アクティブシートの "A1"から "C100"の範囲の

'.RemoveDuplicates _ '重複を削除する

'Columns:=Array(1, 2), _ '左から1行目と2行目の重複に対する。

'Header:=xlYes '最初の行はヘッダ行なので並べ替えしない。