Если убирать дубли не из большого количества столбцов, то можно словарем [vba]
Код
Sub tt() Set slov = CreateObject("Scripting.Dictionary") With Range("Diap_") For Row = 1 To .Rows.Count Key = .Cells(Row, 1).Value Item = .Cells(Row, 2).Value slov.Item(Key) = Item 'при совпадении первое значение заменяется вторым Next End With End Sub
[/vba] Если много, то в Итем можно собирать остальные столбцы, а потом их разбирать. Но способ Славика мне больше нравится, я и сам им иногда пользуюсь
Если убирать дубли не из большого количества столбцов, то можно словарем [vba]
Код
Sub tt() Set slov = CreateObject("Scripting.Dictionary") With Range("Diap_") For Row = 1 To .Rows.Count Key = .Cells(Row, 1).Value Item = .Cells(Row, 2).Value slov.Item(Key) = Item 'при совпадении первое значение заменяется вторым Next End With End Sub
[/vba] Если много, то в Итем можно собирать остальные столбцы, а потом их разбирать. Но способ Славика мне больше нравится, я и сам им иногда пользуюсь_Boroda_
Значений в таблице от 16 000 до 50 000. Не знаю, много это или не очень. Столбцов - 4. Для себя сделал заметку: сделать дополнительный пронумерованный столбец (1,2,3,4,5......), его легко перевернуть, удалить дубли и перевернуть обратно. Вполне возможно, что Славик это и предлагал. Но в макрос пока ещё это не воплощал. И кажется, что способ со словарём будет более корректным.
Значений в таблице от 16 000 до 50 000. Не знаю, много это или не очень. Столбцов - 4. Для себя сделал заметку: сделать дополнительный пронумерованный столбец (1,2,3,4,5......), его легко перевернуть, удалить дубли и перевернуть обратно. Вполне возможно, что Славик это и предлагал. Но в макрос пока ещё это не воплощал. И кажется, что способ со словарём будет более корректным.emkub
Сколько в высоту - это без разницы (в особенности для словаря). Для словаря важно сколько в ширину и по скольким столбцам удаляем дубликаты. В идеале - если по всем, тогда Итемы вообще не нужны.
И да, Славик именно об этом говорил (а я поддакивал)
Сколько в высоту - это без разницы (в особенности для словаря). Для словаря важно сколько в ширину и по скольким столбцам удаляем дубликаты. В идеале - если по всем, тогда Итемы вообще не нужны.
И да, Славик именно об этом говорил (а я поддакивал)_Boroda_
Вход
Регистрация
Напомнить пароль
Автосумма
Часто используемые
ВПР
ЕСЛИ
СУММЕСЛИ
Финансовые
Логические
Текстовые
Даты и времени 
Ссылки и массивы 
Математические
Другие функции
Проверка свойств и значений
Баз данных
Математические
Обработки массивов
Обработки строк
Преобразования типов данных 
Загрузки данных
Работы с файлами
Обработки системных параметров
Обработки цвета
Работы с датами и временем
Преобразования в системы счисления
Финансовые
