|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
27.04.2019, 07:07 | #1 |
Пользователь
Регистрация: 14.11.2018
Сообщений: 89
|
Нужно сократить код макроса
Доброго дня. Нужно сократить код макроса. В макросе повторяются блоки в цикле. Как я понимаю нужно добавить еще один цикл, но не вышло. Теперь обращаюсь за помощь.
Код:
И как количество повторений цикла который есть сейчас вывести в ячейку на лист(А1, листа1), а то не удобно менять в самом макросе. Спасибо.
ЫЫЫЫЫЫ
|
27.04.2019, 21:10 | #2 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
Код:
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
28.04.2019, 21:18 | #3 |
Старожил
Регистрация: 31.12.2010
Сообщений: 2,133
|
Petrov210217, объясните задачу словами, а не с помощью неработающего кода. Пока получается, что диапазон U6:U33 копируется в диапазон Т6:Т33, а AI15 - в R6, и так 50 раз. Видимо, нужно копировать со смещением, но куда - по горизонтали или по вертикали? А может, в эти же диапазоны, но на другие дисты?
exceleved@yandex.ru Яндекс.Деньги: 410011500007619
|
29.04.2019, 08:37 | #4 |
Пользователь
Регистрация: 14.11.2018
Сообщений: 89
|
IgorGO спасибо за код. Сегодня буду пробовать. А выложенный мною код полностью рабочий. Все ячейки указанны верно. Я этот код взял из своей рабочей программы
ЫЫЫЫЫЫ
|
04.05.2019, 13:11 | #5 |
Пользователь
Регистрация: 14.11.2018
Сообщений: 89
|
IgorGO спасибо за код. Проверил, код хорошо работает, но есть нюанс:
Код:
j=1 в Range("R6") j=1 в Range("R7") j=1 в Range("R8") и т.д, то есть при каждой итерации на строку ниже пока цикл j не закончится, затем все начинается заново. И как задавать значения i и j из ячеек A1 и А2 из рабочего листа 1 текущей книги?
ЫЫЫЫЫЫ
|
04.05.2019, 13:33 | #6 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
Код:
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
05.05.2019, 19:33 | #7 |
Пользователь
Регистрация: 14.11.2018
Сообщений: 89
|
Теперь все как нужно, спасибо!!!
ЫЫЫЫЫЫ
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
сделала запись макроса на 4х строчках, в итоге он выполняет 4 строки а мне нужно 10000, можно ли просто исправить мой макрос? | Татьяна0602 | Microsoft Office Word | 14 | 09.04.2019 17:18 |
число 2,34569 , нужно преобразовать в строку, сократить до двух символов после запятой и вывести в MEMO | Dpemik | Общие вопросы Delphi | 10 | 04.06.2017 09:24 |
Вызов макроса внутри другого макроса. | Небесный | Microsoft Office Word | 1 | 05.11.2012 22:38 |
Нужно упростить (не сократить) задачу. PascalAbc. | AntoshkaK | Паскаль, Turbo Pascal, PascalABC.NET | 13 | 04.12.2011 02:26 |
Как сократить время выполнения макроса? | Алексей11111 | Microsoft Office Excel | 11 | 01.12.2009 20:04 |