Jak kombinovat řádky se stejným ID / názvem v aplikaci Excel?

Kombinování řádků se stejným ID nebo názvem v Excelu je běžným úkolem pro organizaci a sumarizaci dat. Ať už konsolidujete záznamy o prodeji, shrnujete výsledky průzkumů nebo organizujete datové sady, proces lze zefektivnit pomocí vestavěných nástrojů Excelu. Zde je podrobný průvodce, který vám pomůže efektivně kombinovat řádky se stejným ID nebo názvem.
Zkombinujte řádky se stejným ID / názvem pomocí VBA
Tato metoda zavede VBA pro rychlé zkombinování všech řádků se stejným ID nebo názvem v zadaném výběru. Postupujte prosím následovně:
1. Stisknutím kláves "Alt + F11" otevřete okno Microsoft Visual Basic for Applications.
2. Klikněte na „Vložit“ > „Modul“ a poté vložte kód VBA do okna Modul.
VBA: Zkombinujte řádky se stejným ID / jménem v aplikaci Excel
Sub Consolidate_Rows()
Dim xRg As Range
Dim xRows As Long
Dim I As Long, J As Long, K As Long
On Error Resume Next
Set xRg = Application.InputBox("Select Range:", "Kutools For Excel", Selection.Address, , , , , 8)
Set xRg = Range(Intersect(xRg, ActiveSheet.UsedRange).Address)
If xRg Is Nothing Then Exit Sub
xRows = xRg.Rows.Count
For I = xRows To 2 Step -1
For J = 1 To I - 1
If xRg(I, 1).Value = xRg(J, 1).Value And J <> I Then
For K = 2 To xRg.Columns.Count
If xRg(J, K).Value <> "" Then
If xRg(I, K).Value = "" Then
xRg(I, K) = xRg(J, K).Value
Else
xRg(I, K) = xRg(I, K).Value & "," & xRg(J, K).Value
End If
End If
Next
xRg(J, 1).EntireRow.Delete
I = I - 1
J = J - 1
End If
Next
Next
ActiveSheet.UsedRange.Columns.AutoFit
End Sub
3. Stisknutím klávesy F5 nebo kliknutím na tlačítko Spustit spustíte tento VBA.
4. Ve vyskakovacím okně Kutools for Excel V dialogovém okně vyberte řádky, které chcete sloučit, a klikněte na tlačítko OK. Viz snímek obrazovky:
Nyní uvidíte, že řádky v zadaném rozsahu jsou kombinovány s čárkami se stejným ID. Viz screenshot:
Sloučit řádky se stejným ID/názvem podle Kutools for Excel
Nedělejte si starosti, pokud nejste obeznámeni s kódováním VBA –Kutools for Excel nabízí funkci „Pokročilé slučování řádků“, která proces zjednodušuje. Bez nutnosti složitých operací stačí k rychlému sloučení řádků se stejným ID nebo názvem jen několik kliknutí. Tento výkonný nástroj také podporuje slučování sloupců, sčítání, počítání, průměrování a další, což z něj činí perfektní řešení pro všechny vaše rozmanité potřeby zpracování dat.
1. Vyberte rozsah dat, který chcete sloučit, a klikněte na tlačítko „Kutools„ > „Sloučit a rozdělit“ > „Pokročilé slučování řádků“. Viz snímek obrazovky:
2. V dialogovém okně "Advanced Combine Rows" zadejte následující operace:
- Vyberte sloupec ID nebo název, na základě kterého budete kombinovat další data, a poté z rozbalovací nabídky „Operace“ vyberte „Primární klíč“;
- Dále vyberte název jiného sloupce a klikněte na rozevírací seznam v poli „Operace“ a vyberte jeden oddělovač v části „Kombinovat“. Opakujte tento krok pro další sloupce, které chcete zkombinovat;
- Klikněte na tlačítko OK.Tip: Pokud při slučování potřebujete zachovat formátování buněk, zaškrtněte volbu "Použít formátované hodnoty".
Nyní uvidíte, že vybrané řádky jsou kombinovány na základě ID objednávky. Viz screenshot:
Kutools for Excel - Supercharge Excel s více než 300 základními nástroji. Užijte si trvale bezplatné funkce AI! Get It Now
Pomocí těchto metod můžete v Excelu snadno kombinovat řádky se stejným ID nebo názvem, což ušetří čas a zajistí přesnost. Vyberte si přístup, který nejlépe odpovídá vašim datům a cílům! Pokud máte zájem prozkoumat další tipy a triky pro Excel, náš web nabízí tisíce výukových programů, které vám pomohou zvládnout Excel.
Související články:
Jak zřetězit zachování formátování čísla / data v aplikaci Excel?
Jak zřetězit buňky z jiného listu / různých listů v aplikaci Excel?
Nejlepší nástroje pro produktivitu v kanceláři
Vylepšete si své excelové dovednosti s Kutools for Excela 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...
Office Tab Přináší do Office rozhraní s kartami a výrazně vám usnadňuje 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!