![]() |
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
|
Опции темы | Поиск в этой теме |
![]() |
#11 |
Старожил
Регистрация: 08.02.2012
Сообщений: 2,173
|
![]()
Если честно, у Вас слишком много данных для перебора - оттуда и тормоза. можете попробовать работать только с заполненными ячейками. Например, так:
Код:
з.ы. чего вы конкретно хотите добиться, я так до конца и не понял, поэтому адаптируйте данный код под свои нужды сами. з.з.ы. Для ускорения поиска индексов в таблице с расценками я бы воспользовался словарями.
Правильно поставленная задача - три четверти решения.
Последний раз редактировалось DiemonStar; 01.10.2012 в 09:19. |
![]() |
![]() |
![]() |
#12 | |
Форумчанин
Регистрация: 16.04.2010
Сообщений: 695
|
![]() Цитата:
Необходимо чтобы если например 201 операция и корпус 1 = 618,19, а если далее нашло по операции 201 корпус допустим 22= 786,20+618,19=1404,39. Но если операция 201 корпус 1 = 618,19, затем операция 201 корпус 1 = 618,19, то дубликаты не должно суммировать 201 = 618,19. Если добавляю еще цикл по корпусам, то значительно время работы увеличивается
Единственный способ стать умнее, играть с более умным противником...
|
|
![]() |
![]() |
![]() |
#13 | |
Форумчанин
Регистрация: 16.04.2010
Сообщений: 695
|
![]() Цитата:
Пытаюсь найти по каждой операции по всем корпусам сумму выполненных операций Допустим по 201 операции ищи все корпуса (с 1 по 33). Находи допустим 1 корпус ищим по нему сумму на листе расценка (запоминаем сумму), ищим дальше, находи опять первый корпус (не суммируем т.к. 1 корпус уже был), далее находим 2 корпус (ищим сумму по 2 корпусу на листе расценка), суммируем суммы всех найденных корпусов (без дубликатов) Переходим к следующей операции. В пример 29 и 30 числа показано как это чудо будет заполнятся (в столбце "EL7:EL20") показано как суммируется. Честно сказать вижу как работает код, но не понимаю как можно сделать под себя (((
Единственный способ стать умнее, играть с более умным противником...
Последний раз редактировалось staniiislav; 01.10.2012 в 12:02. |
|
![]() |
![]() |
![]() |
#14 |
Форумчанин
Регистрация: 16.04.2010
Сообщений: 695
|
![]()
запарился, вот файлик
Единственный способ стать умнее, играть с более умным противником...
|
![]() |
![]() |
![]() |
#15 |
Форумчанин
Регистрация: 25.04.2010
Сообщений: 616
|
![]()
наверное, ertert нужен
![]() Код:
![]() |
![]() |
![]() |
![]() |
#16 | |
Форумчанин
Регистрация: 16.04.2010
Сообщений: 695
|
![]() Цитата:
Не понимаю как это чудо работает, но работает быстро и правильно!!! Спасибо ОГРОМНЕЙШЕЕ nilem!!! П.С. Огромное спасибо ВСЕМ участника данной темы! Понемногу начинаю понимать как работают массивы... но еще далековато мне для понимания связи словарей с массивами (как они совместно так быстро работают)
Единственный способ стать умнее, играть с более умным противником...
|
|
![]() |
![]() |
![]() |
#17 |
Форумчанин
Регистрация: 25.04.2010
Сообщений: 616
|
![]()
упс, обнаружился недочет. Вот здесь нужно добавить тильду:
Код:
|
![]() |
![]() |
![]() |
#18 | |
Форумчанин
Регистрация: 16.04.2010
Сообщений: 695
|
![]() Цитата:
если будет, время прокомментируйте пожалуйста код
Единственный способ стать умнее, играть с более умным противником...
|
|
![]() |
![]() |
![]() |
#19 | |
Старожил
Регистрация: 08.02.2012
Сообщений: 2,173
|
![]() Цитата:
Т.е., по-сути, вам нужны суммы расценок корпусов по каждой операции? или суммы расценок операций по каждому из корпусов?
Правильно поставленная задача - три четверти решения.
|
|
![]() |
![]() |
![]() |
#20 |
Старожил
Регистрация: 08.02.2012
Сообщений: 2,173
|
![]() Код:
Правильно поставленная задача - три четверти решения.
Последний раз редактировалось DiemonStar; 02.10.2012 в 09:22. |
![]() |
![]() |
![]() |
|
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Ускорение макроса Copy Paste | Ivan Dulin | Microsoft Office Excel | 1 | 21.05.2012 19:51 |
Ускорение макроса | ymnuhj | Microsoft Office Excel | 5 | 12.05.2012 00:48 |
макрос для поиска позиций и вывода данных на лист поиска | mr-111 | Microsoft Office Excel | 12 | 13.03.2012 15:03 |
Ускорение работы макроса Cell Name. | Foxx | Microsoft Office Word | 0 | 26.02.2012 21:38 |
Запуск макроса с параметрами из другого макроса | Saladin | Microsoft Office Excel | 2 | 19.01.2009 09:43 |