![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Пользователь
Регистрация: 23.11.2018
Сообщений: 21
|
![]()
Есть столбецы с повторяющимися значениями. Есть цикл Do While... Loop обрабатывающий этот столбец до пустого значения. Как избавиться от повторяющихся значений?
Сравнивать нужно по двум ячейкам Cells(i, 2) И Cells(i, 3) Если строки равны по этим параметрам то записывать только одну. Цикл: Код:
|
![]() |
![]() |
![]() |
#2 |
Старожил
Регистрация: 31.12.2010
Сообщений: 2,133
|
![]()
Можно применить к диапазону .RemoveDuplicates (Данные - Работа с данными - Удалить дубликаты).
Или в VBA сначала собрать в словаре ключи cells(i,2) & vbtab & cells(i,3) , потом сплитить ключи и записывать в хмл.
exceleved@yandex.ru Яндекс.Деньги: 410011500007619
|
![]() |
![]() |
![]() |
#3 |
Пользователь
Регистрация: 23.11.2018
Сообщений: 21
|
![]()
И как такое через словари сделать?
|
![]() |
![]() |
![]() |
#4 |
Старожил
Регистрация: 31.12.2010
Сообщений: 2,133
|
![]()
Вместо существующего цикла Do-Loop следующее. Не проверял - файла-примера нет.
Код:
exceleved@yandex.ru Яндекс.Деньги: 410011500007619
|
![]() |
![]() |
![]() |
#5 |
Пользователь
Регистрация: 23.11.2018
Сообщений: 21
|
![]()
Вот файл.
Заменил Do-Loop на ваш код. Результатат нет т.к. в XML выдаёт <File ID="" Angle=""></File> |
![]() |
![]() |
![]() |
#6 |
Пользователь
Регистрация: 23.11.2018
Сообщений: 21
|
![]()
Разобрался.
Нужно было i поправить i = Range("FirstID").Row 'возвращаем номер строки первой ячейки в таблице дизайнов Спасибо. |
![]() |
![]() |
![]() |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Цикл с известным числом повторений (Цикл с параметром) | roykami11er | Паскаль, Turbo Pascal, PascalABC.NET | 4 | 19.12.2018 20:08 |
Цикл с известным числом повторений | roykami11er | Паскаль, Turbo Pascal, PascalABC.NET | 4 | 13.12.2018 12:30 |
написать процедуры для “Цикл For ... Next ” и «Цикл Do ... Loop» по ниже приведенному условию | Кристина_Патачиц | Microsoft Office Excel | 3 | 17.04.2013 17:01 |
Цикл с известным числом повторений. | Getman | Помощь студентам | 9 | 09.06.2012 14:26 |
Цикл с заданным числом повторений | Extrem_um | Помощь студентам | 3 | 02.04.2008 21:00 |