Ποια εντολή χρησιμοποιείται για τη συγχώνευση κελιών. Συνδυάστε κελιά στο Microsoft Excel

Στο Excel, μπορείτε να συνδυάσετε κελιά με σειρές και στήλες. Όταν συνδυάζετε κελιά στο Excel, πρέπει να λάβετε υπόψη μερικές αποχρώσεις:

  • Κατά το συνδυασμό κελιών στο Excel, τα δεδομένα που γράφονται στα κελιά θα διαγραφούν εκτός από τα δεδομένα που είναι γραμμένα στο επάνω αριστερό κελί. Όταν συνδυάζετε κελιά κειμένου στο Excel, πρέπει πρώτα να αντιγράψετε το κείμενο από τα κελιά σε ένα σημειωματάριο.
  • Όταν συγχωνεύετε πολλά κελιά ανά σειρά και στήλη, θα μπορείτε να συγχωνεύσετε μόνο τον ίδιο αριθμό κελιών σε μια σειρά και στήλη. Για παράδειγμα, δεν μπορείτε να συνδυάσετε 2 κελιά σε μία στήλη και 1 κελί σε άλλη στήλη ή 2 κελιά σε μία σειρά και 1 κελί σε άλλη σειρά.

Συνδυάζοντας κελιά μέσω μορφής κελιού

Για να συγχωνεύσετε κελιά στο Excel, πρέπει να τοποθετήσετε το δείκτη του ποντικιού πάνω από ένα από τα κελιά που θέλετε να συγχωνεύσετε, πατήστε το αριστερό κουμπί του ποντικιού και χωρίς να το αφήσετε, επιλέξτε όλα τα κελιά που πρέπει να συγχωνευτούν. Αφήστε το αριστερό κουμπί και πατήστε δεξί κουμπίποντίκι. Θα ανοίξει κατάλογος συμφραζόμενωνστο οποίο πρέπει να επιλέξετε το στοιχείο Μορφοποίηση κελιών.

Συνδυασμένες σειρές στο Excel

Θα ανοίξει ένα παράθυρο με τίτλο Format Cells. Επίσης, ανοίξτε αυτό το παράθυρο για να συγχωνεύσετε κελιά στο Excel. Πατήστε το πληκτρολόγιο Πλήκτρο Altκαι κρατώντας το, πατήστε εναλλακτικά και αφήστε τα ακόλουθα πλήκτρα Я, Щ, Я, μετά από αυτό θα ανοίξει ένα παράθυρο και μπορείτε να απελευθερώσετε το πλήκτρο Alt. Σε αυτό το παράθυρο, πρέπει να μεταβείτε στην καρτέλα Ευθυγράμμιση και σε αυτήν την καρτέλα, επιλέξτε το πλαίσιο δίπλα στη συγχώνευση κελιών.


Ένα παράθυρο στο οποίο μπορείτε να συνδυάσετε γραμμές στο Excel

Κάνοντας κλικ στο κουμπί OK, το παράθυρο Format Cells θα κλείσει αμέσως και τα επιλεγμένα κελιά θα συγχωνευτούν στο Excel. Εάν έχουν γραφτεί δεδομένα στα κελιά που επιλέξατε, μετά το κλείσιμο του παραθύρου Μορφοποίηση κελιών, θα εμφανιστεί μια προειδοποίηση από τη Microsoft με το ακόλουθο κείμενο: Η επιλεγμένη περιοχή περιέχει πολλές τιμές δεδομένων. Η συγχώνευση κελιών θα έχει ως αποτέλεσμα την απώλεια όλων των τιμών εκτός από την επάνω αριστερή γωνία.


Οι τιμές χάνονται κατά τη συγχώνευση κελιών στο Excel 2010

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


Είναι δυνατό να χωρίσετε ένα κελί στο Excel που έχει συγχωνευτεί

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

Συγχώνευση κελιών μέσω της γραμμής εργαλείων

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


Στο Excel, η συγχώνευση κελιών γίνεται μέσω της γραμμής εργαλείων

Στον πίνακα Excel, κάντε κλικ στο Combine and Center. Μετά από αυτό, όλα τα επιλεγμένα κελιά θα συγχωνευτούν. Για να χωρίσετε ένα κελί στο Excel, πρέπει να μετακινήσετε τον κέρσορα πάνω από το συγχωνευμένο κελί και να πατήσετε το αριστερό κουμπί του ποντικιού.


Με ένα κλικ, μπορείτε να χωρίσετε ένα κελί σε δύο ή περισσότερα στο Excel

Στη συνέχεια, κάντε κλικ στο Συγχώνευση και Τοποθετήστε στο κέντρο ή στο αναδυόμενο μενού δίπλα σε αυτό το στοιχείο και επιλέξτε Unmerge Cells. Με αυτόν τον τρόπο θα μπορείτε να χωρίσετε κελιά στο Excel.

Συνδυασμός τιμών από κελιά

Είναι δυνατό να συνδυάσετε κείμενο σε κελιά excel χωρίς να χάσετε δεδομένα, αλλά τα δεδομένα θα τοποθετηθούν σε ένα νέο κελί. Η συνένωση κελιών στο Excel χωρίς απώλεια δεδομένων γίνεται χρησιμοποιώντας τον τύπο = όνομα κελιού & "" & όνομα κελιού. Για παράδειγμα, εάν πρέπει να συνδυάσετε κείμενο σε κελιά Excel B3 και C3, τότε ο τύπος θα μοιάζει με αυτό = B3 & "" & C3.


Χρησιμοποιώντας έναν τύπο, συνδυάζετε δεδομένα σε κελιά στο Excel

Η συγχώνευση των περιεχομένων των κελιών στο Excel θα πραγματοποιηθεί σε οποιοδήποτε κελί που επιλέγετε, για παράδειγμα A3. Πρέπει να τοποθετήσετε έναν τύπο σε αυτό το κελί και γι 'αυτό μετακινούμε τον κέρσορα του ποντικιού πάνω από το κελί A3 και πατήστε το αριστερό κουμπί του ποντικιού. Στη συνέχεια, εισαγάγετε = B3 & "" & C3 στη γραμμή τύπων και πατήστε το πλήκτρο Enter στο πληκτρολόγιο και οι τιμές των κελιών θα συγχωνευτούν στο Excel ταυτόχρονα. Μην ξεχάσετε να βάλετε ίσο σύμβολο = πριν από τον τύπο.

βίντεο

Αυτό το βίντεο δείχνει πώς να συνδυάσετε τιμές από το Excel στο Excel. διαφορετικά κύτταρασε μια.

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

Πρώτα απ 'όλα, χρησιμοποιήστε το ποντίκι σας για να επιλέξετε όλα τα κελιά που πρέπει να συνδυάσετε σε ένα. Αυτά μπορεί να είναι οριζόντια και κάθετα κελιά.

Αφού επιλέξετε τα κελιά που χρειάζεστε, μπορείτε να συνεχίσετε τη λειτουργία. Στη συνέχεια, μπείτε στο μενού ρυθμίσεων κελιού. Αυτό μπορεί να γίνει με δύο τρόπους. Ο γρηγορότερος τρόπος επιτυγχάνεται πατώντας τους συνδυασμούς ctrl + 1. Εάν ένα τέτοιο έργο εμφανίζεται συχνά μπροστά σας, είναι καλύτερα να θυμάστε αυτόν τον συνδυασμό χάριν εξοικονόμησης χρόνου. Ένας άλλος τρόπος είναι να επιλέξετε το στοιχείο μενού Μορφοποίηση στην επάνω αριστερή γωνία του παραθύρου του Excel. Και μετά το άνοιγμα του μενού, επιλέξτε το στοιχείο "Κελιά".

Θα δείτε ένα μικρό παράθυρο να εμφανίζεται. Ας πάμε στην καρτέλα "Ευθυγράμμιση", όπου πρέπει να βρείτε τη γραμμή "Συγχώνευση κελιών".

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

Όπως θα παρατηρήσετε, όλα τα κελιά που επιλέξατε θα πρέπει να συγχωνευτούν σε ένα μεγάλο κελί. Με άλλα λόγια, η εργασία μας έχει ολοκληρωθεί.

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

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

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

Ξεκινώντας

Ας δώσουμε συγκεκριμένο παράδειγμα... Το πρόβλημα είναι ότι στο Excel είναι αδύνατο να χωριστούν τα βασικά κελιά, οπότε αν πρέπει να κάνετε το κελί A2 να διαιρείται σε 3 μέρη, μπορείτε να χρησιμοποιήσετε τη συνένωση κελιών A1-C1 Αφού τα συνδυάσετε, παίρνετε έναν πίνακα με μια επικεφαλίδα στο A1-C1 και τρία κελιά κάτω από αυτό, το A2-C2. Κατά τη δημιουργία πινάκων, θυμηθείτε ότι η δομή τους πρέπει να μελετηθεί εκ των προτέρων, έτσι ώστε αργότερα να μην χρειάζεται να επαναλάβετε τα πάντα από το μηδέν. Υπάρχουν διάφοροι τρόποι για να συνδυάσετε κελιά στο Excel.

Δημιουργία πίνακα

Ας αρχίσουμε λοιπόν να διαμορφώνουμε απευθείας τα κελιά. Ας δούμε πώς να συνδυάσουμε κελιά στο Excel. Υπάρχουν τρεις τρόποι.

  1. Η πιο γρήγορη και ευκολότερη επιλογή.Στον πίνακα ελέγχου, παραπάνω άνοιξε σελίδαμε το έγγραφο, υπάρχει ένα κουμπί Συγχώνευση και Κέντρο. Αφού κάνετε κλικ σε αυτό, τα κελιά που επιλέξατε θα συνδυαστούν σε ένα και όλα τα δεδομένα που θα εισαγάγετε θα εμφανίζονται ακριβώς στο κέντρο.
  2. Η δεύτερη και η τρίτη μέθοδος μπορούν να συνδυαστούν σε μία, γιατί σε αυτά όλα επιλύονται μέσω της ίδιας λειτουργίας.

Χαρακτηριστικά μορφοποίησης

Υπάρχουν διάφοροι κανόνες για το συνδυασμό κελιών.

  • Τα κελιά μπορούν να ενώνονται ανά σειρά, ανά στήλη και τομείς.
  • Εάν περιέχουν δεδομένα, τότε το προκύπτον κελί περιέχει δεδομένα αποκλειστικά από το πάνω αριστερό "κελί". Κατά τη μορφοποίηση πολλαπλών κελιών με πληροφορίες, το Excel θα εμφανίσει μια ειδοποίηση καταστροφής δεδομένων.
  • Μπορείτε να συνδυάσετε κελιά σε πολλά σημεία του πίνακα ταυτόχρονα και όλες οι ενότητες δεν θα συνδυαστούν. Τα συγχωνευμένα κελιά θα παραμείνουν στη θέση τους.

Τι γίνεται αν πρέπει συχνά να εργάζεστε στο Excel; Πώς να συγχωνεύσετε κελιά χωρίς να χάσετε δεδομένα; Για τέτοιες καταστάσεις, δημιουργήθηκε μια ειδική μονάδα πρόσθετου - μενού Office. Ενσωματώνεται στο πρόγραμμα γραφείου σας. Ένα πρόσθετο στοιχείο εμφανίζεται στον πίνακα ελέγχου για το χρήστη.

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

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

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

Αναστρέψιμη διαδικασία

Έχοντας καταλάβει πώς να συγχωνεύσετε κελιά στο Excel, αξίζει να αναφερθεί ότι τυχόν ενέργειες στο το γραφείο της MicrosoftΤο Excel μπορεί να αναιρεθεί είτε κάνοντας κλικ στο κουμπί στην κορδέλα "Αναίρεση" (θα αναιρεθεί η τελευταία ενέργεια) είτε εκτελώντας τις ίδιες ενέργειες που περιγράφηκαν στην ενότητα "Δημιουργία πίνακα".

class = "eliadunit">

Εάν είναι απαραίτητο, το Excel έχει τη δυνατότητα να συνδυάζει δεδομένα από πολλά κελιά σε ένα. Μπορείτε να κολλήσετε τόσο τον ίδιο τύπο δεδομένων (αριθμός + αριθμός) όσο και διαφορετικούς τύπους (αριθμός + λέξη). Αυτές οι λειτουργίες εκτελούνται χρησιμοποιώντας τον ΕΙΔΙΚΟ τύπο (ή στην αγγλική έκδοση CONCATENATE). Ένα ανάλογο αυτού του τύπου είναι η χρήση ενός σημείου που ονομάζεται ampersand (&). Η εκμάθηση της χρήσης λαβής στο Excel γίνεται καλύτερα με παραδείγματα πραγματικού κόσμου.

Πρώτο παράδειγμα: χρήση της συνένωσης λέξεων σε ένα κελί στο Excel (για παράδειγμα, κατά τη σύνταξη διαφημίσεων στο Yandex Direct). Εργασία: προσθέστε τις λέξεις "Κλήση!" Στο διαφημιστικό κείμενο και "Καλέστε τώρα!" Η στήλη Β περιέχει το διαφημιστικό κείμενο, στήλη Γ - τη λέξη "Κλήση", στην επόμενη στήλη: "!" ή τώρα! ":

Για τους σκοπούς της μεγάλης κλίμακας ενοποίησης στη στήλη Α, εισαγάγετε τους τύπους (το ampersand εισάγεται στην αγγλική διάταξη Shift + 7):

= ΣΥΓΚΕΚΡΙΜΕΝΟ (B1; ""; C1; D1)

= B2 & "" & C2 & D2

= ΣΥΓΚΕΚΡΙΜΕΝΟ (B3; ""; C3; D3)

= B4 & "" & C4 & D4

class = "eliadunit">

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

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

Αξίζει να προσέξετε το γεγονός ότι μπορείτε να εργαστείτε με τα αποτελέσματα που λαμβάνονται όπως και με τους αριθμούς. Αθροίστε, πολλαπλασιάστε, διαιρέστε κ.λπ. Αλλά χρησιμοποιήστε το αριθμητικός τύποςδεν λαμβάνω. Για παράδειγμα, αν γράψετε τον τύπο = SUM (A2: A5) στα κελιά αθροίσματος, τότε ο υπολογισμός θα είναι 0.

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

Για τη σωστή εμφάνιση (στήλη B), πρέπει να χρησιμοποιήσετε τον τύπο TEXT. Η σύνταξή της έχει ως εξής: ΚΕΙΜΕΝΟ(αριθμός κελιού ή τιμή μορφή αριθμητικής τιμής »). Μπορείτε να εξοικειωθείτε με τις μορφές στο μενού του Excel στην καρτέλα "Αρχική σελίδα", στην ενότητα "Αριθμός".

Έχοντας τις παραπάνω γνώσεις, μπορείτε επιδέξια Microsoft Excelσυνδυασμένες τιμές σε ένα κελί.

Μερικές φορές το Excel εκπλήσσεται με τις απαιτήσεις του για να κάνει κάτι μέσω ηλεκτρονικών μακροεντολών. Πρόσφατα, η εργασία προέκυψε για να χωρίσει πολλά συγχωνευμένα κελιά ένα προς ένα, έτσι ώστε να μπορείτε να ταξινομήσετε ολόκληρο το εύρος κανονικά. Δεν νομίζω ότι πρέπει να εξηγήσει κανείς πόσο εύκολο είναι να αφαιρέσετε τη συγχώνευση κελιών σπάζοντάς τα ένα προς ένα (εννοώ τη μορφή-ευθυγράμμιση-αφαιρέστε το πλαίσιο ελέγχου από τη "συγχώνευση κελιών") Όμως, δυστυχώς, το πρώην δέντρο-γούνας έχει μια πολύ ενδιαφέρουσα ιδιότητα, όταν ακυρώνει τη συγχώνευση των κελιών, για να μην ρωτήσει ακριβώς πώς θα θέλαμε να τα επιστρέψουμε στην κανονική, αποσυνδεδεμένη κατάσταση, αλλά γράφει ανόητα την αξία που ήταν στη συγχώνευση κελί στο πάνω αριστερό κελί και αφήνει όλα τα άλλα κελιά κενά ... Φυσικά, δεν χρειάζεται να μιλάμε για κανονική ταξινόμηση από προηγούμενα συγχωνευμένα κελιά. Και θα ήταν ωραίο να έχουμε μόνο 200-300 από αυτά. Και αν υπάρχουν εξήντα χιλιάδες από αυτά, χωρισμένα σε ομάδες των 10 κελιών; Μη αυτόματη αντιγραφή έξι χιλιάδων τιμών στα υπόλοιπα κενά κελιά;

Μια τυπική εικόνα - θέλουμε να ταξινομήσουμε τη λίστα με το επώνυμο, έτσι ώστε ο Kuznetsov να ακολουθεί τον Ivanov. Το παράδειγμα, φυσικά, είναι πολύ απλοποιημένο.

Το Excel δεν θα μας αφήσει να ταξινομήσουμε τον πίνακα ακριβώς έτσι - τα κελιά συγχωνεύονται. Αλλά ακόμη και αν ακυρώσουμε τη συγχώνευση, τότε κάθε επώνυμο θα γραφτεί μόνο στο επάνω κελί και τα υπόλοιπα θα πρέπει να συμπληρωθούν. Θα αποδειχθεί έτσι:

Και πρέπει να έχουμε μια αντίστοιχη τιμή σε κάθε κελί, αλλιώς, κατά την ταξινόμηση, βγάζουμε την κόλαση από αυτό!

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

  • αποσυνδέστε τα κελιά της επιλεγμένης περιοχής με γέμιση

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

Έτσι, δημιουργούμε μια μακροεντολή με τον κωδικό:

ABAP

Sub UnMerge_And_Fill_By_Value () "αποσυμπιέστε όλα τα κελιά στην Επιλογή και συμπληρώστε κελιά κάθε προηγούμενης ομάδας με τιμές από τα πρώτα κελιά τους Dim Διεύθυνση ως συμβολοσειρά Dim Cell ως Range If TypeName (Επιλογή)<>"Range" Έπειτα, βγείτε από το Sub End if If Selection.Cells.Count = 1 Στη συνέχεια, βγείτε από το Sub End if Application.ScreenUpdating = False For Every Cell In Inters (Selection, ActiveSheet.UsedRange) .Cells If Cell.MergeCells Then Address = Cell.MergeArea .Address Cell.UnMerge Range (Διεύθυνση). Value = Cell.Value End if Next Next Sub

SubUnMerge_And_Fill_By_Value () "αποσυμπιέστε όλα τα κελιά στην επιλογή κελιών κάθε προηγούμενης ομάδας και συμπληρώστε τις τιμές των πρώτων κελιών τους

DimAddressAs String

Εύρος DimCellAs

Εάν TypeName (Επιλογή) & lt; & gt; "Σειρά" Τότε

Έξοδος Sub

Τέλος εαν

Εάν η επιλογή. Κελιά. Μετρήστε = 1 Τότε

Έξοδος Sub

Τέλος εαν

Εφαρμογή. ScreenUpdating = Λάθος

Για κάθε τομή InCect (Επιλογή, ActiveSheet. UsedRange). Κελιά

Εάν κελί. MergeCellsThen

Διεύθυνση = κελί. MergeArea. Διεύθυνση

Κύτταρο. Κατάργηση

Εύρος (Διεύθυνση). Τιμή = κελί. αξία

Τέλος εαν

Επόμενο

Ως αποτέλεσμα της εκτέλεσης μακροεντολών, όλα τα επιλεγμένα συγχωνευμένα κελιά χωρίζονται ένα προς ένα και γεμίζουν με ακριβώς την τιμή που ήταν στη συγχωνευμένη. Ταξινόμηση, δεν θέλω.

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

Λοιπόν, εάν, μετά την επαναδιάταξη των κελιών, πρέπει να συγχωνεύσετε ξανά τα κελιά με τις ίδιες τιμές (ξεχάστε για ένα λεπτό ότι τα συγχωνευμένα κελιά είναι κακά, επειδή εάν χρειάζεστε οπτική σαφήνεια, τότε δεν μπορείτε να το κάνετε χωρίς αυτά), τότε θα πρέπει να χρησιμοποιήσουμε ξανά μια μακροεντολή. Υπάρχουν πολλοί σύνδεσμοι στο Διαδίκτυο - αλλά μόνο ένας δούλεψε για μένα.

Επίσης, για κάθε περίπτωση, θα δώσω τον κωδικό:

ABAP

Sub MergeCls () Dim ri As Integer, r2 As Integer, Col As Integer r1 = ActiveCell.Row r2 = ActiveCell.Row Col = ActiveCell.Column Do If Cells (r1, Col)<>Κελιά (r2 + 1, Col) Στη συνέχεια, εάν r1<>r2 Στη συνέχεια, Range (Cells (r1 + 1, Col), Cells (r2, Col)). ClearContents With Range (Cells (r1, Col), Cells (r2, Col)). HorizontalAlignment = xlCenter .VerticalAlignment = xlCenter .WrapText = True .Orientation = 0 .AddIndent = False .IndentLevel = 0. ShrinkToFit = False .ReadingOrder = xlContext. MergeCells = True End with End If r1 = r2 + 1 End If r2 = r2 + 1 Loop Μέχρι κελιά (r2, Col) = Τέλος Sub

SubMergeCls ()

DimriAs Integer, r2As Integer, ColAs Integer

r1 = ActiveCell. Σειρά

r2 = ActiveCell. Σειρά

Col = ActiveCell. Στήλη

Εάν κελιά (r1, Col) & lt; & gt; Κελιά (r2 + 1, Col) Στη συνέχεια

Εάν r1 & lt; & gt; r2 Στη συνέχεια

Εύρος (κελιά (r1 + 1, Col), κελιά (r2, Col)). Εκκαθάριση περιεχομένων

Με εύρος (κελιά (r1, Col), κελιά (r2, Col))

Συνέχιση του θέματος:
Μόντεμ

Κοιτάτε για δορυφορική τηλεόραση Tricolor TV εδώ και πολύ καιρό; Είναι ώρα να αντικαταστήσετε τον παλιό σας δέκτη; Τώρα είναι η καλύτερη στιγμή για να πραγματοποιήσετε τα όνειρά σας. Ολοκλήρωση παραγγελίας ...