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

Πώς να συγχωνεύσετε κάθε άλλη σειρά / κελί στο Excel;

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


Συγχώνευση κάθε άλλης σειράς / κελιού με τύπο στο Excel

Συγχωνεύστε κάθε άλλη σειρά / κελί με VBA


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

Επιλέξτε ένα κενό κελί και πληκτρολογήστε =OFFSET(A$1,(ROW()-1)*2,0)&" "&OFFSET(A$1,((ROW()-1)*2)+1,0) (Ένα $ 1 υποδεικνύει τα πρώτα δεδομένα στη λίστα σας, μπορείτε να τα αλλάξετε όπως χρειάζεστε) και πατήστε το πλήκτρο Enter. Στη συνέχεια, σύρετε τη λαβή πλήρωσης για να συμπληρώσετε το εύρος που χρειάζεστε για να εφαρμόσετε αυτόν τον τύπο. Δείτε το στιγμιότυπο οθόνης:



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

Εάν έχετε συνηθίσει να χρησιμοποιείτε το VBA, μπορείτε επίσης να εκτελέσετε το παρακάτω VBA για να συγχωνεύσετε κάθε άλλη σειρά.

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

2. κλικ Κύριο θέμα > Μονάδα μέτρησηςκαι αντιγράψτε το VBA στη λειτουργική μονάδα.

VBA: Συγχώνευση κάθε άλλης σειράς / κελιού

Sub CombineCells()
'Updateby20140314
Dim rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
For i = 1 To InputRng.Rows.Count Step 2
    For j = 1 To InputRng.Columns.Count
        OutRng.Value = InputRng.Cells(i, j).Value & InputRng.Cells(i + 1, j).Value
        Set OutRng = OutRng.Offset(0, 1)
    Next
    Set OutRng = OutRng.Offset(1, (InputRng.Columns.Count * -1))
Next
End Sub         

 

3. κλικ τρέξιμο για να εκτελέσετε τον κώδικα VBA, και a KutoolsforExcel εμφανίζεται ένα παράθυρο διαλόγου για να επιλέξετε ένα εύρος κελιών που θέλετε να συγχωνεύσετε κάθε άλλη σειρά. Δείτε το στιγμιότυπο οθόνης:


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


5. κλικ OKκαι μπορείτε να δείτε το αποτέλεσμα:



Σχετικά άρθρα:

Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations