Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Создание листов книги по шаблону - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Создание листов книги по шаблону
Создание листов книги по шаблону
Матраскин Дата: Пятница, 07.09.2012, 15:49 | Сообщение № 1
Группа: Друзья
Ранг: Обитатель
Сообщений: 375
Репутация: 81 ±
Замечаний: 0% ±

20xx
Новую книгу по шаблону можно создать следующим макросом
[vba]
Код
Sub Tamplate_1()
      Application.Workbooks.Add ("G:\saveData\test.xlsx")
End Sub
[/vba]
А как создать по шаблону несколько листов в книге с помощью макроса?)))

в интернете опять кто-то не прав
 
Ответить
СообщениеНовую книгу по шаблону можно создать следующим макросом
[vba]
Код
Sub Tamplate_1()
      Application.Workbooks.Add ("G:\saveData\test.xlsx")
End Sub
[/vba]
А как создать по шаблону несколько листов в книге с помощью макроса?)))
Автор - Матраскин
Дата добавления - 07.09.2012 в 15:49
Serge_007 Дата: Пятница, 07.09.2012, 15:55 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
А просто в настройках поставить нужное кол-во листов в новых книгах не подойдёт?

ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
СообщениеА просто в настройках поставить нужное кол-во листов в новых книгах не подойдёт?
Автор - Serge_007
Дата добавления - 07.09.2012 в 15:55
KuklP Дата: Пятница, 07.09.2012, 16:01 | Сообщение № 3
Группа: Проверенные
Ранг: Старожил
Сообщений: 2369
Репутация: 486 ±
Замечаний: 0% ±

2003-2010
[vba]
Code
Sheets.Add Type:= "Полный_адрес_Вашего_шаблона.xlt"
[/vba] В цикле задаете нужное к-во листов.

Ну с НДС и мы чего-то стoим! kuklp60@gmail.com
WM Z206653985942, R334086032478, U238399322728
 
Ответить
Сообщение[vba]
Code
Sheets.Add Type:= "Полный_адрес_Вашего_шаблона.xlt"
[/vba] В цикле задаете нужное к-во листов.
Автор - KuklP
Дата добавления - 07.09.2012 в 16:01
vikttur Дата: Пятница, 07.09.2012, 16:02 | Сообщение № 4
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2941
Репутация: 526 ±
Замечаний: 0% ±

Пять новых листов в этой книге:
[vba]
Code
Sub Tamplate_2()
Dim i&
     For i = 1 To 5
         ThisWorkbook.Sheets.Add
     Next i
End Sub
[/vba]
 
Ответить
СообщениеПять новых листов в этой книге:
[vba]
Code
Sub Tamplate_2()
Dim i&
     For i = 1 To 5
         ThisWorkbook.Sheets.Add
     Next i
End Sub
[/vba]
Автор - vikttur
Дата добавления - 07.09.2012 в 16:02
KuklP Дата: Пятница, 07.09.2012, 16:04 | Сообщение № 5
Группа: Проверенные
Ранг: Старожил
Сообщений: 2369
Репутация: 486 ±
Замечаний: 0% ±

2003-2010
Витя, Серег, вопрос был: "А как создать по шаблону..."

Ну с НДС и мы чего-то стoим! kuklp60@gmail.com
WM Z206653985942, R334086032478, U238399322728

Сообщение отредактировал KuklP - Пятница, 07.09.2012, 16:06
 
Ответить
СообщениеВитя, Серег, вопрос был: "А как создать по шаблону..."
Автор - KuklP
Дата добавления - 07.09.2012 в 16:04
Gustav Дата: Пятница, 07.09.2012, 16:05 | Сообщение № 6
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2758
Репутация: 1139 ±
Замечаний: 0% ±

начинал с Excel 4.0, видел 2.1
Quote (Serge_007)
А просто в настройках поставить нужное кол-во листов в новых книгах не подойдёт?

Если по шаблону создается, то количество листов наследуется из шаблона.

МОИ: Ник, Tip box: 41001663842605
 
Ответить
Сообщение
Quote (Serge_007)
А просто в настройках поставить нужное кол-во листов в новых книгах не подойдёт?

Если по шаблону создается, то количество листов наследуется из шаблона.
Автор - Gustav
Дата добавления - 07.09.2012 в 16:05
Serge_007 Дата: Пятница, 07.09.2012, 16:06 | Сообщение № 7
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
Я прочитал: "как создать в шаблоне несколько листов" smile
Сори

ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
СообщениеЯ прочитал: "как создать в шаблоне несколько листов" smile
Сори
Автор - Serge_007
Дата добавления - 07.09.2012 в 16:06
Матраскин Дата: Пятница, 07.09.2012, 16:06 | Сообщение № 8
Группа: Друзья
Ранг: Обитатель
Сообщений: 375
Репутация: 81 ±
Замечаний: 0% ±

20xx
мне надо получить книгу с большим кол-вом листов которые заполненны определённым образом.(все по разному) Однко у них общая структура: шапка , какие то бесполезные очень нужные комментарии, заголовки. Поэтому хотелось бы чтобы листы создавались сразу с нужной мне структурой.

P.s. пока писал....тут уже столько насоветовали))

в интернете опять кто-то не прав

Сообщение отредактировал Матраскин - Пятница, 07.09.2012, 16:08
 
Ответить
Сообщениемне надо получить книгу с большим кол-вом листов которые заполненны определённым образом.(все по разному) Однко у них общая структура: шапка , какие то бесполезные очень нужные комментарии, заголовки. Поэтому хотелось бы чтобы листы создавались сразу с нужной мне структурой.

