Preskoči na glavno vsebino

Kako izbrati določen delovni list na podlagi vrednosti celice na drugem listu v Excelu?

Če imate spustni seznam za preverjanje veljavnosti podatkov, ki vsebuje vsa imena delovnih listov, in želite samodejno izbrati ali preskočiti na ustrezen delovni list na podlagi imena lista, ki ste ga izbrali na spustnem seznamu, kaj lahko storite? In kako je s samodejnim skokom na določen delovni list, potem ko vnesete ime lista v določeno celico? Ta članek vam bo prikazal več načinov, kako to doseči.

Na podlagi izbire spustnega seznama s kodo VBA izberite določen delovni list
Izberite določen delovni list glede na vrednost celice s kodo VBA
Z Kutools za Excel lahko preprosto ustvarite indeks listov in se premaknete na določen delovni list


Na podlagi izbire spustnega seznama s kodo VBA izberite določen delovni list

Na primer, spustni seznam najde v celici A2 lista8. Spodnjo kodo VBA lahko zaženete, da izberete ali skočite na ustrezen delovni list, ko je na spustnem seznamu izbrano ime lista.

1. Pritisnite druga + F11 da odprete Microsoft Visual Basic za aplikacije okno.

2. V Ljubljani Microsoft Visual Basic za aplikacije dvokliknite ime lista (delovni list, ki vsebuje spustni seznam, iz katerega boste izbrali imena listov) v levi vrstici, nato kopirajte in prilepite spodnjo kodo VBA v okno Code.

Koda VBA: Na podlagi izbire spustnega seznama izberite določen delovni list

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

Opombe: "A2" lahko spremenite v svojo celico.

3. Pritisnite druga + Q tipke hkrati, da zaprete tipko Microsoft Visual basic za aplikacije okno.

Ko boste odslej na spustnem seznamu Sheet8 izbrali ime lista, bo ta delovni list izbran samodejno.


Izberite določen delovni list glede na vrednost celice s kodo VBA

Če želite po vnosu imena lista v celico (celica A1 na listu1) preskočiti na določen delovni list, lahko poskusite z naslednjo kodo VBA.

1. Pritisnite druga + F11 da odprete Microsoft Visual Basic za aplikacije okno.

2. V Ljubljani Microsoft Visual Basic za aplikacije dvokliknite ime lista (delovni list, ki ga boste vnesli v ime lista) v levi vrstici, nato kopirajte in prilepite spodnjo kodo VBA v okno Code. Oglejte si posnetek zaslona:

Koda VBA: izberite določen delovni list glede na vrednost celice

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

3. Vrnite se na delovni list in vnesite ime lista, ki ga želite izbrati, v celico A1 in aktivirajte okno s kodo, nato pritisnite tipko F5, da zaženete kodo.

Če celica A1 v Sheet1 vsebuje ime delovnega lista »Sheet8«, bo po zagonu kode VBA takoj preskočila na Sheet8.


Z Kutools za Excel lahko preprosto ustvarite indeks listov in se premaknete na določen delovni list

Če želite samo hitro izbrati ali preskočiti na določen delovni list, lahko poskusite Ustvari seznam imen listov uporabnost Kutools za Excel. S tem pripomočkom lahko enostavno ustvarite indeks lista, nato pa hitro kliknete na določen delovni list s klikom na ime lista.

Pred vložitvijo vloge Kutools za ExcelProsim najprej ga prenesite in namestite.

1. klik Kutools Plus > Delovni list > Ustvari seznam imen listov. Oglejte si posnetek zaslona:

2. V Ljubljani Ustvari seznam imen listov pogovorno okno, izberite Vsebuje seznam hiperpovezav možnost v Slogi indeksa listov odsek; vnesite ime za indeks listov v Navedite ime lista za Sheet Index škatla; Izberite Pred vse liste vstavite kazalo listov na spustnem seznamu. Nato kliknite OK gumb.

Opombe: preverite Vsebuje gumbe in makre možnost, boste dobili indeks listov z gumbom za makre. Oglejte si posnetek zaslona:

V indeksnem delovnem listu lahko kliknete določeno ime delovnega lista, da samodejno skočite na ta delovni list.

  Če želite imeti brezplačno (30-dnevno) preskusno različico tega pripomočka, kliknite, če ga želite prenestiin nato nadaljujte z uporabo postopka v skladu z zgornjimi koraki.


Z Kutools za Excel lahko preprosto ustvarite indeks listov in se premaknete na določen delovni list

Najboljša pisarniška orodja za produktivnost

Priljubljene funkcije: Poiščite, označite ali identificirajte dvojnike   |  Izbriši prazne vrstice   |  Združite stolpce ali celice brez izgube podatkov   |   Krog brez formule ...
Super iskanje: Več kriterijev VLookup    Multiple Value VLookup  |   VLookup na več listih   |   Nejasno iskanje ....
Napredni spustni seznam: Hitro ustvarite spustni seznam   |  Odvisni spustni seznam   |  Večkrat izberite spustni seznam ....
Upravitelj stolpcev: Dodajte določeno število stolpcev  |  Premakni stolpce  |  Preklop stanja vidnosti skritih stolpcev  |  Primerjaj obsege in stolpce ...
Predstavljene funkcije: Mrežni fokus   |  Pogled oblikovanja   |   Velika vrstica formule    Upravitelj delovnih zvezkov in listov   |  Knjižnica virov (Samodejno besedilo)   |  Izbirnik datuma   |  Združite delovne liste   |  Šifriranje/dešifriranje celic    Pošljite e-pošto po seznamu   |  Super filter   |   Poseben filter (filter krepko/ležeče/prečrtano ...) ...
15 najboljših kompletov orodij12 Besedilo Orodja (dodajanje besedila, Odstrani znake,...)   |   50 + Graf Vrste (Gantt Chart,...)   |   40+ Praktično Formule (Izračunajte starost glede na rojstni dan,...)   |   19 vstavljanje Orodja (Vstavite kodo QR, Vstavi sliko s poti,...)   |   12 Pretvorba Orodja (Številke v besede, Pretvorba valut,...)   |   7 Spoji in razdeli Orodja (Napredne kombinirane vrstice, Razdeljene celice,...)   |   ... in več

Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa.  Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...

zavihek kte 201905


Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo

  • Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!
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