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

Πώς να μετρήσετε τα φύλλα εργασίας με συγκεκριμένο όνομα στο Excel;

Έχετε προσπαθήσει ποτέ να μετρήσετε τον αριθμό των φύλλων εργασίας των οποίων το όνομα ξεκινάει ή περιέχει συγκεκριμένη λέξη; Για παράδειγμα, μετρήστε τον αριθμό των φύλλων εργασίας που ξεκινούν το όνομα ή περιέχουν το "KTE". Αυτό το άρθρο θα παρέχει μέθοδο για να σας βοηθήσει να δείξετε το πρόβλημα.

Μετρήστε τα φύλλα εργασίας με συγκεκριμένο όνομα με τον κωδικό VBA
Βρείτε γρήγορα όλα τα φύλλα εργασίας που περιέχουν συγκεκριμένη λέξη στο όνομα του φύλλου


Μετρήστε τα φύλλα εργασίας με συγκεκριμένο όνομα με τον κωδικό VBA

Οι ακόλουθοι κωδικοί VBA σάς βοηθούν να μετράτε τον αριθμό των φύλλων εργασίας με συγκεκριμένο όνομα σε ένα βιβλίο εργασίας. Κάντε τα εξής:

1. Πάτα το άλλος + F11 για να ανοίξετε το Microsoft Visual Basic για εφαρμογές παράθυρο.

2. Στο Microsoft Visual Basic για εφαρμογές παράθυρο, κάντε κλικ στην επιλογή Κύριο θέμα > Μονάδα μέτρησηςκαι, στη συνέχεια, αντιγράψτε κάτω από τον κώδικα VBA στο παράθυρο Code.

Κωδικός VBA 1: Καταμέτρηση φύλλων εργασίας των οποίων το όνομα ξεκινά με "KTE"

Sub CountWSNames()
    Dim I As Long
    Dim xCount As Integer
    For I = 1 To ActiveWorkbook.Sheets.Count
        If Mid(Sheets(I).Name, 1, 3) = "KTE" Then xCount = xCount + 1
    Next
    MsgBox "There are " & CStr(xCount) & " sheets that start with 'KTE'", vbOKOnly, "KuTools for Excel"
End Sub

Εάν θέλετε να μετρήσετε τον αριθμό των φύλλων εργασίας που περιέχουν "KTE", εφαρμόστε τον κωδικό 2 του VBA παρακάτω.

Κωδικός VBA 2: Μετρήστε φύλλα εργασίας των οποίων το όνομα περιέχει "KTE"

Sub CountWSNames()
    Dim I As Long
    Dim xCount As Integer
    For I = 1 To ActiveWorkbook.Sheets.Count
        If InStr(1, Sheets(I).Name, "KTE") > 0 Then xCount = xCount + 1
    Next
    MsgBox "There are " & CStr(xCount) & " sheets that with 'KTE'", vbOKOnly, "KuTools for Excel"
End Sub

Note: Αντικαταστήστε τη λέξη «ΚΤΕ» με αυτή που χρειάζεστε, μετρήστε τον αριθμό των φύλλων εργασίας με βάση.

3. Πάτα το F5 κλειδί για την εκτέλεση του κώδικα. Στη συνέχεια, θα εμφανιστεί ένα παράθυρο διαλόγου για να σας πει πόσα φύλλα εργασίας στο τρέχον βιβλίο εργασίας ξεκινούν με "KTE" ή περιέχουν "KTE". Δείτε στιγμιότυπα οθόνης:

Αριθμός φύλλων εργασίας των οποίων το όνομα αρχίζει με «ΚΤΕ»:

Αριθμός φύλλων εργασίας των οποίων το όνομα περιέχει «KTE»:


Βρείτε γρήγορα όλα τα φύλλα εργασίας που περιέχουν συγκεκριμένη λέξη στο όνομα του φύλλου.

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

Kutools για Excel : με περισσότερα από 300 εύχρηστα πρόσθετα του Excel, δωρεάν να δοκιμάσετε χωρίς περιορισμό σε 30 ημέρες.

1. Μετά την εγκατάσταση του Kutools για Excel, το Kutools' Πλοήγηση Το παράθυρο θα ανοίξει αυτόματα στην αριστερή πλευρά του βιβλίου εργασίας. Ή μπορείτε να ενεργοποιήσετε το παράθυρο κάνοντας κλικ Kutools > Πλοήγηση όπως φαίνεται παρακάτω.

