Создание множества листов в одном документе

Создание множества листов в одном документе, Создание множества листов в одном документе

Пользователь

Сообщений: 32 Регистрация: 22.06.2021

24.04.2024 11:41:43

Добрый день! Столкнулся сейчас с такой проблемкой. Нужно создать около 100 листов в одном документе с одинаковой таблицей. Вручную это очень долго. Может есть варианты как это можно быстро сделать? Офис у меня 2021 года установлен.

МатросНаЗебре

Пользователь

Сообщений: 6559 Регистрация: 05.02.2014

24.04.2024 12:05:58

Код
Sub Макрос1() Dim ii As Long For ii = 1 To 100 ActiveSheet.Copy After:=Sheets(Sheets.Count) Next End Sub

Иван Костюченко Пользователь Сообщений: 32 Регистрация: 22.06.2021	#3 24.04.2024 12:33:43 Спасибо большое. Не умел пользоваться макросами, но тут получилось)