P.s. пока писал....тут уже столько насоветовали))
Автор - Матраскин
Дата добавления - 07.09.2012 в 16:06
KuklP Дата: Пятница, 07.09.2012, 16:07 | Сообщение № 9
Группа: Проверенные
Ранг: Старожил
Сообщений: 2369
Репутация: 486 ±
Замечаний: 0% ±

2003-2010
Матраскин, я Вам показал в Сообщение № 3. А Виктор показал, как это зациклить.

Ну с НДС и мы чего-то стoим! kuklp60@gmail.com
WM Z206653985942, R334086032478, U238399322728

Сообщение отредактировал KuklP - Пятница, 07.09.2012, 16:09
 
Ответить
СообщениеМатраскин, я Вам показал в Сообщение № 3. А Виктор показал, как это зациклить.
Автор - KuklP
Дата добавления - 07.09.2012 в 16:07
vikttur Дата: Пятница, 07.09.2012, 16:10 | Сообщение № 10
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2941
Репутация: 526 ±
Замечаний: 0% ±

Quote (KuklP)
вопрос был: "А как создать по шаблону..."

Зато у меня буковок больше smile
 
Ответить
Сообщение
Quote (KuklP)
вопрос был: "А как создать по шаблону..."

Зато у меня буковок больше smile
Автор - vikttur
Дата добавления - 07.09.2012 в 16:10
Gustav Дата: Пятница, 07.09.2012, 16:13 | Сообщение № 11
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2758
Репутация: 1139 ±
Замечаний: 0% ±

начинал с Excel 4.0, видел 2.1
Quote (KuklP)
А Виктор показал, как это зациклить

Циклить не обязательно, там Count есть:

[vba]
Code

Sheets.Add(Before, After, Count, Type)
[/vba]

МОИ: Ник, Tip box: 41001663842605
 
Ответить
Сообщение
Quote (KuklP)
А Виктор показал, как это зациклить

Циклить не обязательно, там Count есть:

[vba]
Code

Sheets.Add(Before, After, Count, Type)
[/vba]
Автор - Gustav
Дата добавления - 07.09.2012 в 16:13
Матраскин Дата: Пятница, 07.09.2012, 16:20 | Сообщение № 12
Группа: Друзья
Ранг: Обитатель
Сообщений: 375
Репутация: 81 ±
Замечаний: 0% ±

20xx
Gustav, а Вы не знаете, что ещё наследуется из шаблона? потому что оно вставляет эти листы(листы сделанные по шаблону) после 1 листа в книге, а хотелось бы после второго)
KuklP, спасибо , работает! happy

в интернете опять кто-то не прав

Сообщение отредактировал Матраскин - Пятница, 07.09.2012, 16:23
 
Ответить
СообщениеGustav, а Вы не знаете, что ещё наследуется из шаблона? потому что оно вставляет эти листы(листы сделанные по шаблону) после 1 листа в книге, а хотелось бы после второго)
KuklP, спасибо , работает! happy
Автор - Матраскин
Дата добавления - 07.09.2012 в 16:20
Gustav Дата: Пятница, 07.09.2012, 16:24 | Сообщение № 13
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2758
Репутация: 1139 ±
Замечаний: 0% ±

начинал с Excel 4.0, видел 2.1
Quote (Матраскин)
потому что оно вставляет эти листы(листы сделанные по шаблону) после 1 листа в книге, хотелось бы после второго)

Так укажите явно после какого вставлять:
[vba]
Code

Sheets.Add After:= Sheets(2), Count:= 20 'новых листов
[/vba]

МОИ: Ник, Tip box: 41001663842605
 
Ответить
Сообщение
Quote (Матраскин)
потому что оно вставляет эти листы(листы сделанные по шаблону) после 1 листа в книге, хотелось бы после второго)

Так укажите явно после какого вставлять:
[vba]
Code

Sheets.Add After:= Sheets(2), Count:= 20 'новых листов
[/vba]
Автор - Gustav
Дата добавления - 07.09.2012 в 16:24
Матраскин Дата: Пятница, 07.09.2012, 16:35 | Сообщение № 14
Группа: Друзья
Ранг: Обитатель
Сообщений: 375
Репутация: 81 ±
Замечаний: 0% ±

20xx
[vba]
Код
Sheets.Add After:=Sheets(2), Type:="путь.xltm"
[/vba]
вставляет страницы-шаблоны после второй странице в книге

вот такой вот получился, вдруг кому ещё поможет)) Всем большое спасибо!

в интернете опять кто-то не прав
 
Ответить
Сообщение[vba]
Код
Sheets.Add After:=Sheets(2), Type:="путь.xltm"
[/vba]
вставляет страницы-шаблоны после второй странице в книге

вот такой вот получился, вдруг кому ещё поможет)) Всем большое спасибо!
Автор - Матраскин
Дата добавления - 07.09.2012 в 16:35
Пуш Дата: Вторник, 04.02.2014, 20:17 | Сообщение № 15
Группа: Гости
Товарищи прошу помощи.

Надо как и в исходном вопросе вставить несколько листов по шаблону, но есть несколько нюансов:
1) шаблон находится во втором листе книги в которую и надо вставлять новые листы с шаблоном (который называется Act)
2) вставить надо такое количество листов которое соответствует ячейке A1 на первом листе.

Помогите плиз с кодом.
[moder]Читаем Правила форума и создаем свою тему
 
Ответить
СообщениеТоварищи прошу помощи.

Надо как и в исходном вопросе вставить несколько листов по шаблону, но есть несколько нюансов:
1) шаблон находится во втором листе книги в которую и надо вставлять новые листы с шаблоном (который называется Act)
2) вставить надо такое количество листов которое соответствует ячейке A1 на первом листе.

Помогите плиз с кодом.
[moder]Читаем Правила форума и создаем свою тему
Автор - Пуш
Дата добавления - 04.02.2014 в 20:17
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Создание листов книги по шаблону
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!