Ugrás a tartalomra

Hogyan válasszuk ki az adott munkalapot az Excel másik lapjának cellaértéke alapján?

Ha feltételezzük, hogy rendelkezik egy adatellenőrzési legördülő listával, amely tartalmazza az összes munkalap nevét, és a legördülő listában kiválasztott lap neve alapján automatikusan ki akarja választani vagy a megfelelő munkalapra szeretne ugrani, akkor mit tehet? És mit szólna ahhoz, ha automatikusan egy munkalapra ugrana, miután beírta a lap nevét egy megadott cellába? Ez a cikk számos módszert mutat be az elérésére.

Válasszon ki egy konkrét munkalapot a VBA kóddal rendelkező legördülő lista kiválasztása alapján
Válasszon ki egy konkrét munkalapot a VBA kóddal ellátott cellaérték alapján
A Kutools for Excel segítségével könnyedén hozhat létre indexeket, és válthat bizonyos munkalapokra


Válasszon ki egy konkrét munkalapot a VBA kóddal rendelkező legördülő lista kiválasztása alapján

Például egy legördülő lista a 2. lap A8 cellájában található. Az alábbi VBA-kód futtatásával választhatja ki vagy ugorhat a megfelelő munkalapra, amikor a lap neve kiválasztásra kerül a legördülő listában.

1. nyomja meg más + F11 megnyitni Microsoft Visual Basic for Applications ablak.

2. Ban,-ben Microsoft Visual Basic for Applications ablakban kattintson duplán a lap nevére (a munkalapra, amely tartalmazza a legördülő listát, amelyből kiválaszthatja a lap nevét) a bal sávban, majd másolja és illessze be az alábbi VBA kódot a Kód ablakba.

VBA-kód: Válasszon konkrét munkalapot a legördülő lista kiválasztása alapján

Private Sub Worksheet_Change(ByVal Target As Range)
    On Error Resume Next
    If Not (Application.Intersect(Range("A2"), Target) Is Nothing) Then _
        ThisWorkbook.Sheets(Target.Value).Activate
End Sub

Megjegyzések: Az „A2” -et megváltoztathatja saját cellájára.

3. nyomja meg más + Q gombok egyszerre a Microsoft Visual Basic for Applications ablak.

Mostantól kezdve, amikor egy lap nevét választja a Sheet8 legördülő listájáról, az a munkalap automatikusan kiválasztásra kerül.


Válasszon ki egy konkrét munkalapot a VBA kóddal ellátott cellaérték alapján

Ha egy munkalapra szeretne ugrani, miután beírta a lap nevét egy cellába (az A1. Cella az 1. lapon), akkor kipróbálhatja a következő VBA kódot.

1. nyomja meg más + F11 megnyitni Microsoft Visual Basic for Applications ablak.

2. Ban,-ben Microsoft Visual Basic for Applications ablakban kattintson duplán a lap nevére (a munkalapra, amelyet beír a lap nevébe) a bal oldali sávban, majd másolja és illessze be az alábbi VBA kódot a Kód ablakba. Lásd a képernyőképet:

VBA kód: válassza ki a konkrét munkalapot a cella értéke alapján

Sub ActivateSheetsByValue()
    On Error Resume Next
    ThisWorkbook.Sheets(Worksheets("Sheet1").Range("A1").Value).Activate
End Sub

3. Térjen vissza a munkalapra, és írja be a kiválasztani kívánt lap nevét az A1 cellába, aktiválja a kódablakot, majd nyomja meg az F5 billentyűt a kód futtatásához.

Ha az 1. lap A1 cellája a „Sheet8” munkalap nevét tartalmazza, a VBA kód futtatása után azonnal a 8. lapra ugrik.


A Kutools for Excel segítségével könnyedén hozhat létre indexeket, és válthat bizonyos munkalapokra

Ha csak gyorsan szeretne kiválasztani egy adott munkalapot, vagy rá akar ugrani, akkor kipróbálhatja a Létrehozza a munkalapok listáját hasznossága Kutools az Excel számára. Ezzel a segédprogrammal könnyedén létrehozhat egy lapindexet, majd a lap nevére kattintva gyorsan egy bizonyos munkalapra ugorhat.

Alkalmazás előtt Kutools az Excel számáraKérjük, először töltse le és telepítse.

1. kettyenés Kutools Plus > Munkalap > Létrehozza a munkalapok listáját. Lásd a képernyőképet:

2. Ban,-ben Létrehozza a munkalapok listáját párbeszédpanelen válassza ki A hiperhivatkozások listáját tartalmazza lehetőség a Lap index stílusok szakasz; írja be a lapindex nevét a Adja meg a lap nevét a Sheet Index számára doboz; Választ Az összes lap előtt az Ide helyezze a lap indexet legördülő listában. Ezután kattintson a gombra OK gombot.

Megjegyzések: ellenőrizd a Gombokat és makrókat tartalmaz opciót kap egy lapindexet makrókkal gombra. Lásd a képernyőképet:

Az Index munkalapon rákattinthat egy adott munkalap nevére, hogy automatikusan a munkalapra ugorjon.

  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.


A Kutools for Excel segítségével könnyedén hozhat létre indexeket, és válthat bizonyos munkalapokra

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 (4)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi. I have generated a table that lists the name of every sheet in my workbook. I have a macro whereby I select the cell with a particular sheet name, hit the form control button and that sheet is made visible and active. I want to expand on this. For example I have 3 sheets named 107A, 107B, 107C When I select 107 in my index table, I want the macro to open every sheet that begins with 107 I have a macro that will find and unhide sheets with a name Like *107* but I have not succeeded in modifying that to look for the sheet name listed in the active cell. Can you help?
This comment was minimized by the moderator on the site
Hi,
Sorry can't help you with that. Thank you for your comment.
This comment was minimized by the moderator on the site
I would like to know how to make a command button when i have hidden tabs. I have a drop down list of names and each name has a dedicated form i would like to choose the name on the list and the sheet for that person is displayed
This comment was minimized by the moderator on the site
Please upload a video regarding this as it will be much easier to understand.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations