Во! Это похоже на то, что мне хотелось! Спасибо!
Буду испытывать в реальных условиях.

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

Данные для примера. Суть в том, что 1 номер, в рамках одного ШР, КР или КП, может иметь несколько подключений, что приведено на примере номера 100 (остальные номера для массовости и наглядности примера). Надо, чтоб была возможность отследить отдельно все трассы подключений, т.е. если номер 100, в ШР1, подключен к парам 0 и 10, от которых трассы идут дальше - в другие ШР (КР, КП), то мне хочется, чтоб выводилось так (примерно):
ШР1 ... 0........
ШР2 ... 4........
(дальнейшая трасса)
(пустая строка)
ШР1 ... 10......
ШР3 ... 2.......
(дальнейшая трасса)

Это упрощенно, поскольку в ШР2, ШР3, КР1, КП1 и т.д. тоже могут быть такие же ветвления, которые так же хотелось бы выделить. Это для того, чтоб, при необходимости каких-то действий с номером, сформировать, отпечатать отчет и идти разбираться с одним листочком, а не с целой кипой (у меня это целая папка (резервная копия для меня и начальника) - каждый ШР, КР, КП на отдельном листе)

Решение, безусловно, интересное. Спасибо. Однако, у меня сейчас так же последовательно прописывается в таблицу, не наглядно (хоть и привычно). А мне хотелось сделать как-то более наглядно.

Нет. Я делал с помощью формул, получилось громоздко и не учитывает вариантов с добавлением новых листов - например, монтаж новых ШР, КР или КП. Сейчас у меня работает вариант, где выборка производится VBA, но выборка последовательная.
Смысл-то в том, чтоб сделать динамическую (не зависящую от количества листов), рекурсивную выборку. Вот тут пока сообразить не могу что-то (наверное уже в отпуск пора).

Здравствуйте, товарищи!
Я не часто программирую, поэтом, нарисовав себе задачу, вроде бы и простую, столкнулся с небольшими сложностями. Надеюсь, вы сможете подсказать приличное решение. Эта задача у меня решена и она работает, но мне не нравится такое решение, хочу переделать...
Задача:
Есть АТС с некоторым количеством абонентов. Сеть связи раскидана по территории предприятия. Подключения идут через ШР (Шкаф распределительный), КР (Коробка распределительная) и КП (Кросс-панель).
Сеть связи старая. Некоторые номера подключены скрутками или клеммниками (где как) и могут идти в разные здания. Необходимо по всем листам ШР, КР, КП найти интересующий номер и построить трассы - если всюду последовательное подключение, то одну трассу, если есть где-то ветвления, то, соответственно, выделить отдельные ветки и построить трассы целиком.
Не могу пока сообразить, как эту задачу красиво решить, чтоб учитывала различные варианты ветвлений по трассе - количество ШР, КР и КП неизвестно заранее, равно как и ответвления могут быть на любом этапе.
То решение, которое я накидал, меня не устраивает своей громоздкостью...
Подскажите пожалуйста, как можно эту задачу решить более-менее универсально, а то я, в силу своего небольшого опыта с VBA, пока не смог получить удовлетворяющее меня решение.
Файл с примером прилагаю.

Всем большое спасибо за помощь!
Задача решена.

Супер! Спасибо! То, что надо!

Нет, нужен файл, в котором будут только "Общий отчет" и листы, перечисленные в строке 4 листа "Общий отчет", т.е. в примере - только 3 листа. Больше там ничего быть не должно, в том числе и кнопок - это результирующий отчет для руководства.

Хорошо. Вот один из последних тестовых вариантов. В итоговый отчет должны попасть листы, перечисленные в строке 4 листа "Общий отчет", включая сам лист "Общий отчет". Количество этих листов определяется значением из ячейки "Общий отчет!B3".

А файлы зачем? Суть вопроса конкретно указана:Сами файлы приложить не могу, поскольку они содержат персональные данный и информацию, составляющую коммерческую тайну.
Мне важно понять, почему не формируется книга с указанным списком листов.

Здравствуйте, товарищи!
Прошу помочь, подсказать решение 1 маленькой проблемы, которую я не смог пока забороть:
Есть книга Excel, в которой куча листов. Есть лист "Общий отчет" и имена листов, перечисленные на листе "Общий отчет".
Надо перечисленные листы скопировать в другую книгу и сохранить.
Я сформировал массив arsheets(), который правильно выводится в ячейки (тестовая проверка сформированного массива) - попадает сюда только то, что нужно, но, при попытке скопировать этот массив листов в другой файл, ничего не происходит или копируются все листы.
Выводить пытался разными методами. Вот один из последних (взято с сайта MS):

то файл с 1 листом "Общий отчет" формировался и кнопки удалялись...

Не могу сообразить, что я делаю не так...