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

Εισαγάγετε κενή σειρά κάθε άλλη ή ντη σειρά στο Excel

• Με τη δυνατότητα Εισαγωγή
• Με μια βοηθητική στήλη και τη δυνατότητα Ταξινόμησης
• Με λίγα μόνο κλικ από το Kutools για Excel
• Με κωδικό VBA

Βίντεο: Εισαγάγετε κενή σειρά κάθε άλλη σειρά στο Excel

Εισαγάγετε κενή σειρά κάθε άλλη σειρά με τη δυνατότητα Εισαγωγή

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

Βήμα 1: Επιλέξτε τις σειρές με μη αυτόματο τρόπο, μία προς μία, ενώ χρυσαφίζετε το πλήκτρο Ctrl

1. Επιλέξτε την πρώτη σειρά κάνοντας κλικ στον αριθμό της σειράς της.
2. Στη συνέχεια, πατήστε και κρατήστε πατημένο το Ctrl πληκτρολογήστε στο πληκτρολόγιό σας και, στη συνέχεια, κάντε κλικ στους αριθμούς σειρών έναν προς έναν που θέλετε να επιλέξετε.
   

Βήμα 2: Επιλέξτε την επιλογή Εισαγωγή από το μενού δεξί κλικ

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

Αποτέλεσμα:

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

Εισαγάγετε κενή σειρά κάθε άλλη ή ντη σειρά με βοηθητική στήλη και δυνατότητα Ταξινόμησης

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

Βήμα 1: Δημιουργήστε μια βοηθητική στήλη

1. Δημιουργήστε μια βοηθητική στήλη δίπλα στα δεδομένα σας. Για παράδειγμα, έχω μια σειρά δεδομένων A1:D10, θα εισαγάγω το κείμενο "Βοηθητική στήλη" στο κελί E1, δείτε στιγμιότυπο οθόνης:
   
2. Στη συνέχεια, πληκτρολογήστε 1 και 2 στο κελί E2 και E3 ξεχωριστά.
3. Επιλέξτε τα κελιά E2 και E3 και, στη συνέχεια, σύρετε τη λαβή πλήρωσης προς τα κάτω στο τελευταίο κελί δεδομένων, μια λίστα με αυξανόμενους αριθμούς θα συμπληρωθεί όπως φαίνεται στο παρακάτω στιγμιότυπο οθόνης:
   
4. Τώρα, αντιγράψτε τους αριθμούς σειράς και επικολλήστε τους ακριβώς κάτω από το τελευταίο κελί E10. Δείτε στιγμιότυπο οθόνης:
   

Βήμα 2: Εφαρμόστε τη δυνατότητα Ταξινόμησης για να ταξινομήσετε τα δεδομένα κατά βοηθητική στήλη

1. Τώρα, επιλέξτε τα δεδομένα στη στήλη Helper και, στη συνέχεια, κάντε κλικ ημερομηνία > Είδος, δείτε το στιγμιότυπο οθόνης:
   
2. Στο αναδυόμενο Προειδοποίηση ταξινόμησης διαλόγου, επιλέξτε Αναπτύξτε την επιλογή , και στη συνέχεια κάντε κλικ στο κουμπί OK Είδος κουμπί, δείτε το στιγμιότυπο οθόνης:
   
3. Στα ακόλουθα Είδος , επιλέξτε Βοηθητική στήλη από το Ταξινόμηση κατά αναπτυσσόμενη λίστα ως η βασική στήλη και αφήστε τις άλλες επιλογές αμετάβλητες. Στη συνέχεια, κάντε κλικ OK για να κλείσετε το διάλογο. Δείτε το στιγμιότυπο οθόνης:
   

Αποτέλεσμα:

Τώρα, τα δεδομένα θα ταξινομηθούν με βάση τις τιμές στη βοηθητική στήλη και μια κενή σειρά εισάγεται μετά από κάθε άλλη σειρά.

Εισαγάγετε κενή σειρά κάθε άλλη ή την ντη σειρά με λίγα μόνο κλικ

Μερικές φορές, όταν θέλετε να εισαγάγετε έναν συγκεκριμένο αριθμό κενών σειρών σε τακτά χρονικά διαστήματα εντός του εύρους δεδομένων σας, όπως η εισαγωγή μιας ή περισσότερων κενών σειρών μετά από κάθε δύο ή περισσότερες σειρές δεδομένων, η προηγούμενη μέθοδος μπορεί να είναι πολύπλοκη και δυσνόητη. Για να λύσετε αυτή τη δουλειά γρήγορα και εύκολα, Kutools για Excel'S Εισαγωγή κενών γραμμών & στηλών Η δυνατότητα μπορεί να σας βοηθήσει να αντιμετωπίσετε αυτήν την εργασία με πολλά μόνο κλικ.

Μετά τη λήψη και εγκατάσταση Kutools για Excel, Κλίκ Kutools > Κύριο θέμα > Εισαγωγή κενών γραμμών & στηλών για να ανοίξετε το Εισαγωγή κενών γραμμών & στηλών κουτί διαλόγου.

1. Επιλέξτε το εύρος δεδομένων όπου θέλετε να εισαγάγετε κενές σειρές.
2. Επιλέξτε Κενές σειρές από το Εισαγωγή τύπου τμήμα.
3. Στη συνέχεια, καθορίστε τους αριθμούς στο Διάστημα και Γραμμές κουτιά κειμένου όπως χρειάζεστε. (Εδώ, θα εισάγω μια κενή σειρά μετά από δύο σειρές, οπότε μπαίνω 2 και 1 μέσα στο Διάστημα και Γραμμές κουτιά χωριστά.)
4. Επιτέλους, κάντε κλικ στο κουμπί OK για να κλείσετε το παράθυρο διαλόγου.
   

Αποτέλεσμα:

Τώρα, μια κενή σειρά θα εισαχθεί στα δεδομένα μετά από κάθε δύο σειρές, δείτε στιγμιότυπο οθόνης:

Εισαγάγετε κενή σειρά κάθε άλλη ή την ντη σειρά με κωδικό VBA

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

Βήμα 1: Ανοίξτε το πρόγραμμα επεξεργασίας μονάδας VBA και αντιγράψτε τον κώδικα

1. Κρατήστε πατημένο το ALT + F11 στο Excel και ανοίγει το Microsoft Visual Basic για εφαρμογές παράθυρο.
2. Πατήστε Κύριο θέμα > Μονάδα μέτρησηςκαι επικολλήστε τον ακόλουθο κώδικα στο Μονάδα μέτρησης Παράθυρο.
   Κωδικός VBA: Εισαγάγετε συγκεκριμένο αριθμό κενών σειρών στα δεδομένα σε σταθερά διαστήματα

   Sub InsertRowsAtIntervals()
   'Updateby Extendoffice
   Dim Rng As Range
   Dim xInterval As Integer
   Dim xRows As Integer
   Dim xRowsCount As Integer
   Dim xNum1 As Integer
   Dim xNum2 As Integer
   Dim WorkRng As Range
   Dim xWs As Worksheet
   xTitleId = "KutoolsforExcel"
   Set WorkRng = Application.Selection
   Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
   xRowsCount = WorkRng.Rows.Count
   xInterval = Application.InputBox("Enter row interval. ", xTitleId, 1, Type:=1)
   xRows = Application.InputBox("How many rows to insert at each interval? ", xTitleId, 1, Type:=1)
   xNum1 = WorkRng.Row + xInterval
   xNum2 = xRows + xInterval
   Set xWs = WorkRng.Parent
   For i = 1 To Int(xRowsCount / xInterval)
       xWs.Range(xWs.Cells(xNum1, WorkRng.Column), xWs.Cells(xNum1 + xRows - 1, WorkRng.Column)).Select
       Application.Selection.EntireRow.Insert
       xNum1 = xNum1 + xNum2
   Next
   End Sub

Βήμα 2: Εκτελέστε τον κώδικα για να λάβετε το αποτέλεσμα

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

Αποτέλεσμα:

Τώρα, ο συγκεκριμένος αριθμός κενών σειρών εισάγεται στα υπάρχοντα δεδομένα στο κανονικό διάστημα που καθορίσατε, δείτε στιγμιότυπο οθόνης:

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

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