Ugrás a tartalomra
 

Hogyan lehet megszámolni az egyedi névvel ellátott munkalapokat az Excelben?

Szerző: Siluvia Utolsó módosítás: 2021-02-22

Megpróbálta már megszámolni azon munkalapok számát, amelyek neve konkrét szóval kezdődik vagy tartalmaznak? Például számolja meg a munkalapok számát, amelyek neve „KTE” -vel kezdődik, vagy amelyek tartalmazzák. Ez a cikk ismerteti a probléma bemutatásának módját.

Számolja meg a munkalapokat a VBA kóddal
Gyorsan megtalálja az összes olyan munkalapot, amely konkrét szót tartalmaz a lap nevében


Számolja meg a munkalapokat a VBA kóddal

A következő VBA-kódok segítenek megszámolni a munkafüzetben a konkrét névvel ellátott munkalapokat. Kérjük, tegye a következőket.

1. megnyomni a más + F11 billentyűk megnyitásához Microsoft Visual Basic for Applications ablak.

2. Ban,-ben Microsoft Visual Basic for Applications ablakban kattintson betétlap > Modulok, majd másolja a VBA kód alatt a Kód ablakba.

1. VBA-kód: Számolja a „KTE” betűvel kezdődő munkalapokat

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

Ha meg szeretné számolni a „KTE” -et tartalmazó munkalapok számát, kérjük, alkalmazza a VBA 2. kód alatt.

2. VBA-kód: Számolja azokat a munkalapokat, amelyek neve „KTE” -t tartalmaz

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

Megjegyzések: Kérjük, cserélje ki a „KTE” szót arra, amelyre a munkalapok számának megadásához szüksége van.

3. megnyomni a F5 gombot a kód futtatásához. Ezután megjelenik egy párbeszédpanel, amely megmondja, hogy az aktuális munkafüzet hány munkalapja kezdődik „KTE” betűvel vagy „KTE” betűvel. Képernyőképek megtekintése:

A „KTE” betűvel kezdődő munkalapok száma:

A „KTE” nevű munkalapok száma:


Gyorsan megtalálja az összes olyan munkalapot, amely konkrét szót tartalmaz a lap nevében.

Ez a rész megmutatja, hogyan találhat meg gyorsan minden olyan munkalapot, amely egy adott szót tartalmaz a lap nevében a Kutools for Excel segítségével.

Kutools az Excel számára : több mint 300 praktikus Excel-bővítménnyel, szabadon kipróbálható korlátozás nélkül 30 nap alatt.

1. A Kutools for Excel telepítése után a Kutools' Navigáció ablaktábla automatikusan megnyílik a munkafüzet bal oldalán. Vagy kattintással engedélyezheti az ablaktáblát Kutools > Navigáció az alábbi képernyőképen látható.

2. Ban,-ben Munkafüzet és lap a navigációs ablaktábla szakaszában ellenőrizze a Szűrő mezőbe, és írja be a munkalap nevét, amely alapján megtalálja a munkalapokat. Ezután minden munkalap, amelynek neve tartalmazza az adott szót, leszűrésre kerül és felkerül a munkalap listamezőjébe. Lásd a képernyőképet:

  Ha ingyenes (30 napos) próbaverziót szeretne kapni a segédprogramról, kattintson a letöltéshez, majd lépjen a művelet végrehajtására a fenti lépések szerint.


Kapcsolódó cikkek:

A legjobb irodai hatékonyságnövelő eszközök

🤖 Kutools AI Aide: Forradalmasítsa az adatelemzést a következők alapján: Intelligens végrehajtás   |  Kód létrehozása  |  Hozzon létre egyéni képleteket  |  Adatok elemzése és diagramok létrehozása  |  A Kutools funkciók meghívása...
Népszerű szolgáltatások: Ismétlődések keresése, kiemelése vagy azonosítása   |  Üres sorok törlése   |  Oszlopok vagy cellák kombinálása adatvesztés nélkül   |   Kerek Formula nélkül ...
Szuper keresés: Több kritérium VLookup    Többértékű VLookup  |   VLookup több munkalapon   |   Fuzzy Lookup ....
Speciális legördülő lista: Gyors legördülő lista létrehozása   |  Függő legördülő lista   |  Többszörösen válassza ki a legördülő listát ....
Oszlopkezelő: Adjon meg egy adott számú oszlopot  |  Oszlopok mozgatása  |  Kapcsolja be a Rejtett oszlopok láthatósági állapotát  |  Tartományok és oszlopok összehasonlítása ...
Kiemelt funkciók: Rács fókusz   |  Design nézet   |   Nagy Formula bár    Munkafüzet és lapkezelő   |  Erőforrás-könyvtár (Auto szöveg)   |  Dátumválasztó   |  Kombinálja a munkalapokat   |  Cellák titkosítása/dekódolása    E-mailek küldése listánként   |  Szuper szűrő   |   Speciális szűrő (félkövér/dőlt/áthúzott szűrés...) ...
A 15 legjobb eszközkészlet12 szöveg Eszközök (Szöveg hozzáadása, Karakterek eltávolítása,...)   |   50 + Táblázatos Típusai (Gantt-diagram,...)   |   40+ Praktikus képletek (Számolja ki az életkort a születésnap alapján,...)   |   19 beszúrás Eszközök (Helyezze be a QR-kódot, Kép beszúrása az útvonalból,...)   |   12 Átalakítás Eszközök (Számok szavakig, Valuta átváltás,...)   |   7 Egyesítés és felosztás Eszközök (Haladó kombinált sorok, Hasított sejtek,...)   |   ... és több

Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz.  Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...


Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját

  • Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
  • Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
  • 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!