Přejít k hlavnímu obsahu

Jak sbírat data z více listů do hlavního listu v aplikaci Excel?

V určitém čase možná budete muset shromáždit data z více listů do jednoho hlavního listu pro konsolidaci nebo jiné operace, jak je ukázáno níže, ale kopírování a vkládání obsahu jeden po druhém je obtížné, existují nějaké triky, které to mohou rychle vyřešit v Vynikat?

Sbírejte data z více listů do jednoho pomocí funkce Konsolidovat

Sbírejte data z více listů do jednoho pomocí kódu VBA

Sbírejte data z více listů do jednoho s výkonnou funkcí Kombinovatdobrý nápad3


Sbírejte data z více listů do jednoho pomocí funkce Konsolidovat

Pokud chcete shromažďovat data z více listů do jednoho listu ve stejném sešitu, můžete použít funkci Konsolidovat v aplikaci Excel.

1. V novém listu sešitu, ze kterého chcete shromažďovat data z listů, klikněte na Data > Konsolidujte .
doc sbírat listy do jednoho 1

2. V Consolidate dialog, postupujte takto:

(1 Po sloučení dat vyberte jednu operaci, kterou chcete provést funkce rozbalovací seznam;

(2 Klikněte tlačítko pro výběr dokumentu vyberte rozsah každého listu, který chcete shromáždit;

(3 Klikněte Add tlačítko pro přidání rozsahu dat do souboru All references seznam;

(4 Zkontrolujte štítky, které používáte po zkombinování dat, a zkontrolujte Create links to source data Možnost, pokud chcete propojit data v kombinovaném listu se zdrojovými daty.
doc sbírat listy do jednoho 2

3. cvaknutí OK. Nyní byla data shromážděna a shrnuta do jednoho listu.
doc sbírat listy do jednoho 3


Snadno kombinujte více listů / sešit do jednoho listu nebo sešitu

Kombinovat vícenásobné listy nebo sešity do jednoho listu nebo sešitu může být v aplikaci Excel náročné, ale s Kombinovat funkce v Kutools pro Excel, můžete kombinovat desítky listů / sešitů do jednoho listu nebo sešitu, také můžete sloučit listy do jednoho pouze několika kliknutími.  Kliknutím získáte 30denní bezplatnou zkušební verzi s plnou výbavou!
kombinovat listy
 
Kutools pro Excel: s více než 300 praktickými doplňky Excel, můžete vyzkoušet bez omezení za 30 dní.

Sbírejte data z více listů do jednoho pomocí kódu VBA

Zde je kód VBA, který umožňuje shromažďovat data ze všech listů v novém listu v aktuálním sešitu.

1. lis Alt + F11 klíč k povolení Microsoft Visual Basic for Applications okno.

2. cvaknutí Insert > Modulea zkopírujte a vložte níže uvedený kód do Module skripty.

VBA: Shromažďujte všechna data z listů do jednoho.

Sub Combine()
'UpdatebyExtendoffice20180205
    Dim I As Long
    Dim xRg As Range
    On Error Resume Next
    Worksheets.Add Sheets(1)
    ActiveSheet.Name = "Combined"
   For I = 2 To Sheets.Count
        Set xRg = Sheets(1).UsedRange
        If I > 2 Then
            Set xRg = Sheets(1).Cells(xRg.Rows.Count + 1, 1)
        End If
        Sheets(I).Activate
        ActiveSheet.UsedRange.Copy xRg
    Next
End Sub
doc sbírat listy do jednoho 4

3. lis F5 klíč ke spuštění kódu, všechna data celého sešitu byla shromážděna v novém listu Kombinované.
doc sbírat listy do jednoho 5


Sbírejte data z více listů do jednoho s výkonnými Combine funkce

Pokud obvykle potřebujete spojit listy do jednoho, představím vám jednu výkonnou funkci slučování, je to Kutools pro ExcelJe Kombinovat nástroj, který má níže čtyři hlavní funkce:

Zkombinujte více listů ze sešitu do jednoho listu

Zkombinujte všechny listy se stejným názvem do jednoho listu

Zkombinujte více pracovních listů ze sešitů do jednoho sešitu

Konsolidujte a vypočítávejte hodnoty napříč několika sešity do jednoho listu

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:

Pokud jen chcete kombinovat listy do jednoho listu bez dalších operací, můžete to udělat takto:

1. Povolte Excel, klepněte na Kutools Plus > Combine, zobrazí se jeden nebo dva dialogy, které vám připomenou některá upozornění, stačí kliknout OK a Ano pokračovat. Viz snímek obrazovky:

2. cvaknutí OK přejděte na Combine okno, zkontrolujte Combine multiple worksheets from workbook into worksheet volba.

3. cvaknutí Next, poté klepněte na tlačítko Add > File / Folder přidat sešity, které budete používat ke spojení do Workbook list. Pak jdi Worksheet list pro zaškrtnutí listů, které chcete zkombinovat, z každého sešitu.

4. cvaknutí Next Chcete-li přejít k poslednímu kroku, můžete podle potřeby zadat některá nastavení o výsledku sloučení. Pokud tento krok nepotřebujete.

5. cvaknutí Finish a vyberte jednu složku pro umístění nového sešitu, který kombinuje data z listů.
doc sbírat listy do jednoho 13

6. cvaknutí Uložit. Nyní byla všechna data shromážděna z listů napříč sešitem do jednoho hlavního listu.
doc sbírat listy do jednoho 14

Pokud chcete konsolidovat pracovní listy napříč sešity do jednoho, postupujte takto:

1. V Combine okno, zkontrolujte Consolidate and calculate values across multiple worksheets into one worksheet volba.

2. cvaknutí Nexta přidejte soubory do Workbook list, pak zkontrolujte listy, které používáte ke kombinaci a výpočtu.

3. cvaknutí Nexta poté vyberte jeden výpočet z Function rozevíracího seznamu a podle potřeby zaškrtněte další možnosti.

4. cvaknutí Finish uložit nový sešit do složky.

Nyní byly listy napříč sešity sloučeny a vypočteny do jednoho listu.
doc sbírat listy do jednoho 18


Kutools pro Excel: 300 funkcí, které musíte mít v Excelu, 30denní bezplatná zkušební verze odtud.

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

🤖 Kutools AI asistent: Revoluční analýza dat založená na: Inteligentní provedení   |  Generovat kód  |  Vytvořte vlastní vzorce  |  Analyzujte data a generujte grafy  |  Vyvolejte funkce Kutools...
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...

Popis


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 (8)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Thanks for the VBA code - it works well! How can I extend the code so that when the sheets are combined that they are combined as values? I am running into some issues with circular reference issues when I try to interact with the combined sheet.
This comment was minimized by the moderator on the site
The VBA code works perfectly! , how can i edit it so it skips the first page in my workbook and merges the remaining pages?
This comment was minimized by the moderator on the site
Hi,
I'm trying to accomplish the following:
Get data from multiple tabs in a specific cell range (B3-E169).
Data would be compiled in columns...i.e., column B copies into column B on new spreadsheet, column C copies into column C on new spreadsheet, etc.
If there are more than two blank columns in B, stop & move onto next worksheet and get same data.
The result that I'm trying to get is a material list from different categories (hence the different tabs).

This is how I think it should work:
Lookup WS1 column B3-B169.
If two blank columns, Lookup WS2 column B3-B169,
If two blank columns, Lookup WS3 column B3-B169, etc.

WS2 should skip a space/column & come in underneath WS1.
WS3 should skip a space/column & come in underneath WS2,.etc.

Repeat or columns C, D & E
This comment was minimized by the moderator on the site
hmm your VBA code removes the last row from individual sheet when combined .. any idea how to solve this issue?
This comment was minimized by the moderator on the site
any answer for this?
This comment was minimized by the moderator on the site
How do you make your VBA overwrite the compiled data onto the same master list, rather than add a new sheet?
This comment was minimized by the moderator on the site
De que forma se puede obtener solo el valor de las hojas y llevarla a la hoja que se va a resumir todo, por ejemplo, en caso de que una hoja de las que se van a combinar exista una celda calculada o que dependa de otra hoja, por eso pregunto si se puede llevar solo los valores.
This comment was minimized by the moderator on the site
Sorry, could you repeat your quetion in English?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations