Удаление дубликатов из диапазона ячеек в excel vba
Я пытаюсь удалить дубликаты в excel 2013 VBA. но я получаю ошибку "объект не поддерживает это свойство или метод". Проблема в том, что у меня нет статического диапазона для выбора. Я хочу удалить дубликаты из столбца heaader 'abcd'.
Cells.Find(what:="abcd").Activate
ActiveCell.EntireColumn.Select
Set rng = Selection
ActiveSheet.rng.RemoveDuplicates
2 ответов
удалить дубликаты из одного столбца
Sub removeDuplicate()
'removeDuplicate Macro
Columns("A:A").Select
ActiveSheet.Range("$A:$A7").RemoveDuplicates Columns:=Array(1), _
Header:=xlNo
Range("A1").Select
End Sub
Если у вас есть заголовок, а затем использовать Header:=xlYes
увеличьте ваш ряд согласно вашему требованию.
вы можете сделать это до 1000 вроде этого :
ActiveSheet.Range("$A:$A00")
подробнее здесь здесь