|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
11.11.2010, 13:30 | #1 |
Пользователь
Регистрация: 08.11.2010
Сообщений: 33
|
Макрос переноса строк
Добрый день коллеги, у меня возникла задача: Найти в столбце "i" на всех листах книги "не пустые" ячейки (заполнение происходит по выпадаемому списку) и перенести содержащие такие ячейки строки целиком в лист "макро-регион". Обьем книги будет постоянно расти до 3000 строк.
К сожалению найденные на форуме решения не подходят для моей задачи, поэтому обращаюсь к вам за помощью, и прикрепляю свой файл |
11.11.2010, 13:59 | #2 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
кнопка "БАНЗАЙ!" на листе "макро-регион"
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
11.11.2010, 14:04 | #3 |
Пользователь
Регистрация: 08.11.2010
Сообщений: 33
|
Спасибо большое, а возможно реализовать функцию переноса (а не копирования)
|
11.11.2010, 14:14 | #4 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
перенос - это в смысле:
вырезать с исходного листа? или перенести только данные без форматов, формул, проверок и прочего?
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
11.11.2010, 14:18 | #5 |
Пользователь
Регистрация: 08.11.2010
Сообщений: 33
|
Имеется в виду вырезать с исходных листов и поместить в лист "Макро-Регион".
В итоге должен получиться лист с отработанной инфой ("Макро-Регион"), а остальных листах остались лишь рабочие данные (пустой столбец "i"). |
11.11.2010, 14:25 | #6 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
замените
.Rows(R).Copy на .Rows(R).Cut
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
11.11.2010, 14:41 | #7 |
Пользователь
Регистрация: 08.11.2010
Сообщений: 33
|
Спасибо, это именно то, что нужно
|
11.11.2010, 17:59 | #8 |
Пользователь
Регистрация: 28.08.2009
Сообщений: 34
|
Чтобы не создавать лишней темы решил написать здесь, так как в принципе задача идентична но:
1. Как из листа "цех №1" копировать в лист "сюда цех№1 " строки с тем условием, что если номера из листа "цех №1" не совпадают с номерами в листе "список рн" в 1-ом столбце. 2. всё также только вместо "цех №1" идёт "цех №2" |
11.11.2010, 19:33 | #9 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
masterenergy, добавите в проект модуль, скопируйте в него этот
Код:
новые данные дописываются на листы "сюда цех№..."
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
11.11.2010, 20:32 | #10 |
Старожил
Регистрация: 15.05.2008
Сообщений: 2,058
|
2 masterenergy
Категорически НЕ рекомендую пробелы в имени рабочего листа, были замечены проблемы. Лучше напишите так: СюдаЦех№1 или сюда_цех_№1
"Дайте людям рыбы, и вы накормите их на весь день; научите их ловить рыбу - и вы накормите их на всю жизнь"
"Большое спасибо" - Z261597841314, R208907249777, U447361470499 |
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Макрос на сравнение и подсчет в первом столбце строк, и сумирование значений этих строк в другом столбце | Shpr0T | Microsoft Office Excel | 8 | 30.08.2010 17:52 |
Макрос для переноса данных в виде таблицы из Excel в Word | Jevgeni85 | Microsoft Office Excel | 2 | 25.08.2010 16:52 |
Макрос переноса строк на другой лист | cargoline9 | Microsoft Office Excel | 11 | 15.12.2009 22:05 |
Проблема переноса строк из одного списка (Listbox) в другой. | hip3r | Win Api | 4 | 13.10.2009 11:59 |