"свернуть" таблицу

[Hugo121]

Это не массив, а коллекция.
Про CStr() я недавно читал - в деталях не помню, но это чтоб быстрее работало, можно и не превращать, но тогда будут лишние преобразования.
"в массиве будут все значения и в том числе дублирующиеся" - мне кажется, что-то Вы напутали... надо проверить...

[Hugo121]

Кстати, если Вам надо просуммировать из G у всех уникальных сочетаний
131 4607028557484
то это можно сделать одним проходом - заносим в коллекцию ключ 131&4607028557484, а Item 22.
Затем при повторе ключа увеличиваем Item на Item+значение.
Т.е. за один перебор массива получаем сумму значений из G по всем уникальным парам номер+штрихкод. Это надо?

[Hugo121]

Вот так например. См. лист2 - только там ещё надо первый столбец разбить, ну это другой вопрос.
Только мне словари больше нравятся...

P.S. 65000 строк обрабатывает за 1.78 сек. Но это без вывода на лист - на Excel2000 Transpose глючит, поэтому сам вывод мне на тесте пришлось закомментировать.
P.P.S. На 2003 Transpose отработало. Правда на тестовых данных получилось из 65535 строк 65530 уникальных, поэтому обработка заняла 5,09375 сек., а выгрузка ещё 10 сек. (общее время 15,8125 на небыстрой старой машине).

[doober]

Возможно я не так понял задачу.На Лист2 я вывел всю таблицу листа опись,но с убранными и проссумироваными дубликатами.На Лист3 вывел повторы

[doober]

Совсем забыл.Штрихкод воспринимает как число.Поэтому все строковые штрихкоды не читает,игнорирует.Если вам такой вариант подойдет,надо будет число сохранять как тект с '

[sn00p]

Сообщение от Hugo121

Кстати, если Вам надо просуммировать из G у всех уникальных сочетаний
131 4607028557484
то это можно сделать одним проходом - заносим в коллекцию ключ 131&4607028557484, а Item 22.
Затем при повторе ключа увеличиваем Item на Item+значение.
Т.е. за один перебор массива получаем сумму значений из G по всем уникальным парам номер+штрихкод. Это надо?

кол-во дубликатов и их атрибуты(№ док-та и ШК) не известно заранее, впрочем как и кол-во строк, которое нужно обработать

[sn00p]

Сообщение от doober

Возможно я не так понял задачу.На Лист2 я вывел всю таблицу листа опись,но с убранными и проссумироваными дубликатами.На Лист3 вывел повторы

суммы по столбцу G до и после обрабботки(на листе2) не совпадают.

по ШК как цифре, я же их преобразую ч\з STR, так не пойдет?

[sn00p]

Сообщение от Hugo121

Вот так например. См. лист2 - только там ещё надо первый столбец разбить, ну это другой вопрос.
Только мне словари больше нравятся...

P.S. 65000 строк обрабатывает за 1.78 сек. Но это без вывода на лист - на Excel2000 Transpose глючит, поэтому сам вывод мне на тесте пришлось закомментировать.
P.P.S. На 2003 Transpose отработало. Правда на тестовых данных получилось из 65535 строк 65530 уникальных, поэтому обработка заняла 5,09375 сек., а выгрузка ещё 10 сек. (общее время 15,8125 на небыстрой старой машине).

комрад, дайте линк на теорию.
нужно делать массив string? размерности = кол.во строк Х кол.во столбцов?
или пихать одной строкой в динамический массив?

[doober]

Сообщение от sn00p

суммы по столбцу G до и после обрабботки(на листе2) не совпадают.

по ШК как цифре, я же их преобразую ч\з STR, так не пойдет?

Суммы совпадают,при добавлении дубликатов для проверки на первом листе две верхние ячейки не попали в расчет.Переделать под строку это не проблема

[Hugo121]

Сообщение от sn00p

комрад, дайте линк на теорию.
нужно делать массив string? размерности = кол.во строк Х кол.во столбцов?
или пихать одной строкой в динамический массив?

Линк не дам, нет на примете. Остальное не вполне понял
А суть вот - весь диапазон берём в массив (a = Range) и начинаем его перебирать (For i = 1 To UBound(a)) (так быстрее, чем с листа брать).
Берём первую пару и заносим эту строку (с вставленным разделителем, чтоб потом можно было назад разобрать) в Dictionary, как Item берём число из G.
Берём следующую пару и проверяем - если уже есть в словаре, плюсуем Item с значением G, если нет - добавляем в словарь.
Работает быстро, и если нужно, можно параллельно с добавлением в словарь, добавлять в другой массив нужные поля из первого массива. Да и сумму можно сразу в другом массиве плюсовать - как ориентир использовать Item словаря, только тогда в Item заносить не число из G, а порядковый номер.

Сообщение от sn00p

кол-во дубликатов и их атрибуты(№ док-та и ШК) не известно заранее, впрочем как и кол-во строк, которое нужно обработать

ну это не имеет значения - в коде берётся последняя строка по столбцу А.