Как бързо да създадете няколко листа със същия формат в Excel?
Например, създали сте лист със специфично форматиране и сега искате да създадете няколко листа със същия формат като този лист, как бихте могли бързо да решите тази задача в Excel? Този урок говори за методи за създаване на множество листа със същия формат.
Създавайте листове със същия формат чрез Преместване или Копиране
Създайте листове със същия формат от VBA
Създайте листове със същия формат чрез Копиране на няколко работни листа на Kutools за Excel
Създавайте листове със същия формат чрез Преместване или Копиране
В Excel можете да използвате командата Преместване или Копиране, за да създадете лист със същия формат като избрания от вас лист.
1. Щракнете върху листа, който е с формата, от който се нуждаете Лента с раздели на листаи щракнете с десния бутон, за да изберете Преместване или копиране от контекстното меню. Вижте екранна снимка:
2. След това в изскачащия диалогов прозорец поставете отметка Създайте копие опция. Вижте екранна снимка:
3. кликване OK. Създава се нов лист със същия формат в предната част на избрания лист. Вижте екранна снимка:
Забележка:
(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 кода, след което се появява диалогов прозорец, в който да въведете името на работния лист, което трябва да копирате във формата му.
3. кликване OKи посочете необходимия брой копия в друг изскачащ диалогов прозорец. Вижте екранна снимка:
4. кликване OK. След това има създадени шест копия на работни листове със същия формат.
Създайте листове със същия формат чрез Копиране на няколко работни листа на Kutools за Excel
Ако не обичате да използвате VBA, тук ви представям един удобен инструмент – Kutools за Excel, можете да използвате неговия Копиране на работни листове помощна програма за бързо и лесно създаване на листове със същия формат.
Kutools за Excel, с повече от 300 удобни функции, прави работата ви по-лесна. | ||
След безплатно инсталиране Kutools за Excel, моля, направете следното:
1. кликване Kutools плюс > Работен лист > Копиране на работни листове. Вижте екранна снимка:
2. В Копиране на множество работни листове диалогов прозорец, направете следното:
(1) Проверете името на работния лист, чиито формат искате да копирате, от списъчното поле Копирайте избраните работни листове;
(2) Посочете броя на копията;
(3) Посочете мястото, където искате да поставите копията.
3. кликване Ok, изскача диалогов прозорец, за да ви напомни, че копията са създадени успешно. Кликнете OK да го затворите.
Сега можете да видите определения брой листове, създадени със същия формат.
Щракнете тук, за да научите повече подробности за Копиране на няколко работни листа
Най-добрите инструменти за продуктивност в офиса
Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време. Щракнете тук, за да получите функцията, от която се нуждаете най-много...
Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна
- Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
- Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!