Hoe rijen met dezelfde ID / naam in Excel te combineren?
U heeft bijvoorbeeld een tabel zoals hieronder afgebeeld, en u moet rijen combineren met de bestellings-ID's, ideeën? Hier introduceert dit artikel twee oplossingen voor u.
- Combineer rijen met dezelfde ID / naam door VBA
- Combineer rijen met dezelfde ID / naam door Kutools voor Excel
Combineer rijen met dezelfde ID / naam door VBA
Deze methode introduceert een VBA om snel alle rijen met dezelfde ID of naam in de opgegeven selectie te combineren. Ga als volgt te werk:
1. pers anders + F11 -toetsen om het venster Microsoft Visual Basic for Applications te openen.
2. Klikken Invoegen > Moduleen plak vervolgens de VBA-code in het modulevenster.
VBA: combineer rijen met dezelfde ID / naam in 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. druk de F5 toets of klik op de lopen knop om deze VBA uit te voeren.
4. Selecteer in het pop-upvenster Kutools voor Excel de rijen die u wilt combineren en klik op OK knop. Zie screenshot:
Nu zult u zien dat de rijen in het opgegeven bereik worden gecombineerd met komma's door dezelfde ID. Zie screenshot:
Note: Deze VBA kan alleen rijen combineren met de waarden in de eerste kolom. Als u bijvoorbeeld rijen met dezelfde naam wilt combineren, moet u de naamkolom naar de eerste kolom van het opgegeven bereik verplaatsen.
Combineer eenvoudig rijen en bereken op basis van waarden in een andere kolom in Excel
Kutools voor Excel's Geavanceerd Combineer rijen hulpprogramma kan u helpen rijen te combineren op basis van waarden in een andere kolom, en tegelijkertijd som, aantal, gemiddelde, enz.!
Combineer rijen met dezelfde ID / naam door Kutools voor Excel
Als u Kutools voor Excel hebt geïnstalleerd, kunt u het toepassen Geavanceerd Combineer rijen functie om snel rijen met dezelfde ID of namen in het opgegeven bereik te combineren.
Kutools for Excel - Verpakt met meer dan 300 essentiële tools voor Excel. Geniet van een GRATIS proefperiode van 30 dagen zonder creditcard! Download nu!
1. Selecteer de rijen die u wilt combineren en klik op Kutools > Content > Geavanceerd Combineer rijen. Zie screenshot:
2. Selecteer in het dialoogvenster Geavanceerd rijen combineren de ID- of naamkolom waarmee u wilt combineren, klik op Hoofdsleutelen specificeer vervolgens combinatieregels voor andere kolommen als u nodig hebt.
In mijn geval, (1) Ik selecteer de Bestelnummer kolom en klik op Hoofdsleutel; (2) selecteert u het Datum kolom en klik op Berekenen > Tellen; (3) selecteert u het Verkoper kolom en klik op Combineren > komma; (4) selecteert u het Hoeveelheid kolom en klik op Berekenen > Som. Zie screenshot:
3. Klik op de OK knop.
Nu ziet u dat de geselecteerde rijen zijn gecombineerd op basis van de bestellings-ID. Zie screenshot:
Gerelateerde artikelen:
Hoe het behouden van nummer- / datumnotatie in Excel samen te voegen?
Hoe cellen uit een ander blad / verschillende bladen in Excel samen te voegen?
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!