Note: The other languages of the website are Google-translated. Back to English

Πώς να συνδυάσετε διπλές σειρές και να αθροίσετε τις τιμές στο Excel;

doc-Combine-sum1 -2 doc-Combine-sum2

Στο Excel may ενδέχεται να αντιμετωπίζετε πάντα αυτό το πρόβλημα, όταν έχετε μια σειρά δεδομένων που περιέχει μερικές διπλές καταχωρίσεις και τώρα θέλετε να συνδυάσετε τα διπλά δεδομένα και να αθροίσετε τις αντίστοιχες τιμές σε μια άλλη στήλη, όπως φαίνεται παρακάτω τα στιγμιότυπα οθόνης. Πώς θα μπορούσατε να λύσετε αυτό το πρόβλημα;

Συνδυάστε διπλές σειρές και αθροίστε τις τιμές με τη συνάρτηση ενοποίησης

Συνδυάστε διπλές σειρές και αθροίστε τις τιμές με τον κώδικα VBA

Συνδυάστε διπλές σειρές και αθροίστε τις τιμές με το Kutools για Excel

Συνδυάστε τις αντίστοιχες σειρές που βασίζονται σε διπλές τιμές σε μια άλλη στήλη με το Kutools για Excel


βέλος μπλε δεξιά φούσκα Συνδυάστε διπλές σειρές και αθροίστε τις τιμές με τη συνάρτηση ενοποίησης

Το Consolidate είναι ένα χρήσιμο εργαλείο για να ενοποιήσουμε πολλά φύλλα εργασίας ή σειρές στο Excel, οπότε με αυτήν τη συνάρτηση, μπορούμε επίσης να συνοψίσουμε πολλές σειρές με βάση τα διπλότυπα. Κάντε τα παρακάτω βήματα:

1. Κάντε κλικ σε ένα κελί όπου θέλετε να εντοπίσετε το αποτέλεσμα στο τρέχον φύλλο εργασίας σας.

2. Πηγαίνετε στο κλικ ημερομηνία > Παγίωση, δείτε το στιγμιότυπο οθόνης:

doc-Combine-sum3

3. Στην Παγίωση κουτί διαλόγου:

  • (1.) Επιλέξτε Άθροισμα από Λειτουργία αναπτυσσόμενη λίστα
  • (2.) Κάντε κλικ doc-Combine-sum5 κουμπί για να επιλέξετε το εύρος που θέλετε να ενοποιήσετε και, στη συνέχεια, κάντε κλικ στο Προσθέτω κουμπί για να προσθέσετε την αναφορά στο Όλες οι αναφορές πλαίσιο λίστας;
  • (3.) Έλεγχος Κορυφαία σειρά και Αριστερή στήλη από Χρησιμοποιήστε ετικέτες στο επιλογή. Δείτε το στιγμιότυπο οθόνης:

doc-Combine-sum4

4. Αφού ολοκληρώσετε τις ρυθμίσεις, κάντε κλικ στο OK, και τα αντίγραφα συνδυάζονται και αθροίζονται. Δείτε το στιγμιότυπο οθόνης:

doc-Combine-sum6

Note: Εάν το εύρος δεν έχει τη γραμμή κεφαλίδας, πρέπει να καταργήσετε την επιλογή Κορυφαία σειρά από το Χρησιμοποιήστε ετικέτες στο επιλογή.


Συνδυάστε διπλές σειρές και άθροισμα / μέσες αντίστοιχες τιμές σε άλλη στήλη

Kutools για Excel's Προηγμένες σειρές Combibe σας βοηθά να συνδυάσετε πολλές διπλές σειρές σε μία εγγραφή βασισμένη σε μια βασική στήλη και μπορεί επίσης να εφαρμόσει ορισμένους υπολογισμούς όπως άθροισμα, μέσος όρος, μέτρηση και ούτω καθεξής για άλλες στήλες. Κάντε κλικ για λήψη του Kutools για Excel!