2. Στο Βιβλίο & φύλλο εργασίας ενότητα του παραθύρου πλοήγησης, ελέγξτε το Φίλτρα πλαίσιο και εισαγάγετε το όνομα του συγκεκριμένου φύλλου εργασίας με την εύρεση φύλλων εργασίας με βάση. Στη συνέχεια, όλα τα φύλλα εργασίας των οποίων το όνομα περιέχουν τη συγκεκριμένη λέξη φιλτράρονται και παρατίθενται στο πλαίσιο λίστας φύλλου εργασίας. Δείτε στιγμιότυπο οθόνης:

  Εάν θέλετε να έχετε μια δωρεάν δοκιμή (30-ημερών) αυτού του βοηθητικού προγράμματος, κάντε κλικ για να το κατεβάσετεκαι μετά πηγαίνετε για να εφαρμόσετε τη λειτουργία σύμφωνα με τα παραπάνω βήματα.


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

Τα καλύτερα εργαλεία παραγωγικότητας γραφείου

🤖 Kutools AI Aide: Επανάσταση στην ανάλυση δεδομένων με βάση: Ευφυής Εκτέλεση   |  Δημιουργία κώδικα  |  Δημιουργία προσαρμοσμένων τύπων  |  Αναλύστε δεδομένα και δημιουργήστε γραφήματα  |  Επίκληση Λειτουργιών Kutools...
Δημοφιλή χαρακτηριστικά: Εύρεση, επισήμανση ή αναγνώριση διπλότυπων   |  Διαγραφή κενών γραμμών   |  Συνδυάστε στήλες ή κελιά χωρίς απώλεια δεδομένων   |   Γύρος χωρίς φόρμουλα ...
Σούπερ Αναζήτηση: VLookup πολλαπλών κριτηρίων    VLookup πολλαπλών τιμών  |   VLookup σε πολλά φύλλα   |   Ασαφής αναζήτηση ....
Σύνθετη αναπτυσσόμενη λίστα: Γρήγορη δημιουργία αναπτυσσόμενης λίστας   |  Εξαρτημένη αναπτυσσόμενη λίστα   |  Πολλαπλή αναπτυσσόμενη λίστα ....
Διαχειριστής στήλης: Προσθέστε έναν συγκεκριμένο αριθμό στηλών  |  Μετακίνηση στηλών  |  Εναλλαγή κατάστασης ορατότητας κρυφών στηλών  |  Συγκρίνετε εύρη και στήλες ...
Επιλεγμένα Χαρακτηριστικά: Εστίαση πλέγματος   |  Προβολή σχεδίου   |   Μεγάλη Formula Bar    Διαχείριση βιβλίου εργασίας & φύλλου   |  Βιβλιοθήκη πόρων (Αυτόματο κείμενο)   |  Επιλογή ημερομηνίας   |  Συνδυάστε φύλλα εργασίας   |  Κρυπτογράφηση/Αποκρυπτογράφηση κελιών    Αποστολή email ανά λίστα   |  Σούπερ φίλτρο   |   Ειδικό φίλτρο (φίλτρο με έντονη γραφή/πλάγια γραφή/διαγραφή...) ...
Κορυφαία 15 σύνολα εργαλείων12 Κείμενο Εργαλεία (Προσθήκη κειμένου, Κατάργηση χαρακτήρων, ...)   |   50 + Διάγραμμα Τύποι (Gantt διάγραμμα, ...)   |   40+ Πρακτικό ΜΑΘΗΜΑΤΙΚΟΙ τυποι (Υπολογίστε την ηλικία με βάση τα γενέθλια, ...)   |   19 Εισαγωγή Εργαλεία (Εισαγωγή κωδικού QR, Εισαγωγή εικόνας από το μονοπάτι, ...)   |   12 Μετατροπή Εργαλεία (Αριθμοί σε λέξεις, Μετατροπή Συναλλάγματος, ...)   |   7 Συγχώνευση & διαχωρισμός Εργαλεία (Σύνθετες σειρές συνδυασμού, Διαίρεση κελιών, ...)   |   ... κι αλλα

Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου.  Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...

Περιγραφή


Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη

  • Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
  • Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
  • Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
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