Preskoči na glavno vsebino

Kako hitro ustvariti več listov z enako obliko v Excelu?

Na primer, ustvarili ste list z določenim oblikovanjem in zdaj želite ustvariti več listov z enako obliko kot ta list, kako bi lahko to nalogo hitro rešili v Excelu? Ta vadnica govori o metodah za ustvarjanje več listov z enako obliko.

Ustvari liste z enako obliko s premikanjem ali kopiranjem

Ustvari liste z enako obliko s strani VBA

Ustvarite liste z enako obliko, tako da kopirate več delovnih listov Kutools za Excel dobra ideja3


Ustvari liste z enako obliko s premikanjem ali kopiranjem

V Excelu lahko z ukazom Premakni ali Kopiraj ustvarite list z enako obliko kot list, ki ste ga izbrali.

1. Kliknite list, ki je v obliki zapisa, ki jo potrebujete, na Vrstica z zavihki listain z desno miškino tipko izberite Premakni ali Kopiraj iz kontekstnega menija. Oglejte si posnetek zaslona:

list z enakim formatom 1

2. Nato v pogovornem oknu potrdite Ustvari kopijo možnost. Oglejte si posnetek zaslona:

list z enakim formatom 2

3. klik OK. Na sprednji strani izbranega lista se ustvari nov list z enako obliko. Oglejte si posnetek zaslona:

list z enakim formatom 3

Opombe:

(1) Lahko tudi kliknete Domov > oblikovana > Premakni ali kopiraj list da omogočite Premakni ali Kopiraj dialog.

(2) S to metodo bo zamudno, ko boste morali ustvariti na stotine listov z enako obliko.


Ustvari liste z enako obliko s strani VBA

Obstaja koda VBA, ki vam lahko pomaga hitro ustvariti več listov z isto obliko naenkrat.

1. Pritisnite Alt + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno, nato kliknite Vstavi > Moduli, kopirajte in prilepite spodnjo kodo v Moduli okno.

VBA: Ustvari liste z enako obliko.

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. Pritisnite F5 tipko za zagon kode VBA, nato se prikaže pogovorno okno za vnos imena delovnega lista, ki ga potrebujete za kopiranje njegove oblike.

list z enakim formatom 4

3. klik OKin določite število izvodov, ki jih potrebujete, v drugo pogovorno okno. Oglejte si posnetek zaslona:

list z enakim formatom 5

4. klik OK. Nato je ustvarjenih šest kopij delovnih listov z enako obliko.


Ustvarite liste z enako obliko, tako da kopirate več delovnih listov Kutools za Excel

Če ne želite uporabljati VBA, vam predstavljam priročno orodje - Kutools za Excel, lahko uporabite njegovo Kopirajte delovne liste pripomoček za hitro in enostavno ustvarjanje listov z enako obliko.

Kutools za Excel, z več kot 300 priročne funkcije, vam olajša delo. 

po brezplačna namestitev Kutools za Excel, naredite spodaj:

1. klik Kutools Plus > Delovni list > Kopirajte delovne liste. Oglejte si posnetek zaslona:

kopiraj več delovnih listov 1

2. V Ljubljani Kopirajte več delovnih listov pogovorno okno, naredite spodaj:

(1) Na seznamu potrdite ime delovnega lista, v katerega želite kopirati njegovo obliko Kopirajte izbrane delovne liste;

(2) Navedite število izvodov;

(3) Določite mesto, kamor želite dati kopije.

list z enakim formatom 7

3. klik Ok, se odpre pogovorno okno, ki vas opomni, da so kopije uspešno ustvarjene. Kliknite OK da ga zaprete.

list z enakim formatom 8

Zdaj lahko vidite, da je bilo določeno število listov ustvarjenih v enaki obliki.
doc kutools kopiranje delovnih listov 4

Kliknite tukaj, če želite izvedeti več o kopiranju več delovnih listov

Najboljša pisarniška orodja za produktivnost

🤖 Kutools AI Aide: Revolucionirajte analizo podatkov na podlagi: Inteligentna izvedba   |  Ustvari kodo  |  Ustvarite formule po meri  |  Analizirajte podatke in ustvarite grafikone  |  Prikličite funkcije Kutools...
Priljubljene funkcije: Poiščite, označite ali identificirajte dvojnike   |  Izbriši prazne vrstice   |  Združite stolpce ali celice brez izgube podatkov   |   Krog brez formule ...
Super iskanje: Več kriterijev VLookup    Multiple Value VLookup  |   VLookup na več listih   |   Nejasno iskanje ....
Napredni spustni seznam: Hitro ustvarite spustni seznam   |  Odvisni spustni seznam   |  Večkrat izberite spustni seznam ....
Upravitelj stolpcev: Dodajte določeno število stolpcev  |  Premakni stolpce  |  Preklop stanja vidnosti skritih stolpcev  |  Primerjaj obsege in stolpce ...
Predstavljene funkcije: Mrežni fokus   |  Pogled oblikovanja   |   Velika vrstica formule    Upravitelj delovnih zvezkov in listov   |  Knjižnica virov (Samodejno besedilo)   |  Izbirnik datuma   |  Združite delovne liste   |  Šifriranje/dešifriranje celic    Pošljite e-pošto po seznamu   |  Super filter   |   Poseben filter (filter krepko/ležeče/prečrtano ...) ...
15 najboljših kompletov orodij12 Besedilo Orodja (dodajanje besedila, Odstrani znake,...)   |   50 + Graf Vrste (Gantt Chart,...)   |   40+ Praktično Formule (Izračunajte starost glede na rojstni dan,...)   |   19 vstavljanje Orodja (Vstavite kodo QR, Vstavi sliko s poti,...)   |   12 Pretvorba Orodja (Številke v besede, Pretvorba valut,...)   |   7 Spoji in razdeli Orodja (Napredne kombinirane vrstice, Razdeljene celice,...)   |   ... in več

Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa.  Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...

Opis


Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo

  • Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!
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