Přejít k hlavnímu obsahu

Jak rychle vytvořit více listů se stejným formátem v aplikaci Excel?

Například jste vytvořili list se specifickým formátováním a nyní chcete vytvořit více listů se stejným formátem jako tento list, jak byste mohli rychle vyřešit tento úkol v aplikaci Excel? Tento kurz hovoří o metodách vytváření více listů se stejným formátem.

Vytvářejte listy se stejným formátem pomocí Přesunout nebo Kopírovat

Vytvořte listy se stejným formátem pomocí VBA

Vytvořte listy se stejným formátem zkopírováním více pracovních listů Kutools pro Excel dobrý nápad3


Vytvářejte listy se stejným formátem pomocí Přesunout nebo Kopírovat

V aplikaci Excel můžete pomocí příkazu Přesunout nebo Kopírovat vytvořit list se stejným formátem jako vybraný list.

1. Klikněte na list, který je ve formátu, který potřebujete, na Lišta Tabulátora vyberte pravým tlačítkem Přesunout nebo Kopírovat z kontextové nabídky. Viz snímek obrazovky:

list dokumentu se stejným formátem 1

2. Poté v rozbalovacím dialogu zaškrtněte Vytvořte kopii volba. Viz screenshot:

list dokumentu se stejným formátem 2

3. cvaknutí OK. V přední části vybraného listu se vytvoří nový list se stejným formátem. Viz snímek obrazovky:

list dokumentu se stejným formátem 3

Poznámka:

(1) Můžete také kliknout Domů > Formát > Přesunout nebo zkopírovat list k povolení Přesunout nebo Kopírovat dialog.

(2) Tato metoda bude časově náročná, pokud potřebujete vytvořit stovky listů ve stejném formátu.


Vytvořte listy se stejným formátem pomocí VBA

K dispozici je kód VBA, který vám pomůže rychle vytvořit více listů ve stejném formátu najednou.

1. lis Alt + F11 klíče k otevření Microsoft Visual Basic pro aplikace v okně a poté klikněte na Vložit > Modulzkopírujte a vložte níže uvedený kód do Modul okno.

VBA: Vytvářejte listy ve stejném formátu.

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. lis F5 Chcete-li spustit kód VBA, zobrazí se dialogové okno pro zadání názvu listu, který potřebujete ke zkopírování jeho formátu.

list dokumentu se stejným formátem 4

3. cvaknutí OKa zadejte počet kopií, které potřebujete, do dalšího rozbalovacího dialogu. Viz snímek obrazovky:

list dokumentu se stejným formátem 5

4. cvaknutí OK. Pak je vytvořeno šest kopií pracovních listů se stejným formátem.


Vytvořte listy se stejným formátem zkopírováním více pracovních listů Kutools pro Excel

Pokud neradi používáte VBA, představuji vám užitečný nástroj - Kutools pro Excel, můžete použít jeho Kopírování pracovních listů nástroj pro rychlé a snadné vytváření listů ve stejném formátu.

Kutools pro Excel, s více než 300 užitečné funkce, které vám usnadní práci. 

Po instalace zdarma Kutools pro Excel, prosím, postupujte takto:

1. cvaknutí Kutools Plus > Pracovní list > Kopírování pracovních listů. Viz snímek obrazovky:

doc zkopírovat více listů 1

2. V Zkopírujte více pracovních listů dialogové okno, postupujte takto:

(1) Zkontrolujte název listu, ze kterého chcete zkopírovat jeho formát, ze seznamu Zkopírujte vybrané listy;

(2) Uveďte počet kopií;

(3) Určete místo, kam chcete kopie vložit.

list dokumentu se stejným formátem 7

3. cvaknutí Ok, objeví se dialogové okno, které vám připomene, že kopie byly úspěšně vytvořeny. Klepněte na OK zavřít.

list dokumentu se stejným formátem 8

Nyní můžete vidět, že zadaný počet listů byl vytvořen ve stejném formátu.
doc kutools kopírování pracovních listů 4

Kliknutím sem získáte další informace o kopírování více pracovních listů

Nejlepší nástroje pro produktivitu v kanceláři

Populární funkce: Najít, zvýraznit nebo identifikovat duplikáty   |  Odstranit prázdné řádky   |  Kombinujte sloupce nebo buňky bez ztráty dat   |   Kolo bez vzorce ...
Super vyhledávání: Více kritérií VLookup    VLookup s více hodnotami  |   VLookup na více listech   |   Fuzzy vyhledávání ....
Pokročilý rozevírací seznam: Rychle vytvořte rozevírací seznam   |  Závislý rozbalovací seznam   |  Vícenásobný výběr rozevíracího seznamu ....
Správce sloupců: Přidejte konkrétní počet sloupců  |  Přesunout sloupce  |  Přepnout stav viditelnosti skrytých sloupců  |  Porovnejte rozsahy a sloupce ...
Doporučené funkce: Zaměření mřížky   |  Návrhové zobrazení   |   Velký Formula Bar    Správce sešitů a listů   |  Knihovna zdrojů (Automatický text)   |  Výběr data   |  Zkombinujte pracovní listy   |  Šifrovat/dešifrovat buňky    Odesílat e-maily podle seznamu   |  Super filtr   |   Speciální filtr (filtr tučné/kurzíva/přeškrtnuté...) ...
Top 15 sad nástrojů12 Text Tools (doplnit text, Odebrat znaky, ...)   |   50+ Graf Typ nemovitosti (Ganttův diagram, ...)   |   40+ Praktické Vzorce (Vypočítejte věk na základě narozenin, ...)   |   19 Vložení Tools (Vložte QR kód, Vložit obrázek z cesty, ...)   |   12 Konverze Tools (Čísla na slova, Přepočet měny, ...)   |   7 Sloučit a rozdělit Tools (Pokročilé kombinování řádků, Rozdělit buňky, ...)   |   ... a více

Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času.  Kliknutím sem získáte funkci, kterou nejvíce potřebujete...

karta kte 201905


Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci

  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!
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