Cum să îmbinați rapid rândurile pe baza unei valori de coloană, apoi să faceți câteva calcule în Excel?

De exemplu, aveți o gamă de date și o coloană are duplicate, acum doriți să îmbinați rândurile bazează coloana A (are duplicate) apoi faceți câteva calcule la o altă coloană pe baza rândurilor îmbinate, după cum se arată în captura de ecran:

În Excel, nu există nicio metodă rapidă de îmbinare a rândurilor pe baza unei valori de coloană, dar aici vă prezint
trucuri care vă pot ajuta să îmbinați rândurile duplicate, apoi să sumați sau să faceți alte calcule pe o altă coloană.

Datele originale                     Merge și Suma

Mergeți rândurile pe baza unei coloane, apoi sumați valorile cu VBA

Mergeți rândurile pe baza unei coloane, apoi suma valorilor cu Advanced Combine

Îmbinați rândurile pe baza unei coloane, apoi efectuați operații diferite pe alte coloane cu
Rânduri combinate avansate

Mergeți rândurile pe baza unei coloane, apoi sumați valorile cu VBA

Există un cod VBA care vă poate ajuta să îmbinați rândurile duplicate, apoi să însumați alte valori ale coloanei.

Navigarea cu file și editarea mai multor registre de lucru Excel / documente Word ca Firefox, Chrome, Internet Explore 10!

Este posibil să fiți familiarizați să vizualizați mai multe pagini web în Firefox / Chrome / IE și să comutați între ele făcând clic pe filele corespunzătoare. Aici, fila Office acceptă procesări similare, care vă permit să răsfoiți mai multe cărți de lucru Excel sau documente Word într-o fereastră Excel sau fereastră Word și să comutați cu ușurință între ele făcând clic pe filele lor. Click gratuit 30-o zi de probă a Office Tab!

1. presa F11 + Alt taste pentru activare Microsoft Visual Basic pentru aplicații fereastră, apoi faceți clic pe Insera > Module și copiați și lipiți sub codul VBA în noul Module fereastră.

VBA: Merge rânduri pe baza unei valori de coloană

Sub MG30Nov12()
'Updateby20150519
Dim Rng As Range
Dim InputRng As Range
Dim nRng As Range
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set InputRng = InputRng.Parent.Range(InputRng.Columns(1).Address)
With CreateObject("scripting.dictionary")
.CompareMode = vbTextCompare
For Each Rng In InputRng
    If Not .Exists(Rng.Value) Then
        .Add Rng.Value, Rng.Offset(, 1)
    Else
        .Item(Rng.Value).Value = .Item(Rng.Value).Value + Rng.Offset(, 1)
            If nRng Is Nothing Then
                Set nRng = Rng
            Else
                Set nRng = Union(nRng, Rng)
            End If
    End If
Next
If Not nRng Is Nothing Then
    nRng.EntireRow.Delete
End If
End With
End Sub

2. presa F5 sau faceți clic pe Alerga pentru a rula VBA și apare un dialog pentru selectarea unui interval de date care să funcționeze. vezi captura de ecran:

3. După ce ați selectat un domeniu de lucru, faceți clic pe OK. Acum datele au fost îmbinate de prima coloană și însumează valorile din a doua coloană.

notițe: Acest cod VBA poate funcționa corect atunci când fuzionează pe baza primei coloane și a valorilor de sumă din a doua coloană.

Combinați rândurile pe baza unei coloane, apoi sumați valorile cu rânduri avansate de combinare

Dacă nu sunteți familiarizați cu codul VBA, puteți utiliza fișierul Rânduri combinate avansate caracteristica instrumentului de completare a celei de-a treia părți - Kutools pentru Excel pentru a îmbina cu ușurință și rapid rândurile duplicate, apoi suma valorilor într-o altă coloană.

După instalare gratuită Kutools pentru Excel, faceți următoarele:

1. Selectați datele pe care doriți să le utilizați și faceți clic Kutools > Merge & Split > Rânduri combinate avansate. Vedeți captura de ecran:

2. Apoi, în caseta de dialog popping, selectați coloana pe care veți îmbina alte coloane, apoi faceți clic Primar Tasta și faceți clic pe altă coloană și faceți clic pe calculati Apoi selectați Sumă.

varful: Dacă gama selectată are anteturi, verificați Datele mele au anteturiși verificați Folosiți valori formatate va păstra formatarea după îmbinare.

3. Apoi apasa Ok. Acum, datele au fost îmbinate pe baza coloanei primare, iar altul este rezumat. Vedeți captura de ecran:

Îmbinați rândurile pe baza unei coloane, apoi efectuați operații diferite pe alte coloane cu rânduri avansate de combinare.

Rânduri combinate avansate este puternic, deoarece nu numai că poate îmbina rândurile duplicate într-o coloană, apoi poate însuma o altă coloană, dar poate, de asemenea, să îmbine rândurile duplicate într-o coloană, apoi să facă operațiuni diferite pe alte coloane.

Să presupunem că am o gamă de date așa cum este prezentată mai jos și doresc să combin atât valorile din Coloana B, cât și sumele din Coloana C pe baza Coloanei A.

După instalare gratuită Kutools pentru Excel, faceți următoarele:

1. Selectați intervalul de date și faceți clic Kutools > Merge & Split > Rânduri combinate avansate. Vedeți captura de ecran:

2. În Combinați rândurile pe baza coloanei dialog, faceți ca acestea:

(1) Faceți clic pe coloana pe care doriți să o combinați și faceți clic pe Cheia principala;

(2) Faceți clic pe coloana pe care doriți să combinați datele și faceți clic pe Combina, apoi selectați din listă un separator de care aveți nevoie;

(3) Faceți clic pe coloana pe care doriți să o sumați valorile și faceți clic pe calculatiȘi selectați Sumă.

3. clic Ok. Acum puteți vedea rezultatul după cum urmează:

Cu Rânduri combinate avansate caracteristică, puteți, de asemenea, să îmbinați rânduri pe baza unei coloane, apoi să numărați, să mediați, să păstrați prima sau ultima dată în alte coloane. 

---

Cele mai bune instrumente de productivitate Office

Kutools pentru Excel vă rezolvă majoritatea problemelor și vă crește productivitatea cu 80%

• reutilizarea: Introduceți rapid formule complexe, diagrame și orice ai folosit anterior; Criptați celulele cu parola; Creați o listă de corespondență și trimiteți e-mailuri ...
• Super Formula Bar (editați cu ușurință mai multe linii de text și formulă); Layout de citire (citiți și editați cu ușurință un număr mare de celule); Lipiți la interval filtrat...
• Merge celule / rânduri / coloane fără a pierde date; Conținut de celule divizate; Combinați rânduri / coloane duplicate... Prevenirea celulelor duplicate; Comparați gamele...
• Selectați Duplicat sau Unic Rânduri; Selectați Rânduri goale (toate celulele sunt goale); Super Find și Fuzzy Find în multe cărți de lucru; Selectare aleatorie ...
• Copie exactă Mai multe celule fără modificarea referinței formulelor; Creați automat referințe la foi multiple; Introduceți gloanțe, Casete de selectare și multe altele ...
• Extrageți textul, Adăugați text, eliminați după poziție, Eliminați spațiul; Creați și imprimați subtotaluri de paginare; Convertiți conținutul dintre celule și comentarii...
• Super Filtru (salvați și aplicați scheme de filtrare altor foi); Sortare avansată după lună / săptămână / zi, frecvență și multe altele; Filtru special cu bold, italic ...
• Combinați cărți de lucru și foi de lucru; Merge Tables pe baza coloanelor cheie; Împărțiți datele în mai multe foi; Conversia în loturi xls, xlsx și PDF...
• Peste 300 de funcții puternice. Suportă Office / Excel 2007-2021 și 365. Acceptă toate limbile. Implementare ușoară în întreprinderea sau organizația dvs. Funcții complete Probă gratuită de 30 de zile. Garanție de returnare a banilor de 60 de zile.

Citeşte mai mult ... Descărcare gratuită... Cumpărare... 

---

Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară

• Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
• Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ​​ferestrele noi.
• Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!

Citeşte mai mult ... Descărcare gratuită... Cumpărare...