Ugrás a tartalomra

Hogyan lehet az Excel munkalap neve alapján keresni?

Normál esetben könnyen megtalálhatjuk / megkereshetjük a cellákat a Keresés és csere funkcióval. De időnként munkalap neve alapján kell keresnünk. Például több tucat munkalap tömörül a lap fülén, és gyorsan meg kell találnunk egy munkalapot, és arra kell ugranunk. Szóval hogyan? Ez a cikk mindkét megoldást tárgyalja annak egyszerű megoldására.


Keresés munkalap neve alapján a VBA segítségével

Ez a módszer egy VBA makrót vezet be az aktív munkafüzet munkalapjának megkeresésére.

1. megnyomni a más + F11 gombokat egyidejűleg a Microsoft Visual Basic for Applications ablak megnyitásához.

2. Kattints betétlap > Modulok, majd illessze be a következő VBA kódot az új nyitó Modul ablakba.

VBA: Keresés munkalap neve alapján

Sub SearchSheetName()
Dim xName As String
Dim xFound As Boolean
xName = InputBox("Enter sheet name to find in workbook:", "Sheet search")
If xName = "" Then Exit Sub
On Error Resume Next
ActiveWorkbook.Sheets(xName).Select
xFound = (Err = 0)
On Error GoTo 0
If xFound Then
MsgBox "Sheet '" & xName & "' has been found and selected!"
Else
MsgBox "The sheet '" & xName & "' could not be found in this workbook!"
End If
End Sub

3. megnyomni a F5 vagy kattintson a gombra futás gombra a VBA futtatásához.

4. Megjelenik a Lap keresése párbeszédpanel, írja be a keresendő munkalap nevét, majd kattintson a gombra OK gomb. Lásd a képernyőképet:

Egy újabb párbeszédpanel jelenik meg, amely megmondja, hogy a munkalap megtalálható-e vagy sem. Csak csukja be.

Jegyzet: Ehhez a VBA-hoz pontosan egyezik a munkalap neve. Csak Ön adja meg a pontosan teljes munkalap nevét, ezt a munkalapot megtudhatja ezzel a VBA-val.


Keresés a munkalap neve alapján a Kutools munkalapnevek listájának létrehozása Excel-hez funkcióval

A fenti VBA-val nem könnyű megtalálni a munkalapot, ha nem emlékszik pontosan, és nem adja meg a munkalap nevét. Ez a módszer bemutatja a Kutools for Excel alkalmazást Létrehozza a munkalapok listáját segédprogram a munkalapon történő egyszerű keresésre és váltásra.

Kutools az Excel számára - Tele van több mint 300 alapvető Excel-eszközzel. Élvezze a teljes funkcionalitású 30 napos INGYENES próbaverziót hitelkártya nélkül! Letöltés most!

1. Kattints Kutools Plus > Munkalap > Létrehozza a munkalapok listáját a Lapnévlista létrehozása párbeszédpanel megnyitásához. Képernyőképek megtekintése:
doki keresés 01. lap alapján

2. A nyitólap Létrehozása a névnevek párbeszédpanelen adja meg a beállításokat: (1) ellenőrizd a A hiperhivatkozások listáját tartalmazza választási lehetőség; (2) írja be az új létrehozott indexlap nevét; (3) adja meg az új indexlap helyét; és (4) az összes munkalap nevét az Index lap egy oszlopában sorolja fel.

3. Kattintson az Ok gomb. Most létrejön egy új indexlap, amely az összes munkalap elé kerül.

4. Menjen az indexlapra, és nyomja meg a gombot Ctrl + F gombokkal egyszerre nyissa meg a Keresés és csere párbeszédpanelt, írja be a kulcsszót a Mit keres mezőbe, és kattintson a Találd meg mindet gomb. Lásd a képernyőképet:

Most a kulcsszavakat tartalmazó összes munkalap neve megtalálható és felsorolásra kerül a Keresés és csere párbeszédpanel alján. Lásd a fenti párbeszédpanelt.

5. Kattintson a megtalált munkalap nevére a Keresés és csere párbeszédpanelen a megfelelő cella kiválasztásához, majd kattintson az indexlap kijelölt cellájára, és egyszerre ugrik a megfelelő munkalapra.

