Прескочи на основното съдържание

Как бързо да създадете няколко листа със същия формат в Excel?

Автор: Слънце Последна промяна: 2022-03-29

Например, създали сте лист със специфично форматиране и сега искате да създадете няколко листа със същия формат като този лист, как бихте могли бързо да решите тази задача в Excel? Този урок говори за методи за създаване на множество листа със същия формат.

Създавайте листове със същия формат чрез Преместване или Копиране

Създайте листове със същия формат от VBA

Създайте листове със същия формат чрез Копиране на няколко работни листа на Kutools за Excel добра идея3


Създавайте листове със същия формат чрез Преместване или Копиране

В Excel можете да използвате командата Преместване или Копиране, за да създадете лист със същия формат като избрания от вас лист.

1. Щракнете върху листа, който е с формата, от който се нуждаете Лента с раздели на листаи щракнете с десния бутон, за да изберете Преместване или копиране от контекстното меню. Вижте екранна снимка:

doc лист със същия формат 1

2. След това в изскачащия диалогов прозорец поставете отметка Създайте копие опция. Вижте екранна снимка:

doc лист със същия формат 2

3. кликване OK. Създава се нов лист със същия формат в предната част на избрания лист. Вижте екранна снимка:

doc лист със същия формат 3

Забележка:

(1) Можете също да щракнете Начало > формат > Преместване или копиране на лист за да активирате Преместване или копиране диалогов прозорец.

(2) Този метод ще отнеме много време, когато трябва да създадете стотици листове с един и същи формат.


Създайте листове със същия формат от VBA

Има VBA код, който може да ви помогне бързо да създадете няколко листа със същия формат наведнъж.

1. Натиснете Alt + F11 бутони за отваряне Microsoft Visual Basic за приложения прозорец, след което щракнете Поставете > Модули, копирайте и поставете кода по-долу в Модули прозорец.

VBA: Създайте листове със същия формат.

Sub CopyWorkSheets()
'Updateby20150526
Dim xNumber As Integer
Dim xWsName As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
xWsName = Application.InputBox("Copy worksheet name", xTitleId, , Type:=2)
xNumber = Application.InputBox("Copy number", xTitleId, , Type:=1)
For i = 1 To xNumber
    Application.ActiveWorkbook.Sheets(xWsName).Copy _
    After:=Application.ActiveWorkbook.Sheets(xWsName)
Next
End Sub

2. Натиснете F5 за да изпълните VBA кода, след което се появява диалогов прозорец, в който да въведете името на работния лист, което трябва да копирате във формата му.

doc лист със същия формат 4

3. кликване OKи посочете необходимия брой копия в друг изскачащ диалогов прозорец. Вижте екранна снимка:

doc лист със същия формат 5

4. кликване OK. След това има създадени шест копия на работни листове със същия формат.


Създайте листове със същия формат чрез Копиране на няколко работни листа на Kutools за Excel

Ако не обичате да използвате VBA, тук ви представям един удобен инструмент – Kutools за Excel, можете да използвате неговия Копиране на работни листове помощна програма за бързо и лесно създаване на листове със същия формат.

Kutools за Excel, с повече от 300 удобни функции, прави работата ви по-лесна. 

След безплатно инсталиране Kutools за Excel, моля, направете следното:

1. кликване Kutools плюс > Работен лист > Копиране на работни листове. Вижте екранна снимка:

doc копиране на няколко работни листа 1

2. В Копиране на множество работни листове диалогов прозорец, направете следното:

(1) Проверете името на работния лист, чиито формат искате да копирате, от списъчното поле Копирайте избраните работни листове;

(2) Посочете броя на копията;

(3) Посочете мястото, където искате да поставите копията.

doc лист със същия формат 7

3. кликване Ok, изскача диалогов прозорец, за да ви напомни, че копията са създадени успешно. Кликнете OK да го затворите.

doc лист със същия формат 8

Сега можете да видите определения брой листове, създадени със същия формат.
doc kutools копиране на работни листове 4

Щракнете тук, за да научите повече подробности за Копиране на няколко работни листа

Най-добрите инструменти за продуктивност в офиса

