Доброго всем времени суток!
Подскажите, может у кого то есть решение.
Есть таблица, пример прикреплен, с большим количеством листов. Один или несколько листов всегда видимые, остальные скрыты, таких около сотни. Для упрощения работы мне необходимо отображать сразу несколько листов и потом скрывать их.
Скрыть листы не проблема - один или несколько.
Показать все скрытые листы тоже не проблема, у меня для этого вот такой Макрос, он же в коде примера. Мне же необходимо отображать только конкретные листы, их может быть несколько. И очень неудобно делать через функцию "Показать", там только один лист и есть возможность ошибиться, выбрать не тот или не выбрать нужный.
Как изменить этот макрос, что бы после запуска была возможность выбрать один или несколько листов для отображения или из при выделении нескольких ячеек в диапазоне с именами листов???
Если тема на подобии уже была и есть решение, если не сложно, дайте ссылку, я не нашел, к сожалению.
Подскажите, может у кого то есть решение.
Есть таблица, пример прикреплен, с большим количеством листов. Один или несколько листов всегда видимые, остальные скрыты, таких около сотни. Для упрощения работы мне необходимо отображать сразу несколько листов и потом скрывать их.
Скрыть листы не проблема - один или несколько.
Показать все скрытые листы тоже не проблема, у меня для этого вот такой Макрос, он же в коде примера. Мне же необходимо отображать только конкретные листы, их может быть несколько. И очень неудобно делать через функцию "Показать", там только один лист и есть возможность ошибиться, выбрать не тот или не выбрать нужный.
Как изменить этот макрос, что бы после запуска была возможность выбрать один или несколько листов для отображения или из при выделении нескольких ячеек в диапазоне с именами листов???
Если тема на подобии уже была и есть решение, если не сложно, дайте ссылку, я не нашел, к сожалению.
| Код |
|---|
Sub ПоказатьВсеЛисты() Dim ws As Worksheet For Each ws In ActiveWorkbook.Worksheets ws.Visible = xlSheetVisible Next ws End Sub |
Изменено: - 18.09.2024 11:06:51