Πίνακας περιεχομένων
Όταν ασχολείστε με την ανάλυση τεράστιων δεδομένων, μπορεί να χρειαστεί να αντιγράψετε πολλές εναλλακτικές γραμμές και να τις επικολλήσετε κάπου ταυτόχρονα. Excel δεν διαθέτει ενσωματωμένη συνάρτηση ή τύπο για να το επιτύχει αυτό. Ως αποτέλεσμα, σε αυτό το άρθρο, θα παρουσιάσουμε πώς να αντιγράψετε εναλλασσόμενες γραμμές στο Excel.
Κατεβάστε το βιβλίο ασκήσεων
Κατεβάστε αυτό το τετράδιο ασκήσεων για να εξασκηθείτε ενώ διαβάζετε αυτό το άρθρο.
Αντιγραφή εναλλακτικών σειρών.xlsm4 κατάλληλοι τρόποι αντιγραφής εναλλακτικών σειρών στο Excel
Στις παρακάτω ενότητες, θα αντιγράψουμε εναλλασσόμενες γραμμές στο Excel χρησιμοποιώντας έναν συνδυασμό ρυθμίσεων και τύπων του Excel. Αργότερα, θα σας δείξουμε πώς να εκτελέσετε το ίδιο πράγμα χρησιμοποιώντας VBA Στην παρακάτω εικόνα παρέχεται ένα παράδειγμα συνόλου δεδομένων, το οποίο θα χρησιμοποιηθεί για την ολοκλήρωση της διαδικασίας.
1. Κρατήστε πατημένο το πλήκτρο Ctrl και επιλέξτε για να αντιγράψετε εναλλακτικές σειρές στο Excel
Εάν τα δεδομένα σας δεν είναι πολύ μεγάλα, μπορείτε να τα επιλέξετε με το πλήκτρο Ctrl του πληκτρολογίου και του ποντικιού σας. Για να το κάνετε αυτό, ακολουθήστε τις παρακάτω οδηγίες.
Βήμα 1:
- Κρατήστε το Ctrl
- Επιλέξτε τις εναλλακτικές σειρές.
Βήμα 2:
- Αφού επιλέξετε το κελί, πατήστε Ctrl + C για αντιγραφή.
Βήμα 3:
- Στη συνέχεια, επικολλήστε το οπουδήποτε θέλετε.
Διαβάστε περισσότερα: Πώς να αντιγράψετε δεδομένα από ένα κελί σε ένα άλλο στο Excel αυτόματα
2. Εφαρμόστε την επιλογή Μετάβαση σε ειδική επιλογή για την αντιγραφή εναλλακτικών σειρών στο Excel
Μπορείτε να αντιγράψετε εναλλακτικές γραμμές στο Excel χρησιμοποιώντας την επιλογή Επεξεργασία. Ακολουθήστε τις παρακάτω οδηγίες για να το κάνετε.
Βήμα 1:
- Εισάγετε μια στήλη δίπλα στο σύνολο δεδομένων σας.
- Τύπος 'X' στην πρώτη σειρά και αφήστε τη δεύτερη σειρά κενή, όπως φαίνεται στην παρακάτω εικόνα.
Βήμα 2:
- Στη συνέχεια, χρησιμοποιήστε το AutoFill για να συμπληρώσετε πόσα κελιά πρέπει να αντιγράψετε.
- Επιλέξτε τα κελιά.
Βήμα 3:
- Από το Επεξεργασία επιλογή, επιλέξτε το Εύρεση & επιλογή
- Στη συνέχεια, επιλέξτε το Πηγαίνετε στο Special
Βήμα 4:
- Από το πλαίσιο, κάντε κλικ στο Κενά
- Στη συνέχεια, πατήστε Εισάγετε το .
Βήμα 5:
- Θα επιλέξετε τα κενά κελιά σας, τώρα θα διαγράψετε όλα τα κενά κελιά σας.
Βήμα 6:
- Για να διαγράψετε τα κενά κελιά, δεξί κλικ στο το ποντίκι και επιλέξτε το Διαγραφή
Βήμα 7:
- Κάντε κλικ στο Ολόκληρη σειρά
- Στη συνέχεια, πατήστε το Εισάγετε το
Ως εκ τούτου, θα βρείτε όλες τις εναλλακτικές σειρές σας σε μια σειρά. Τώρα, μπορείτε να τις αντιγράψετε και να τις επικολλήσετε οπουδήποτε θέλετε.
Διαβάστε περισσότερα: Ειδική επικόλληση VBA για την αντιγραφή τιμών και μορφών στο Excel (9 παραδείγματα)
Παρόμοιες αναγνώσεις
- Excel VBA για την αντιγραφή σειρών σε άλλο φύλλο εργασίας με βάση τα κριτήρια
- Χρήση VBA για επικόλληση τιμών μόνο χωρίς μορφοποίηση στο Excel
- Τρόπος αυτόματου φιλτραρίσματος και αντιγραφής ορατών σειρών με το Excel VBA
- Αντιγραφή μοναδικών τιμών σε άλλο φύλλο εργασίας στο Excel (5 μέθοδοι)
- Πώς να αντιγράψετε συγχωνευμένα και φιλτραρισμένα κελιά στο Excel (4 μέθοδοι)
3. Χρησιμοποιήστε έναν τύπο και την επιλογή Φίλτρο για να αντιγράψετε εναλλακτικές γραμμές στο Excel
Μπορείτε να αντιγράψετε εναλλακτικές γραμμές χρησιμοποιώντας τον τύπο σε συνδυασμό με την επιλογή Φίλτρο επιλογή στο Excel Ακολουθήστε τις διαδικασίες που περιγράφονται παρακάτω για να ολοκληρώσετε την εργασία.
Βήμα 1:
- Πληκτρολογήστε τον ακόλουθο τύπο στο κελί D5 .
=MOD(ROW(A1),2)=0 
Βήμα 2:
- Θα δώσει το αποτέλεσμά σας ως FALSE .
Βήμα 3:
- Σύρετέ τα προς τα κάτω σε όσα κελιά θέλετε. Θα δώσει αποτελέσματα με 'FALSE' και 'TRUE' σε εναλλακτικές σειρές.
Βήμα 4:
- Αφού επιλέξετε την περιοχή, κάντε κλικ στο Δεδομένα μενού καρτέλας.
- Επιλέξτε το Φίλτρο
Βήμα 5:
- Στη συνέχεια, κάντε κλικ στο Φίλτρο
- Αποεπιλέξτε το 'FALSE'
- Πατήστε το Εισάγετε το
Βήμα 6:
- Ως αποτέλεσμα, θα λάβετε την τιμή μόνο για το ' TRUE' .
Βήμα 7:
- Αντιγράψτε την τιμή του κελιού από τη γραμμή τύπων και επικολλήστε την στο πεδίο 'TRUE'
Βήμα 8:
- Τότε, AutoFill τα υπόλοιπα κύτταρα.
Βήμα 9:
- Από το Φίλτρο επιλογή, επιλέξτε το Επιλέξτε όλα
Βήμα 10:
- Το αποτέλεσμα θα είναι όπως βλέπετε στην παρακάτω εικόνα. Έτσι, πρέπει να αφαιρέσουμε το 'FALSE' τιμή σε κελιά.
Βήμα 11:
- Επιλέξτε το 'FALSE' από την επιλογή Φίλτρο
Βήμα 12:
- Η τιμή του κελιού που αποτιμάται 'FALSE' θα εμφανιστεί.
- Απλά, διαγράψτε τα.
Βήμα 13:
- Και πάλι, από το Φίλτρο επιλογή, επιλέξτε το Επιλέξτε όλα
Βήμα 14:
- Τέλος, μπορείτε να λάβετε τα αποτελέσματα με εναλλακτικό τρόπο.
Διαβάστε περισσότερα: Πώς να αντιγράψετε σειρές στο Excel με φίλτρο (6 γρήγορες μέθοδοι)
4. Εκτελέστε έναν κώδικα VBA για να αντιγράψετε εναλλακτικές σειρές στο Excel
Επιπλέον, με τη βοήθεια του VBA κώδικα, μπορείτε επίσης να αντιγράψετε εναλλακτικές γραμμές. Για να το κάνετε αυτό. Ακολουθήστε τα παρακάτω βήματα.
Βήμα 1:
- Επιλέξτε τα κελιά της περιοχής.
Βήμα 2:
- Τύπος Alt + F11 για να ανοίξετε το Μακροεντολή VBA .
- Κάντε κλικ στο Εισαγωγή
- Επιλέξτε το Ενότητα
Βήμα 3:
- Επικολλήστε τον ακόλουθο κώδικα VBA.
Sub CopyAlternateRows() Dim SelectionRng As Range Dim alternatedRowRng As Range Dim RowNumber, i As Long Set SelectionRng = Selection RowNumber = SelectionRng.Rows.Count With SelectionRng 'επιλέγουμε τη σειρά με αριθμό 1 στη μεταβλητή range Set alternatedRowRng = .Rows(1) 'εφαρμόζουμε βρόχο σε κάθε σειρά και τις προσθέτουμε στη μεταβλητή range For i = 3 To RowNumber Step 2 Set alternatedRowRng = Union(alternatedRowRng,.Rows(i)) Next i End With 'επιλέξτε τις εναλλασσόμενες γραμμές alternatedRowRng.Select End Sub 
Βήμα 4:
- Αποθηκεύστε το πρόγραμμα και πατήστε F5 Θα δείτε ότι θα επιλεγούν οι εναλλακτικές γραμμές.
Βήμα 5:
- Τώρα, πατήστε Ctrl + C για να το αντιγράψετε και να το επικολλήσετε όπου επιθυμείτε.
Διαβάστε περισσότερα: Πώς να αντιγράψετε πολλαπλές γραμμές στο Excel χρησιμοποιώντας μακροεντολές (4 παραδείγματα)
Συμπέρασμα
Συνοψίζοντας, ελπίζω ότι τώρα καταλαβαίνετε πώς να αντιγράφετε εναλλασσόμενες γραμμές στο Excel χρησιμοποιώντας τύπους και VBA Όλες αυτές οι τεχνικές θα πρέπει να διδαχθούν και να εφαρμοστούν από τα δεδομένα σας. Κοιτάξτε το βιβλίο πρακτικής και εφαρμόστε αυτά που μάθατε. Λόγω της ανεκτίμητης υποστήριξής σας, έχουμε την έμπνευση να συνεχίσουμε να προσφέρουμε σεμινάρια όπως αυτά.
Εάν έχετε οποιεσδήποτε ερωτήσεις, μη διστάσετε να επικοινωνήσετε μαζί μας. Παρακαλούμε να μας πείτε τη γνώμη σας στο τμήμα σχολίων παρακάτω.
Το Exceldemy το προσωπικό θα απαντήσει στα ερωτήματά σας το συντομότερο δυνατό.
Μείνετε μαζί μας και συνεχίστε να μαθαίνετε.