βέλος μπλε δεξιά φούσκα Συνδυάστε διπλές σειρές και αθροίστε τις τιμές με τον κώδικα VBA

Ο παρακάτω κώδικας VBA μπορεί επίσης να σας βοηθήσει να ενοποιήσετε διπλές σειρές στο φύλλο εργασίας, αλλά ταυτόχρονα, τα αρχικά δεδομένα θα καταστραφούν, πρέπει να δημιουργήσετε αντίγραφα ασφαλείας ενός αντιγράφου των δεδομένων.

1. Κρατήστε πατημένο το ALT + F11 και μετά ανοίγει το Microsoft Visual Basic για εφαρμογές παράθυρο.

2. Κλίκ Κύριο θέμα > Μονάδα μέτρησηςκαι επικολλήστε τον ακόλουθο κώδικα στο Παράθυρο ενότητας.

Κωδικός VBA: Συνδυάστε διπλές σειρές και αθροίστε τις τιμές

Sub CombineRows()
'Updateby Extendoffice
Dim WorkRng As Range
Dim Dic As Variant
Dim arr As Variant
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set Dic = CreateObject("Scripting.Dictionary")
arr = WorkRng.Value
For i = 1 To UBound(arr, 1)
    Dic(arr(i, 1)) = Dic(arr(i, 1)) + arr(i, 2)
Next
Application.ScreenUpdating = False
WorkRng.ClearContents
WorkRng.Range("A1").Resize(Dic.Count, 1) = Application.WorksheetFunction.Transpose(Dic.keys)
WorkRng.Range("B1").Resize(Dic.Count, 1) = Application.WorksheetFunction.Transpose(Dic.items)
Application.ScreenUpdating = True
End Sub

3. Στη συνέχεια πατήστε F5 για να εκτελέσετε αυτόν τον κωδικό και πρέπει να επιλέξετε το εύρος που θέλετε να ενοποιήσετε στο αναδυόμενο πλαίσιο προτροπής. Δείτε το στιγμιότυπο οθόνης:

doc-Combine-sum7

4. Και στη συνέχεια κάντε κλικ στο κουμπί OK, οι διπλές σειρές έχουν συνδυαστεί και οι τιμές προστίθενται.

Note: Εάν θέλετε να χρησιμοποιήσετε αυτόν τον κωδικό, καλύτερα να δημιουργήσετε ένα αντίγραφο του αρχείου για να αποφύγετε την καταστροφή των δεδομένων και αυτός ο κώδικας εφαρμόζεται μόνο σε δύο στήλες.


βέλος μπλε δεξιά φούσκα Συνδυάστε διπλές σειρές και αθροίστε τις τιμές με το Kutools για Excel

Εδώ, παρουσιάζω το εύχρηστο εργαλείο - Kutools για Excel για σένα, είναι Σύνθετες σειρές συνδυασμού επίσης μπορεί γρήγορα να κάνει μια χάρη για να λύσει αυτό το πρόβλημα.

Kutools για Excel : με περισσότερα από 300 εύχρηστα πρόσθετα Excel, δωρεάν δοκιμή χωρίς περιορισμό σε 30 ημέρες. Αποκτήστε το τώρα .

Μετά την εγκατάσταση Kutools για Excel, κάντε τα εξής:

1. Επιλέξτε το εύρος που χρειάζεστε και κάντε κλικ Kutools > Συγχώνευση & διαχωρισμός > Σύνθετες σειρές συνδυασμού. Δείτε το στιγμιότυπο οθόνης:

2. Στην Σύνθετες σειρές συνδυασμού διάλογος, ελέγξτε Τα δεδομένα μου έχουν κεφαλίδες εάν το εύρος σας έχει κεφαλίδες και επιλέξτε το όνομα στήλης που θέλετε να συνδυάσετε τα διπλότυπα και κάντε κλικ Πρωτεύων κλειδί, δείτε το στιγμιότυπο οθόνης:

doc-Combine-sum7

3. Στη συνέχεια, επιλέξτε το όνομα της στήλης που θέλετε να αθροίσετε τις τιμές και κάντε κλικ στο Υπολογίζω > Άθροισμα ή άλλους υπολογισμούς όπως χρειάζεστε. Δείτε το στιγμιότυπο οθόνης:

doc-Combine-sum7

4. Κλίκ Ok για να κλείσετε το παράθυρο διαλόγου, τότε μπορείτε να δείτε ότι τα αντίγραφα συνδυάζονται και τα αντίστοιχα δεδομένα σε άλλη στήλη προστίθενται μαζί. Δείτε στιγμιότυπα οθόνης:

doc-Combine-sum1 -2 doc-Combine-sum2

Κάντε κλικ εδώ για να μάθετε περισσότερα για το Advanced Combine Rows.


βέλος μπλε δεξιά φούσκα Συνδυάστε τις αντίστοιχες σειρές που βασίζονται σε διπλές τιμές σε μια άλλη στήλη με το Kutools για Excel

Μερικές φορές, θέλετε να συνδυάσετε τις σειρές με βάση τις διπλές τιμές σε μια άλλη στήλη, το Σύνθετες σειρές συνδυασμού of Kutools για Excel μπορεί επίσης να κάνει μια χάρη για εσάς, κάντε τα εξής:

1. Επιλέξτε το εύρος δεδομένων που θέλετε να χρησιμοποιήσετε και, στη συνέχεια, κάντε κλικ στο Kutools > Συγχώνευση & διαχωρισμός > Σύνθετες σειρές συνδυασμού για να ενεργοποιήσετε το Σύνθετες σειρές συνδυασμού κουτί διαλόγου.

2. Στην Σύνθετες σειρές συνδυασμού πλαίσιο διαλόγου, κάντε κλικ στο όνομα της στήλης στο οποίο θέλετε να συνδυάσετε άλλα δεδομένα βάσει και κάντε κλικ στο Πρωτεύων κλειδί, δείτε το στιγμιότυπο οθόνης:

doc-Combine-sum7

3. Και, στη συνέχεια, κάντε κλικ σε ένα άλλο όνομα στήλης που θέλετε να συνδυάσετε τα δεδομένα και κάντε κλικ στο Συνδυασμός για να επιλέξετε ένα διαχωριστικό για να διαχωρίσετε τις συνδυασμένες τιμές σας, δείτε το στιγμιότυπο οθόνης:

doc-Combine-sum7

4. Στη συνέχεια κάντε κλικ στο κουμπί Ok, όλες οι τιμές με το ίδιο κελί στη στήλη Α έχουν συνδυαστεί μαζί, δείτε στιγμιότυπα οθόνης:

doc-Combine-sum1 -2 doc-Combine-sum2

βέλος μπλε δεξιά φούσκα Συνδυάστε διπλές σειρές και αθροίστε τις τιμές με το Kutools για Excel

Kutools για Excel: με περισσότερα από 300 εύχρηστα πρόσθετα του Excel, δωρεάν δοκιμή χωρίς περιορισμό σε 30 ημέρες. Λήψη και δωρεάν δοκιμή τώρα!

Σχετικό άρθρο:

Συνδυάστε πολλές σειρές σε μία με βάση τις διπλές τιμές


Τα καλύτερα εργαλεία παραγωγικότητας του Office

Το Kutools για Excel λύνει τα περισσότερα από τα προβλήματά σας και αυξάνει την παραγωγικότητά σας κατά 80%

  • Επαναχρησιμοποίηση: Εισαγάγετε γρήγορα σύνθετοι τύποι, γραφήματα και οτιδήποτε έχετε χρησιμοποιήσει στο παρελθόν. Κρυπτογράφηση κυττάρων με κωδικό πρόσβασης Δημιουργία λίστας αλληλογραφίας και στείλτε email ...
  • Super Formula Bar (επεξεργαστείτε εύκολα πολλές γραμμές κειμένου και τύπου). Διάταξη ανάγνωσης (εύκολη ανάγνωση και επεξεργασία μεγάλου αριθμού κελιών). Επικόλληση σε φιλτραρισμένο εύρος...
  • Συγχώνευση κελιών / σειρών / στηλών χωρίς απώλεια δεδομένων · Περιεχόμενο διαχωρισμού κελιών Συνδυάστε διπλές σειρές / στήλες... Αποτροπή διπλών κυττάρων; Συγκρίνετε τα εύρη...
  • Επιλέξτε Διπλότυπο ή Μοναδικό Σειρές; Επιλέξτε Κενές σειρές (όλα τα κελιά είναι κενά). Σούπερ εύρεση και ασαφής εύρεση σε πολλά βιβλία εργασίας. Τυχαία επιλογή ...
  • Ακριβές αντίγραφο Πολλαπλά κελιά χωρίς αλλαγή της αναφοράς τύπου. Αυτόματη δημιουργία αναφορών σε πολλαπλά φύλλα? Εισαγωγή κουκκίδων, Πλαίσια ελέγχου και άλλα ...
  • Εξαγωγή κειμένου, Προσθήκη κειμένου, Κατάργηση κατά θέση, Αφαιρέστε το διάστημα; Δημιουργία και εκτύπωση υποσύνολων σελιδοποίησης. Μετατροπή περιεχομένου και σχολίων μεταξύ κελιών...
  • Σούπερ φίλτρο (αποθηκεύστε και εφαρμόστε σχήματα φίλτρων σε άλλα φύλλα). Προηγμένη ταξινόμηση ανά μήνα / εβδομάδα / ημέρα, συχνότητα και άλλα. Ειδικό φίλτρο με έντονη, πλάγια ...
  • Συνδυάστε βιβλία εργασίας και φύλλα εργασίας; Συγχώνευση πινάκων βάσει βασικών στηλών. Διαχωρίστε τα δεδομένα σε πολλά φύλλα; Μαζική μετατροπή xls, xlsx και PDF...
  • Περισσότερα από 300 ισχυρά χαρακτηριστικά. Υποστηρίζει Office / Excel 2007-2021 και 365. Υποστηρίζει όλες τις γλώσσες. Εύκολη ανάπτυξη στην επιχείρηση ή τον οργανισμό σας. Πλήρεις δυνατότητες δωρεάν δοκιμής 30 ημερών. Εγγύηση επιστροφής χρημάτων 60 ημερών.
kte καρτέλα 201905

Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη

  • Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
  • Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
  • Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