Bemutató: keresés munkalap neve alapján az Excel programban


Kutools az Excel számára: Több mint 300 praktikus eszköz a keze ügyében! Kezdje el a 30 napos ingyenes próbaidőszakot funkciók korlátozása nélkül. Töltse le most!

Keressen a munkalap neve alapján a Kutools for Excel navigációs ablakával

Ha telepítve van a Kutools for Excel programban, könnyedén kereshet a munkalapokon lapnév alapján a navigációs ablakban. Kérjük, tegye a következőket:

Kutools az Excel számára - Töltse fel az Excelt több mint 300 alapvető eszközzel. Élvezze a teljes funkcionalitású 30 napos INGYENES próbaverziót hitelkártya nélkül! Szerezd meg most

1. Alapértelmezés szerint megnyílik a Navigációs panel. Ha zárva van, kattintson a gombra Kutools > navigációs ablak a navigációs panel megjelenítéséhez, majd kattintson a gombra  (Munkafüzet és lap) a navigációs panel bal szélén.

2. Menjen előre, hogy ellenőrizze a Szűrő jelölőnégyzet a Navigációs ablaktáblán, és írja be a megadott kulcsszavakat a következő mezőbe. Most minden munkalapot, amelynek neve tartalmazza a megadott kulcsszavakat, megtalálja és felsorolja az alábbi mezőbe. Lásd a képernyőképet:

Megjegyzések: Ha rákattint a keresési eredményekre, akkor egyszerre megnyílik a megfelelő munkalap.

Demo: Keresés munkalap neve alapján a Kutools for Excel navigációs ablakában


Kutools az Excel számára: Több mint 300 praktikus eszköz a keze ügyében! Kezdje el a 30 napos ingyenes próbaidőszakot funkciók korlátozása nélkül. Töltse le most!

Kapcsolódó cikkek:

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

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...

kte lap 201905


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!
Comments (7)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Thank you, it really helpful.
This comment was minimized by the moderator on the site
Note :- Formula Work only if you Sheet Name in Numeric="='E:\Contacts\"&"["&SUM(MID(CELL("filename",A1),FIND("]",CELL("filename",A1))+1,256))-1&".csv"&"]"&SUM(MID(CELL("filename",A1),FIND("]",CELL("filename",A1))+1,256))-1&"'!$B$1048576"Use this Formula To Get Value from other Excel Sheet________________
Define Path = "='E:\Contacts\"&"["Give Sheet Name [if Sheet Name in Numericl] = SUM(MID(CELL("filename",A1),FIND("]",CELL("filename",A1))+1,256))-1&".csv"&"]"&SUM(MID(CELL("filename",A1),FIND("]",CELL("filename",A1))+1,256))-1Cell No. = !$B$1048576
This comment was minimized by the moderator on the site
Note :- Formula Work only if you Sheet Name in Numeric="='E:\Contacts\"&"["&SUM(MID(CELL("filename",A1),FIND("]",CELL("filename",A1))+1,256))-1&".csv"&"]"&SUM(MID(CELL("filename",A1),FIND("]",CELL("filename",A1))+1,256))-1&"'!$B$1048576"Use this Formula To Get Value from other Excel Sheet________________
Define Path = "='E:\Contacts\"&"["Give Sheet Name [if Sheet Name in Numericl] = SUM(MID(CELL("filename",A1),FIND("]",CELL("filename",A1))+1,256))-1&".csv"&"]"&SUM(MID(CELL("filename",A1),FIND("]",CELL("filename",A1))+1,256))-1Cell No. = !$B$1048576
This comment was minimized by the moderator on the site
Muchas gracias por el consejo, me ayudo mucho!!
This comment was minimized by the moderator on the site
Dear sir, mujhe excel 2013 me worksheet search karne ki vba coding bata dijiye or search command bata dijiye
This comment was minimized by the moderator on the site
Please tell me about cell name search in all worksheet of excel 2007 shortcut or longterm
This comment was minimized by the moderator on the site
Thank you very much. The VBA code was very helpful for me :-) Thanks again!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations