Μετάβαση στο κύριο περιεχόμενο

Πώς να ανταλλάξετε γρήγορα περιεχόμενα δύο κελιών στο Excel;

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

Αντικαταστήστε με μη αυτόματο τρόπο δύο παρακείμενα περιεχόμενα κελιού
Ανταλλάξτε δύο μη γειτονικά περιεχόμενα κελιού με κωδικό VBA
Ανταλλάξτε εύκολα δύο τυχαία περιεχόμενα κελιού με μόνο μερικά κλικ


Αντικαταστήστε με μη αυτόματο τρόπο δύο παρακείμενα περιεχόμενα κελιού

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

doc-swap-cell1

1. Επιλέξτε το κελί που θέλετε να ανταλλάξετε. Σε αυτό το παράδειγμα, επιλέξτε το κελί A4.

2. Τύπος αλλαγή και βάλτε τον κέρσορα στο δεξί περίγραμμα.

3. Στη συνέχεια, σύρετε τον κέρσορα στο δεξί περίγραμμα του κελιού B4.

4. Όταν υπάρχουν εμφανίσεις "", Αφήστε το ποντίκι.

5. Και τα δύο περιεχόμενα κελιού έχουν αλλάξει. Δείτε το στιγμιότυπο οθόνης:

doc-swap-cell2

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

Ανταλλάξτε γρήγορα περιεχόμενο από δύο κελιά ή περιοχές στο Excel:

Kutools για Excel's Σειρά ανταλλαγής Το βοηθητικό πρόγραμμα σάς βοηθά να ανταλλάξετε εύκολα δύο καθορισμένα κελιά ή εύρη ταυτόχρονα στο Excel, όπως φαίνεται στην παρακάτω επίδειξη.
Κατεβάστε το και δοκιμάστε το τώρα! (Δωρεάν διαδρομή 30 ημερών)

ανταλλαγή κυττάρων1


Ανταλλάξτε δύο μη γειτονικά περιεχόμενα κελιού με κωδικό VBA

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

1. πάτα το Ctrl και επιλέξτε τα δύο μη γειτονικά κελιά που θέλετε να ανταλλάξετε.

2. Κλίκ Εργολάβος>Visual Basic, Ένα νέο Microsoft Visual Basic για εφαρμογές θα εμφανιστεί το παράθυρο, κάντε κλικ Κύριο θέμα>Μονάδα μέτρησηςκαι εισαγάγετε τον ακόλουθο κώδικα στο Μονάδα μέτρησης:

Sub SwapTwoRange()
'Updateby20131120
Dim Rng1 As Range, Rng2 As Range
Dim arr1 As Variant, arr2 As Variant
xTitleId = "KutoolsforExcel"
Set Rng1 = Application.Selection
Set Rng1 = Application.InputBox("Range1:", xTitleId, Rng1.Address, Type:=8)
Set Rng2 = Application.InputBox("Range2:", xTitleId, Type:=8)
Application.ScreenUpdating = False
arr1 = Rng1.Value
arr2 = Rng2.Value
Rng1.Value = arr2
Rng2.Value = arr1
Application.ScreenUpdating = True
End Sub

3. Στη συνέχεια κάντε κλικ στο κουμπί doc-multiply-υπολογισμός-3 για να εκτελέσετε τον κώδικα και μετά εμφανίζεται ένα παράθυρο διαλόγου για να επιλέξετε τα δύο κελιά με τα οποία θέλετε να ανταλλάξετε. Δείτε στιγμιότυπα οθόνης:

εύρος ανταλλαγής εγγράφων1

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

εύρος ανταλλαγής εγγράφων1

: Αυτός ο κωδικός VBA δεν μπορεί να ανταλλάξει τη μορφοποίηση των δύο κελιών.


Ανταλλάξτε εύκολα δύο τυχαία περιεχόμενα κελιού με μόνο μερικά κλικ

Με Kutools για Excel's Σειρά ανταλλαγής βοηθητικό πρόγραμμα, όχι μόνο μπορούμε να ανταλλάξουμε δύο γειτονικά κελιά, σειρές ή στήλες, αλλά και να αλλάξουμε εύκολα δύο μη γειτονικά κελιά, σειρές ή στήλες.

Πριν από την εφαρμογή Kutools για Excel, σας παρακαλούμε κατεβάστε και εγκαταστήστε το πρώτα.

1. κλικ Kutools > Σειρά > Σειρά ανταλλαγής, δείτε το στιγμιότυπο οθόνης:

2. Στο Σειρά ανταλλαγής πλαίσιο διαλόγου, πρέπει:

  • (1) κάντε κλικ στο πρώτο doc-Replet-range-names-7 στο κουμπί Εύρος ανταλλαγής 1 πλαίσιο για να επιλέξετε τα κελιά που θέλετε να ανταλλάξετε.
  • (2) κάντε κλικ στο δεύτερο doc-Replet-range-names-7 κουμπί από Εύρος ανταλλαγής 2 πλαίσιο για να επιλέξετε τα κελιά με τα οποία θα ανταλλάξετε.
    Συμβουλές: Μπορείτε να επιλέξετε τις δύο περιοχές πριν από την εφαρμογή της δυνατότητας και, στη συνέχεια, μπορείτε να δείτε ότι οι επιλεγμένες δύο περιοχές εμφανίζονται στα πλαίσια Swap Range 1 και Swap Range 2 ξεχωριστά.
  • (3) Κάντε κλικ στο OK κουμπί.

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

εύρος ανταλλαγής εγγράφων1

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


Επίδειξη: Ανταλλάξτε δύο τυχαία περιεχόμενα κελιού με το Kutools για Excel


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

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

🤖 Kutools AI Aide: Επανάσταση στην ανάλυση δεδομένων με βάση: Ευφυής Εκτέλεση   |  Δημιουργία κώδικα  |  Δημιουργία προσαρμοσμένων τύπων  |  Αναλύστε δεδομένα και δημιουργήστε γραφήματα  |  Επίκληση Λειτουργιών Kutools...
Δημοφιλή χαρακτηριστικά: Εύρεση, επισήμανση ή αναγνώριση διπλότυπων   |  Διαγραφή κενών γραμμών   |  Συνδυάστε στήλες ή κελιά χωρίς απώλεια δεδομένων   |   Γύρος χωρίς φόρμουλα ...
Σούπερ Αναζήτηση: VLookup πολλαπλών κριτηρίων    VLookup πολλαπλών τιμών  |   VLookup σε πολλά φύλλα   |   Ασαφής αναζήτηση ....
Σύνθετη αναπτυσσόμενη λίστα: Γρήγορη δημιουργία αναπτυσσόμενης λίστας   |  Εξαρτημένη αναπτυσσόμενη λίστα   |  Πολλαπλή αναπτυσσόμενη λίστα ....
Διαχειριστής στήλης: Προσθέστε έναν συγκεκριμένο αριθμό στηλών  |  Μετακίνηση στηλών  |  Εναλλαγή κατάστασης ορατότητας κρυφών στηλών  |  Συγκρίνετε εύρη και στήλες ...
Επιλεγμένα Χαρακτηριστικά: Εστίαση πλέγματος   |  Προβολή σχεδίου   |   Μεγάλη Formula Bar    Διαχείριση βιβλίου εργασίας & φύλλου   |  Βιβλιοθήκη πόρων (Αυτόματο κείμενο)   |  Επιλογή ημερομηνίας   |  Συνδυάστε φύλλα εργασίας   |  Κρυπτογράφηση/Αποκρυπτογράφηση κελιών    Αποστολή email ανά λίστα   |  Σούπερ φίλτρο   |   Ειδικό φίλτρο (φίλτρο με έντονη γραφή/πλάγια γραφή/διαγραφή...) ...
Κορυφαία 15 σύνολα εργαλείων12 Κείμενο Εργαλεία (Προσθήκη κειμένου, Κατάργηση χαρακτήρων, ...)   |   50 + Διάγραμμα Τύποι (Gantt διάγραμμα, ...)   |   40+ Πρακτικό ΜΑΘΗΜΑΤΙΚΟΙ τυποι (Υπολογίστε την ηλικία με βάση τα γενέθλια, ...)   |   19 Εισαγωγή Εργαλεία (Εισαγωγή κωδικού QR, Εισαγωγή εικόνας από το μονοπάτι, ...)   |   12 Μετατροπή Εργαλεία (Αριθμοί σε λέξεις, Μετατροπή Συναλλάγματος, ...)   |   7 Συγχώνευση & διαχωρισμός Εργαλεία (Σύνθετες σειρές συνδυασμού, Διαίρεση κελιών, ...)   |   ... κι αλλα

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

Περιγραφή


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

  • Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
  • Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
  • Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
Comments (12)
Rated 2.5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
The vba is pants because it loses formulas and formatting. It's incredible that Excel has been through like about 25 different versions and STILL doesn't have the facility in it natively to swap two ranges/non-adjacent cells around. Sort it out Microsoft!
Rated 2.5 out of 5
This comment was minimized by the moderator on the site
Legyenszíves Megírni melyik az a müszak gomb.
Köszönöm Üdv Ádám
This comment was minimized by the moderator on the site
this isn't working for me. I don't know why
This comment was minimized by the moderator on the site
Koje njesra... na kraju cu ipak raditi copy paste... Umesto da su ubacili swap opciju na padajucem menju....
This comment was minimized by the moderator on the site
Cool trick that saved me a lot of time. Thank you!
This comment was minimized by the moderator on the site
First option work well for me thanks for your efforts... :-)
This comment was minimized by the moderator on the site
Thanks !! works perfectly for me..
This comment was minimized by the moderator on the site
Thanks !! works perfectly for me..
This comment was minimized by the moderator on the site
Thank you for the information!!!
This comment was minimized by the moderator on the site
You could just cut (non-adjacent) Cell A into an unoccupied cell, paste required cell B into that space then put A into the cell B formerly occupied couldn't you?
This comment was minimized by the moderator on the site
It's not as simple as you suggested when cells have formula in them. And this also helps in inserting multiple cells at any desired location as well.
This comment was minimized by the moderator on the site
Yes you could, but why go such a roundabout way when you can do it much faster this way. Thanks ExtendOffice for your good work.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations