Удаление дубликатов из массива с помощью VBA

Предположим, у меня есть блок данных в Excel 2010, 100 строк на 3 столбца.

Столбец C содержит несколько дубликатов, скажем, он начинается как

1, 1, 1, 2, 3, 4, 5,....., 97, 98

Используя VBA, я хотел бы удалить повторяющиеся строки, поэтому у меня осталось 98 строк и 3 столбца.

1, 2, 3,....., 97, 98

Я знаю, что в Excel 2010 есть кнопка для этого, но впоследствии она мешает остальной части моего кода и дает неверные результаты.

Кроме того, я хотел бы сделать это в массивах, а затем вставить результаты на рабочий лист, а не использовать такие методы, какApplication.Worksheetfunction.countif(.....

Что-то вроде:

Dim myarray() as Variant
myarray=cells(1,1).Currentregion.value

Dim a as Long

For a=1 to Ubound(myarray,1)

    'something here to 

Next a
7
задан Community 14 July 2019 в 23:45
поделиться