Πώς να μετατρέψετε όλους τους πίνακες σε εύρη στο ενεργό φύλλο εργασίας;
Στο Excel, μπορείτε να χρησιμοποιήσετε ορισμένους πίνακες για την καταγραφή δεδομένων, αλλά, σε ορισμένες περιπτώσεις, θέλετε να μετατρέψετε τον πίνακα σε εύρος για κάποια έκδοση. Γενικά, μπορείτε να μετατρέψετε έναν πίνακα σε εύρος μόνο μία φορά, θα είναι ενοχλητικό εάν υπάρχουν δεκάδες πίνακες σε ένα φύλλο που χρειάζεται να μετατραπούν σε εύρη. Εδώ έχω έναν κωδικό VBA που μπορεί να μετατρέψει πίνακες ενεργού φύλλου σε εύρος ταυτόχρονα.
Μετατροπή όλων των πινάκων σε εύρη ενεργού φύλλου με VBA
Μετατροπή όλων των πινάκων σε εύρη ενεργού φύλλου με VBA
1. Ενεργοποιήστε το φύλλο που θέλετε να μετατρέψετε τους πίνακες και, στη συνέχεια, πατήστε Alt + F11 πλήκτρα για ενεργοποίηση Microsoft Visual Basic για εφαρμογές παράθυρο.
2. κλικ Κύριο θέμα > Μονάδα μέτρησης για να δημιουργήσετε ένα νέο σενάριο λειτουργικής μονάδας, αντιγράψτε και επικολλήστε τον παρακάτω κώδικα στην κενή μονάδα.
VBA: Μετατροπή όλων των πινάκων του ενεργού φύλλου σε εύρη
Sub ConvertTablesToRange()
'UpdatebyExtendoffice20180530
Dim xSheet As Worksheet
Dim xList As ListObject
Set xSheet = ActiveWorkbook.ActiveSheet
For Each xList In xSheet.ListObjects
xList.Unlist
Next
End Sub
3. Τύπος F5 κλειδί για την εκτέλεση του κώδικα, τώρα όλοι οι πίνακες του τρέχοντος φύλλου έχουν μετατραπεί σε εύρη.
Τα καλύτερα εργαλεία παραγωγικότητας γραφείου
Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου. Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...
Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη
- Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
- Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
- Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
