Сбор таблиц с раных листов книги.

[KOSTIK1]

Доброго времени суток.
Вновь нуждаюсь в помощи от специалистов по программированию. Скажу сразу, перерыл интернет но не нашел ничего подходящего. Поэтому прошу помочь разрешить мою задачу т.к. в ВБА не силен. Заранее благодарен за любые советы.

Нужно следующее:
1. При нажатии кнопки "Собрать" начиная со строки А26 собрать все имеющиеся таблицы которые имеются на листах окрашенных красным цветом (WP 01, WP 02, WP 03, WP ... может быть до 25 штук, Tool, A01, A02, A03, A...может быть до 25 штук, Теst 01, Test 02, Test 03, Step 01, Step 02, Step 03.)

2. Правее скопированной таблицы внести ее название из А1 каждого листа и создать на него гиперссылку.

3. При нажатии на "Очистить" удалить начиная с А26 и до конца созданную таблицу.

Файл прилагаю.

[IgorGO]

видите-ли, Костя,
если не плодить 4х25 однотипных листов, а сделать 1 (ОДИН) лист с дополнительной колонкой (в которую записать WP1...WP25, A1...A25, Test1.......):
1. отпадет необходимость в написании макросов для сбора данных
2. с помощью фильтра можно будет получать любые выборки по базе данных
3. а если над таблицей сделать несколько строк с ПОМЕЖУТОЧНЫЕ.ИТОГИ - то еще и элементарно видеть итоговые значения по отфильтрованным данным

только такой нюанс: макрос писать будет кто-то здесь, с собрать руками общую таблицу и настроить формул - предстоит Вам.
даже не знаю... возможно, я тоже предпочел бы, чтобы кто-то сделал все за меня

[KOSTIK1]

Спасибо Игорь за ответ и предложения которые которые я вижу конструктивными, но в этом та вся загвоздка, по мере поступления данных они вносятся соответственно по листам(каждый пользователь свои) и в них может быть пару строк а может и 50 и конечно изменить всю систему на фирме не могу. Поэтому предложенный вами вариант к сожалению не возможен. Прошу помочь в написании макроса, а подогнать попробую сам.

[IgorGO]

они вносятся соответственно по листам(каждый пользователь свои)

на свой лист пользователь может внести данные, а в общий - никак! отличная логика.
логичнее - уж пусть уже отчеты присылают (с доп.колонкой) а ответсвенный человек складывает все о общий файл

я не могу себя заставить принять участие в том, что Вы затеяли...

[KOSTIK1]

Вы правы, немного за мудрено, но принцип такой, пользователь раз в неделю/две шлёт свой лист, например WP 01, к общей книге нет доступа. Ответственный, получив от всех данные удаляет из общей книги лист WP 01 и вставляет полученный и т.д. С отдельными листами работать проще нежели с одним, можно легко что либо не то удалить и т.п. И к тому же, только WP и A листы могут меняться, а остальные нет.

я не могу себя заставить принять участие в том, что Вы затеяли...

Прошу прощения, но и я этого не хотел (заставлять). Хотя, возможно кто то захочет, за что большое спасибо.

[Hugo121]

Пишите макрос - из активного листа скопировать всё в книгу с макросом в ну допустим первый лист в первую пустую строку. Сбоку в столбец дописать название листа откуда копировалось.

и тогда процесс такой - открыта общая книга, открыт присланный файл - ответственный чел. жмёт кнопку на панели. Или в меню ячейки выбирает, или по alt+F8.
И всё.
Главное два раза один файл не обработать.

Писать код некогда, и не интересно. Это уже рутина... что неинтересно.

[EducatedFool]

Ответственный, получив от всех данные удаляет из общей книги лист WP 01 и вставляет полученный и т.д.

а нафига?
почему макросом не собрать данные в одну таблицу (на один лист)?

пример макроса:
http://excelvba.ru/code/CombineFiles

[KOSTIK1]

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

[KOSTIK1]

Решено. Может кому надо.
Всем спасибо за советы.