Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Макрос копирования строк n-ое количество раз ниже непустых - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, Manyasha, SLAVICK, китин  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Макрос копирования строк n-ое количество раз ниже непустых (Формулы/Formulas)
Макрос копирования строк n-ое количество раз ниже непустых
Markovich Дата: Среда, 04.11.2020, 13:35 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2019
Здравствуйте, уважаемые форумчане! Большое вам спасибо за этот форум, за вашу открытость и готовность помочь в решении непосильных для многих любителей excel задач. Затрудняюсь сосчитать сколько почерпнул здесь полезных решений. Сразу скажу что в макросах не силен, но нужно осилить задачу. Есть таблица, в которую заносятся данные по объектам, количество заполняемых строк может быть от 50 и более 2000. В таблице данные анализируются и просчитываются множеством формул и также с использованием условного форматирования. Из-за большого количества строк с формулами таблица тормозит. Соответственно заготовка таблицы рассчитана на большое количество вводимых данных. Если вводимых данных пара десятков, то оставшаяся пара тысяч строк пересчитывается вхолостую. Хотелось бы создать макрос для копирования строк заданное количество раз для распространения формул. Подобные макросы видел, и в т.ч. очень интересный на этом форуме. Но у меня задача несколько сложнее. Нужно чтобы копировалась строка следующая после строки, в которой заполнена ячейка столбца F листа "Исходные данные" (т.е. по первой пустой ячейки столбца F). Одновременно должна копироваться та же самая строка на листе "service" (эти листы взаимосвязаны формулами). Количество копируемых строк определяет ячейка M4 "Технические сведения". Т.е. смысл в том, что изначально в заготовке 100 строк, я вношу данные и при недостатке строк с формулами макросом добавляется определенное количество строк, если не хватает строк, то еще добавляется. Количество требуемых строк изначально неизвестно. Протаскивать строки неудобно, т.к. в формулах есть массивы и есть еще другая таблица также взаимосвязанная с данной построчно. В приложенном файле пример таблицы. Буду благодарен за любую помощь в решении задачи.
К сообщению приложен файл: 5002093.xls(40.0 Kb)
 
Ответить
СообщениеЗдравствуйте, уважаемые форумчане! Большое вам спасибо за этот форум, за вашу открытость и готовность помочь в решении непосильных для многих любителей excel задач. Затрудняюсь сосчитать сколько почерпнул здесь полезных решений. Сразу скажу что в макросах не силен, но нужно осилить задачу. Есть таблица, в которую заносятся данные по объектам, количество заполняемых строк может быть от 50 и более 2000. В таблице данные анализируются и просчитываются множеством формул и также с использованием условного форматирования. Из-за большого количества строк с формулами таблица тормозит. Соответственно заготовка таблицы рассчитана на большое количество вводимых данных. Если вводимых данных пара десятков, то оставшаяся пара тысяч строк пересчитывается вхолостую. Хотелось бы создать макрос для копирования строк заданное количество раз для распространения формул. Подобные макросы видел, и в т.ч. очень интересный на этом форуме. Но у меня задача несколько сложнее. Нужно чтобы копировалась строка следующая после строки, в которой заполнена ячейка столбца F листа "Исходные данные" (т.е. по первой пустой ячейки столбца F). Одновременно должна копироваться та же самая строка на листе "service" (эти листы взаимосвязаны формулами). Количество копируемых строк определяет ячейка M4 "Технические сведения". Т.е. смысл в том, что изначально в заготовке 100 строк, я вношу данные и при недостатке строк с формулами макросом добавляется определенное количество строк, если не хватает строк, то еще добавляется. Количество требуемых строк изначально неизвестно. Протаскивать строки неудобно, т.к. в формулах есть массивы и есть еще другая таблица также взаимосвязанная с данной построчно. В приложенном файле пример таблицы. Буду благодарен за любую помощь в решении задачи.

Автор - Markovich
Дата добавления - 04.11.2020 в 13:35
Pelena Дата: Среда, 04.11.2020, 22:49 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 16783
Репутация: 3621 ±
Замечаний: ±