🤖 Kutools AI помощник: Революционизирайте анализа на данни въз основа на: Интелигентно изпълнение   |  Генериране на код  |  Създаване на персонализирани формули  |  Анализирайте данни и генерирайте диаграми  |  Извикване на функциите на Kutools...
Популярни функции: Намерете, маркирайте или идентифицирайте дубликати   |  Изтриване на празни редове   |  Комбинирайте колони или клетки без загуба на данни   |   Кръг без формула ...
Супер търсене: VLookup с множество критерии    VLookup с множество стойности  |   VLookup в няколко листа   |   Размито търсене ....
Разширен падащ списък: Бързо създаване на падащ списък   |  Зависим падащ списък   |  Падащ списък с множество избори ....
Мениджър на колони: Добавете конкретен брой колони  |  Преместване на колони  |  Превключване на състоянието на видимост на скритите колони  |  Сравнете диапазони и колони ...
Препоръчани функции: Мрежов фокус   |  Изглед на дизайна   |   Голям формула бар    Мениджър на работни книги и листове   |  Библиотека с ресурси (Автоматичен текст)   |  Избор на дата   |  Комбинирайте работни листове   |  Шифроване/декриптиране на клетки    Изпращайте имейли по списък   |  Супер филтър   |   Специален филтър (филтър получер/курсив/зачертано...) ...
Топ 15 комплекта инструменти12 Текст Инструменти (добавяне на текст, Премахване на символи, ...)   |   50 + Графика Видове (диаграма на Гант, ...)   |   40+ Практичен формули (Изчислете възрастта въз основа на рождения ден, ...)   |   19 вмъкване Инструменти (Въведете QR код, Вмъкване на картина от пътя, ...)   |   12 Конверсия Инструменти (Числа към думи, Валутен обмен, ...)   |   7 Обединяване и разделяне Инструменти (Разширено комбиниране на редове, Разделени клетки, ...)   |   ... и още

Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време.  Щракнете тук, за да получите функцията, от която се нуждаете най-много...

Описание


Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна

  • Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
  • Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!
Comments (12)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Are you able to add in code to the VBA by automatically changing the sheet name? instead of doing that manually?
This comment was minimized by the moderator on the site
Thank you SO MUCH! I've always created multiple sheets, then copy/paste the data, but that doesn't copy over the "print gridlines" formatting, which I often forget to select. The actual copy/ paste bit doesn't save me that much in actual min:sec, but it saves me so much in aggravation. I love this! I've copied your instructions and will use them every month from now on. Thank you, again!
This comment was minimized by the moderator on the site
I created a file that contains 12 sheets, one for each month. Each month should have the same page format. I finished decorating my page but when I look at each sheet, I realize that only January, March, July, and September were modified. Why did this happen? How do I fix it?
This comment was minimized by the moderator on the site
Which method you use? Both of above methods, you need to format a sheet first, then apply the methods.
This comment was minimized by the moderator on the site
I need multiple copies of the entire WORKBOOK with multiple sheets in each book.
This comment was minimized by the moderator on the site
Directly copy the workbooks and paste them in several copies with different names?
This comment was minimized by the moderator on the site
I NEED TO CREATE TIMESHEETS FOR 25 WORKERS EVERY MONTH USING 1 TIMESHEET FORMAT, HOW DO I CHANGE THE NAMES ONCE SO THAT IT PRINTS ALL 25 TIMSHEETS WITH EACH WORKERS NAME
This comment was minimized by the moderator on the site
You can use Kutools for Excel's Create Sequence Worksheet utility to solve your problem. For more details, you can refer to this site:https://www.extendoffice.com/product/kutools-for-excel/create-sequence-worksheets.html
This comment was minimized by the moderator on the site
I was hoping to do something similar, but wayyy more complicated. Do you have tips?

----
I have to create 79 tabs in excel using a standard template [see below], but that references sequential values in a separate worksheet. We will call the template worksheet "Template" and the worksheet that contains the reference values "Reference". I need help creating a macro to do the following:

1) Copy the template 79 times.


2) Name each new worksheet according to the sequential rows in column F of "Reference" (so the first copy of "Template" would have a name defined in F3 in the "Reference" sheet. the second copy of "Template" would have a name defined by F4, etc. etc. etc).


3) Set the values of cells in the new worksheets (i.e. the copies of "Template") equal to sequential rows in Column A, B, C, D, E of the worksheet "Reference", such that copy 1 of the "Template" references cells A3, B3, C3, D3 and E3; copy 2 of the "Template" references cells A4, B4, C4, D4, E4; etc.
This comment was minimized by the moderator on the site
Firstly, you can use the Split Data utility function of Kutools to split each row or the range to a separate sheet in a new workbook, then copy the column or "reference" which use to name the sheet to one of the sheet in the new workbook, and apply Rename Multiple Worksheet and check From specific range to select the cells you have copied to rename the sheets. Then remove the reference cells.
This comment was minimized by the moderator on the site
I do not why one file is missing after reply~here are the complicated screenshots, 1,3,4,5,6.
This comment was minimized by the moderator on the site
THANK YOU!! I needed 15 copies of a worksheet and it would've taken me ages to do without this. Thanks a million.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations