Πώς να συμπληρώσετε αυτόματα τον τύπο κατά την εισαγωγή γραμμών στο Excel;
Όταν εισάγετε κενές γραμμές ανάμεσα σε υπάρχουσες σειρές δεδομένων, ο τύπος δεν θα αντιγράψει και θα επικολλήσει στη νέα σειρά, θα πρέπει να το σύρετε ή να το συμπληρώσετε με μη αυτόματο τρόπο. Αλλά, μερικές φορές, θα θέλατε να συμπληρώσετε τον τύπο όταν εισάγετε κενές γραμμές μεταξύ εύρους δεδομένων αυτόματα όπως φαίνεται στο παρακάτω στιγμιότυπο οθόνης, αυτό το άρθρο, θα μιλήσω για μερικά γρήγορα κόλπα για την επίλυση αυτής της εργασίας.
Αυτόματη συμπλήρωση φόρμουλας κατά την εισαγωγή κενών γραμμών με τη δημιουργία πίνακα
Τύπος αυτόματης συμπλήρωσης κατά την εισαγωγή κενών σειρών με κώδικα VBA
Αυτόματη συμπλήρωση φόρμουλας κατά την εισαγωγή κενών γραμμών με τη δημιουργία πίνακα
Στο Excel, η μορφή πίνακα μπορεί να σας βοηθήσει να συμπληρώσετε αυτόματα τον παραπάνω τύπο στις νέες κενές κενές γραμμές, κάντε τα εξής:
1. Επιλέξτε το εύρος δεδομένων που θέλετε να συμπληρώσετε αυτόματα τον τύπο και, στη συνέχεια, κάντε κλικ στο Κύριο θέμα > Τραπέζι, δείτε το στιγμιότυπο οθόνης:
2. Στην Δημιουργία πίνακα διαλόγου, ελέγξτε το Ο πίνακας μου έχει κεφαλίδες εάν υπάρχουν κεφαλίδες στα δεδομένα σας, δείτε το στιγμιότυπο οθόνης:
3. Στη συνέχεια κάντε κλικ στο κουμπί OK κουμπί και ο πίνακας έχει δημιουργηθεί και τώρα, όταν εισάγετε μια κενή σειρά, ο παραπάνω τύπος θα εισαχθεί αυτόματα στη νέα σειρά, δείτε το στιγμιότυπο οθόνης:
Τύπος αυτόματης συμπλήρωσης κατά την εισαγωγή κενών σειρών με κώδικα VBA
Εάν δεν θέλετε να αλλάξετε τα δεδομένα σε πίνακα, ο παρακάτω κώδικας VBA μπορεί επίσης να σας βοηθήσει να επιτύχετε αυτό το πρόβλημα.
1. Επιλέξτε την καρτέλα φύλλου εργασίας που περιέχει τους τύπους που θέλετε να συμπληρώσετε αυτόματα και κάντε δεξί κλικ για να επιλέξετε Προβολή κωδικού από το μενού περιβάλλοντος για να μεταβείτε στο Microsoft Visual Basic για εφαρμογές παράθυρο και, στη συνέχεια, αντιγράψτε και επικολλήστε τον ακόλουθο κώδικα στη λειτουργική μονάδα:
Κωδικός VBA: Τύπος αυτόματης συμπλήρωσης κατά την εισαγωγή κενών γραμμών
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Updateby Extendoffice 20160725
Cancel = True
Target.Offset(1).EntireRow.Insert
Target.EntireRow.Copy Target.Offset(1).EntireRow
On Error Resume Next
Target.Offset(1).EntireRow.SpecialCells(xlConstants).ClearContents
End Sub
2. Στη συνέχεια, αποθηκεύστε και κλείστε αυτόν τον κωδικό, επιστρέψτε στο φύλλο εργασίας, τώρα, όταν κάνετε διπλό κλικ σε ένα κελί μεταξύ των δεδομένων, θα εισαχθεί μια νέα σειρά κάτω από το ενεργό κελί και ο τύπος συμπληρώνεται αυτόματα.
Επίδειξη: Τύπος αυτόματης συμπλήρωσης κατά την εισαγωγή κενών γραμμών
Τα καλύτερα εργαλεία παραγωγικότητας γραφείου
Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου. Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...
Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη
- Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
- Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
- Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!