Страницы: 1
RSS
Как скопировать несколько листов с "умными" таблицами в другую книгу, «Невозможно скопировать или переместить группу листов содержащих таблицу»
 
Доброго времени суток, Планетяне!
Создал тему, чтобы сохранить у себя в закладках, т.к. решения не нашёл и подсмотрел у автора сайта  :)

Очевидное решение - копировать по одному листу в цикле, НО ошибка всё-равно появляется. Оказывается, достаточно просто снять выделение с группы листов (ActiveSheet.Select) и всё — можно копировать массивом всё и сразу  ;)
Пример кода
спасибо, Николай Владимирович!  :)

Тема с таким же вопросом по PLEX'у
Метод копирования выделенных листов без цикла (Казанский) (не сработает для умных таблиц)
Изменено: Jack Famous - 11.07.2019 16:10:02
Во всех делах очень полезно периодически ставить знак вопроса к тому, что вы с давних пор считали не требующим доказательств (Бертран Рассел) ►Благодарности сюда◄
 
Цитата
написал:
Создал тему, чтобы сохранить у себя в закладках, т.к. решения не нашёл
В дополнение коллекции.

Мне нужно сохранять конкретные листы, а не выделенные.
Сначала удаляю макросом все лишние листы. Затем  удаляю все запросы в файле. Сохраняю книгу под новым именем. Открываю исходный файл, снова удаляю лишние листы оставляя новую группу файлов... и т.д
Страницы: 1
Наверх