κάτω μέρος γραφείου
Σχόλια (30)
Δεν υπάρχουν ακόμη βαθμολογίες. Γίνε ο πρώτος που θα αξιολογήσετε!
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Το πρώτο σας παράδειγμα είναι πολύ καλό, αλλά λείπει ένα βήμα. Πριν κάνετε κλικ στο OK, ο κέρσορας πρέπει να βρίσκεται σε μια κενή περιοχή για την εξαγωγή της ενοποίησης. Εάν δεν έχετε επιλέξει μια κενή περιοχή κελιών μετά την προσθήκη του εύρους, θα λάβετε ένα σφάλμα "επικαλύψεις προορισμού πηγής".
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Δεν ήταν δυνατό να λειτουργήσει για περισσότερες από μία στήλες δεδομένων - κάποιες συμβουλές;
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Δούλεψε φανταστικά! Thanx! :-)
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Ο κώδικας VBA σπάει όταν προστίθενται περισσότερες σειρές, δεν είμαι σίγουρος γιατί
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Ο κώδικας VBA δεν λειτουργεί. Συνδυάζει την πρώτη στήλη αλλά τα δεδομένα της 2ης στήλης έχουν εξαφανιστεί
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Η μακροεντολή VBA λειτουργεί καλά, αλλά πώς πρέπει να την αλλάξω εάν θέλω να διαγράψω ολόκληρη τη σειρά αντί απλώς να διαγράψω τα περιεχόμενα; Έχω άλλες στήλες που θέλω να διατηρήσω συνδεδεμένες με αυτά τα δεδομένα.
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Σας ευχαριστώ πολύ για τις υπέροχες συμβουλές. Φανταστικός.
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Θα μπορούσατε να βρείτε hwo to ακριβώς το ίδιο πράγμα αλλά στα Έγγραφα Google; Πραγματικά το χρειάζομαι!
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Πώς μπορείτε να κάνετε τη στήλη όπου τα αθροίσματα θα ενημερώνονται αυτόματα όταν αλλάζετε τα αρχικά δεδομένα;
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Φαίνεται καλό μέρος για ένα pivot table.
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Αυτό το εργαλείο ενοποίησης είναι τόσο χρήσιμο. Ευχαριστώ πολύ για την κοινοποίηση των πληροφοριών :)
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Αγαπητέ κύριε Τι γίνεται αν έχω 3 Cloumns; Κόμβος1 Κόμβος2 Μήκος R1 J1 30 J1=113 J1 J2 29 J1 J3 54 J3 J4 47 J3 J5 27 J5 J6 19 J5 J7 17 J7 J8 10 J7 J9 56 J9 J10 96 J9 J11 29 J11 12 χρησιμοποιήστε αυτό για 34 στήλες.
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
ως συνήθως τέλειες ιδέες και έργα, σας ευχαριστώ όλους :-)
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Ευχαριστώ πραγματικά την εξήγησή σου πολύ χρήσιμη
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Πώς να δημιουργήσετε κώδικα VBA για να προσθέσετε σύνολα για 12 στήλες
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Είστε απίθανοι! Με έσωσες τόση παραγωγικότητα. Δεν μπορώ να σας ευχαριστήσω αρκετά παιδιά
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
τι γίνεται αν θέλω να κάνω μια μαθηματική εξίσωση πελάτη με τα διπλότυπα αντί για άθροισμα; Για παράδειγμα, θέλω τα αντίγραφά μου να υπολογίζουν τη συνολική ηλεκτρική αντίσταση.
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια σας,
Α5 Α6 Α7
Θέλω απάντηση για το KTO ως Transpose Rice Biryani Prawns

Αριστερή στήλη Δεξιά στήλη
ΚΤΟ Ρύζι
Office Tab Curd Rice
KTO Biryani
Ranjith Chiken
Γαρίδες KTO

Ευχαριστώ,
Chinnaraju
9849212552
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια σας,
Μπορείτε να εξηγήσετε ή να μοιραστείτε τη Φόρμουλα για παρακάτω
Α5 Α6 Α7
Θέλω απάντηση για το KTO ως Transpose Rice Biryani Prawns

Αριστερή στήλη Δεξιά στήλη
ΚΤΟ Ρύζι
Office Tab Curd Rice
KTO Biryani
Ranjith Chiken
Γαρίδες KTO

Ευχαριστώ,
Chinnaraju
9849212552
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια σου Am chinnaraju

μπορείτε να βοηθήσετε για αυτό. Ο καθενας?

=VLOOKUP(M5,E:F,2,)


Ευχαριστώ εκ των προτέρων.
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Χρειάζεται να είναι:
=VLOOKUP(M5,E:F,2,FALSE)
Δεν υπάρχουν σχόλια δημοσιεύτηκε ακόμα
Τοποθετήστε Περισσότερα
Αφήστε τα σχόλιά σας
Δημοσίευση ως επισκέπτης
×
Αξιολογήστε αυτήν την ανάρτηση:
0   Χαρακτήρες
Προτεινόμενες τοποθεσίες

Ακολουθησε μας

Πνευματικά δικαιώματα © 2009 - www.extendoffice.com. | Ολα τα δικαιώματα διατηρούνται. Τροφοδοτείται από ExtendOffice. | Sitemap
Το Microsoft και το λογότυπο του Office είναι εμπορικά σήματα ή σήματα κατατεθέντα της Microsoft Corporation στις Ηνωμένες Πολιτείες ή / και σε άλλες χώρες.
Προστατεύεται από το Sectigo SSL