Excel 2010, 2016 & Mac Excel
Здравствуйте.
Не уверена, что правильно поняла, особенно про второй лист. Вариант в файле.
К сообщению приложен файл: 8656480.xls(49.0 Kb)


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
СообщениеЗдравствуйте.
Не уверена, что правильно поняла, особенно про второй лист. Вариант в файле.

Автор - Pelena
Дата добавления - 04.11.2020 в 22:49
Markovich Дата: Четверг, 05.11.2020, 09:30 | Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2019
Pelena, большое Вам спасибо! Макрос работает как надо. Только хотелось бы уточнить, как на втором листе сделать, чтобы не была выделена после работы макроса штрих-пунктиром последняя скопированная строка (выделение не снимается). И еще хотел бы спросить, что нужно изменить в макросе, чтобы копировалась строка номер 9 на десятую (нужно для связанной таблицы). И еще каким образом можно сделать, чтобы макрос не работал (например, выдавал ошибку), если заполнено меньше 100 строк.
 
Ответить
СообщениеPelena, большое Вам спасибо! Макрос работает как надо. Только хотелось бы уточнить, как на втором листе сделать, чтобы не была выделена после работы макроса штрих-пунктиром последняя скопированная строка (выделение не снимается). И еще хотел бы спросить, что нужно изменить в макросе, чтобы копировалась строка номер 9 на десятую (нужно для связанной таблицы). И еще каким образом можно сделать, чтобы макрос не работал (например, выдавал ошибку), если заполнено меньше 100 строк.

Автор - Markovich
Дата добавления - 05.11.2020 в 09:30
Pelena Дата: Четверг, 05.11.2020, 13:50 | Сообщение № 4
Группа: Админы
Ранг: Местный житель
Сообщений: 16783
Репутация: 3621 ±
Замечаний: ±

Excel 2010, 2016 & Mac Excel
Так подойдёт?
К сообщению приложен файл: 3958089.xls(52.5 Kb)


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
СообщениеТак подойдёт?

Автор - Pelena
Дата добавления - 05.11.2020 в 13:50
Markovich Дата: Четверг, 05.11.2020, 16:43 | Сообщение № 5
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2019
Pelena, да, с ограничением на количество заполненных строк правильно. Вы меня уж извините, я с самого начала как то витиевато поставил вопрос и не сразу заметил в результате... Задача: нужно копировать строку с первой пустой ячейкой столбца F (после заполненных). там в других ячейках этой строки множество формул. а в созданных макросах копируется строка с последней заполненной ячейкой столбца F. "строка для копирования" - это имелось ввиду пустая ячейка столбца F.
К сообщению приложен файл: 3958089_1.xls(58.5 Kb)


Сообщение отредактировал Markovich - Четверг, 05.11.2020, 16:45
 
Ответить
СообщениеPelena, да, с ограничением на количество заполненных строк правильно. Вы меня уж извините, я с самого начала как то витиевато поставил вопрос и не сразу заметил в результате... Задача: нужно копировать строку с первой пустой ячейкой столбца F (после заполненных). там в других ячейках этой строки множество формул. а в созданных макросах копируется строка с последней заполненной ячейкой столбца F. "строка для копирования" - это имелось ввиду пустая ячейка столбца F.

Автор - Markovich
Дата добавления - 05.11.2020 в 16:43
Pelena Дата: Четверг, 05.11.2020, 18:42 | Сообщение № 6
Группа: Админы
Ранг: Местный житель
Сообщений: 16783
Репутация: 3621 ±
Замечаний: ±

Excel 2010, 2016 & Mac Excel
Ну, прибавьте единичку к номеру последней заполненной строки)
К сообщению приложен файл: 1163493.xls(56.5 Kb)


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
СообщениеНу, прибавьте единичку к номеру последней заполненной строки)

Автор - Pelena
Дата добавления - 05.11.2020 в 18:42
Markovich Дата: Четверг, 05.11.2020, 19:14 | Сообщение № 7
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2019
Большое спасибо! То что надо.
 
Ответить
СообщениеБольшое спасибо! То что надо.

Автор - Markovich
Дата добавления - 05.11.2020 в 19:14
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Макрос копирования строк n-ое количество раз ниже непустых (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

jooble Яндекс цитирования
© 2010-2020 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!