Поиск дубликатов в MS Excell (XLS)

Файл таблица, в нём есть примерно 10 колонок с информацией текстового и цифрового вида. Логини пользователей, айпи адресса, и другие численные показатели.

Задача — как то удалять пользователей что зарегистрировали по несколько логинов с 1го айпи адресса. вручную долго, но может Эксель умеет это делать. Нужно их зрительно как нибудь увидеть, ну или в отдельную таблицу снести.

В MS Excel 2007 есть стандартный функционал для удаления дублированных значений (“Данные”-группа “Работа с данными”-“Удалить дубликаты”)

Для поиска и подкрашивания можно использовать следующий макрос, который подсвечивает зеленым оригиналы значений и красным дублированные.
(5000 – значение в столбце для цикла, в примере поиск ведется во втором столбце. в 3-ий столбец для дублежей записывается “1”):


Sub Macro1()
For a = 1 To 5000
If Cells(a, 2).Value <> "" And Cells(a, 3).Value <> 1 Then
For b = 1 To 5000
If b <> a Then
If Cells(a, 2).Value = Cells(b, 2).Value Then
Cells(a, 2).Interior.ColorIndex = 4
Cells(b, 2).Interior.ColorIndex = 3
Cells(b, 3).Value = 1
End If
End If
Next
End If
Next
End Sub

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *