Kako združiti vrstice z enakim ID-jem / imenom v Excelu?
Na primer, imate prikazano tabelo, kot je prikazano na spodnji sliki zaslona, in morate kombinirati vrstice z ID-ji naročil, kakšne ideje? Tukaj bo ta članek predstavil dve rešitvi za vas.
- Združite vrstice z istim ID / imenom po VBA
- Kutools za Excel združi vrstice z enakim ID-jem / imenom
Združite vrstice z istim ID / imenom po VBA
Ta metoda bo predstavila VBA za hitro kombiniranje vseh vrstic z istim ID-jem ali imenom v določenem izboru. Naredite naslednje:
1. Pritisnite druga + F11 za odpiranje okna Microsoft Visual Basic for Applications.
2. Kliknite Vstavi > Moduliin nato prilepite kodo VBA v okno modula.
VBA: v Excelu združite vrstice z istim ID-jem / imenom
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. Pritisnite F5 ali kliknite Run za zagon tega VBA.
4. V pogovornem oknu Kutools za Excel izberite vrstice, ki jih boste združili, in kliknite OK . Oglejte si posnetek zaslona:
Zdaj boste videli, da so vrstice v določenem obsegu kombinirane z vejicami z istim ID-jem. Oglejte si posnetek zaslona:
Opombe: Ta VBA lahko kombinira vrstice samo z vrednostmi v prvem stolpcu. Na primer, če želite združiti vrstice z istim imenom, morate stolpec imena premakniti v prvi stolpec določenega obsega.
Preprosto kombinirajte vrstice in izračunajte na podlagi vrednosti v drugem stolpcu v Excelu
Kutools za Excel Napredne kombinirane vrstice pripomoček vam lahko pomaga kombinirati vrstice na podlagi vrednosti v stolpcu anohter in hkrati seštevati, šteti, povprečiti itd.!
Kutools za Excel združi vrstice z enakim ID-jem / imenom
Če imate nameščen Kutools za Excel, ga lahko uporabite Napredne kombinirane vrstice funkcija za hitro kombiniranje vrstic z istim ID-jem ali imeni v določenem obsegu.
Kutools za Excel - Vsebuje več kot 300 osnovnih orodij za Excel. Uživajte v 30-dnevnem BREZPLAČNEM preizkusu s polnimi funkcijami brez kreditne kartice! Prenesi zdaj!
1. Izberite vrstice, ki jih boste združili, in kliknite Kutools > vsebina > Napredne kombinirane vrstice. Oglejte si posnetek zaslona:
2. V pogovornem oknu Napredno kombiniranje vrstic izberite stolpec ID ali ime, ki ga želite združiti, kliknite Primarni ključin nato po potrebi določite pravila kombinacije za druge stolpce.
V mojem primeru, (1) Izberem ID naročila in kliknite Primarni ključ; (2) Izberite Datum in kliknite izračuna > Grof; (3) Izberite Prodajalec in kliknite Združite > Comma; (4) Izberite znesek in kliknite izračuna > Seštevek. Oglejte si posnetek zaslona:
3. kliknite OK gumb.
Zdaj boste videli, da so izbrane vrstice združene na podlagi ID-ja naročila. Oglejte si posnetek zaslona:
Sorodni članki:
Kako združiti oblikovanje številk / datumov v Excelu?
Kako združiti celice z drugega lista / različnih listov v Excelu?
Najboljša pisarniška orodja za produktivnost
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...
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!