KutoolsforOffice — Eén oplossing, vijf krachtige tools.Meer bereiken met minder moeite.

Hoe opent u een werkblad door de naam ervan te selecteren in een keuzelijst in Excel?

AuteurSiluvia Wijzigingsdatum

Stel dat u een keuzelijst in uw Excel-werkboek hebt met alle bladnamen. U wilt een specifiek werkblad openen door de bijbehorende naam in die lijst te selecteren. Deze handleiding laat u zien hoe u dat doet met VBA-code — inclusief de stappen om de keuzelijst automatisch te vullen met bladnamen én de gewenste functionaliteit in te schakelen.

Een schermafbeelding van een keuzelijst in Excel met bladnamen

Open een werkblad door de naam ervan te selecteren in een keuzelijst met VBA-code

Open een werkblad door de naam ervan te selecteren in een keuzelijst met VBA-code

De onderstaande VBA-code brengt u direct naar het gewenste werkblad op basis van uw keuze in de keuzelijst in Excel. Volg hiervoor deze eenvoudige stappen.

Opmerking: Als de keuzelijst geen enkele bladnaam uit uw werkblad bevat, volg dan de onderstaande tip om snel alle bladnamen aan die keuzelijst toe te voegen. Als er al een keuzelijst bestaat met alle bladnamen, gaat u direct verder met stap 1.

Tip: Voeg een opdrachtknop 1 in uw werkblad in, klik er met de rechtermuisknop op en selecteer Code weergeven in het contextmenu. Kopieer en plak vervolgens de onderstaande VBA-code in het Code-venster en druk op de toetsencombinatie Alt + Q om het venster Microsoft Visual Basic for Applications te sluiten. Klik op de ingevoegde opdrachtknop — alle bladnamen van het huidige werkboek worden dan automatisch toegevoegd aan ComboBox1.

VBA-code: Voeg eenvoudig alle bladnamen toe aan een keuzelijst

Private Sub CommandButton1_Click()
    Me.ComboBox1.Clear
    Dim strWs As String
    Dim i As Integer
    
    For i = 1 To ThisWorkbook.Sheets.Count
        Me.ComboBox1.AddItem Sheets(i).Name
    Next
End Sub

Als er al een keuzelijst bestaat met alle bladnamen, volg dan de onderstaande stappen.

1. Schakel de Ontwerpmodus in onder het tabblad Ontwikkelaar.

2. Klik met de rechtermuisknop op de keuzelijst met bladnamen en selecteer vervolgens Code weergeven in het contextmenu.

Een schermafbeelding van het contextmenu om toegang te krijgen tot de keuzelijstcode in Excel

3. Vervolgens verschijnt het venster Microsoft Visual Basic for Applications; vervang de oorspronkelijke VBA-code in het codevenster door de onderstaande VBA-code.

VBA-code: Open een specifiek werkblad op basis van de geselecteerde waarde in de keuzelijst

Private Sub ComboBox1_Change()
    Dim actWsh As String
    actWsh = ComboBox1.Text
    Worksheets(actWsh).Select
End Sub

Opmerking: In de code is ComboBox1 de naam van de keuzelijst met de bladnamen.

4. Druk op de toetsencombinatie Alt+Q om het venster Microsoft Visual Basic for Applications te sluiten en schakel de Ontwerpmodus uit onder het tabblad Ontwikkelaar.

Bij het selecteren van een willekeurige werkbladnaam in de keuzelijst wordt het bijbehorende werkblad automatisch geopend.

Lijst eenvoudig alle bladnamen van Huidig werkboek in Excel op:

Een bladindex in uw werkmap maakt het beheren van uw werkbladen kinderlijk eenvoudig. Met het hulpprogramma Maak koppeltabel van Kutools voor Excel stelt u in een handomdraai een bladindex samen met alle bladnamen uit het huidige werkboek. Daarna navigeert u razendsnel naar elk gewenst werkblad — gewoon door op de betreffende bladnaam in het indexwerkblad te klikken. Zie de onderstaande schermafbeelding:

Een schermafbeelding die een bladindex toont gemaakt met Kutools for Excel

Kutools voor Excel– Geef Excel een boost met meer dan 300 essentiële hulpmiddelen, waardoor uw werk sneller en eenvoudiger verloopt, en profiteer van AI-functies voor slimmere gegevensverwerking en productiviteit.Nu verkrijgen

Gerelateerde artikelen:

Beste Office-productiviteitshulpmiddelen

🤖KUTOOLS AI Assistant: Revolutioneer Data-analyse op basis van:Intelligente uitvoering   |  Genereer code|  Maak aangepaste formules  |  Analyseer gegevens en genereer grafieken|  Roep Verbeterde functies aan…
Populaire functies:Zoeken, markeren of Dubbele waarden markeren   |  Verwijder lege rijen   |  Kolommen samenvoegen of cellen zonder gegevensverlies   |   Afronden zonder formule...
Super ZOEKEN:VLookup met meerdere criteria  |  VLookup met meerdere waarden  |   VLookup over meerdere werkbladen   |   Fuzzy Match....
Geavanceerde keuzelijst:Snel een keuzelijst maken   |  Afhankelijke keuzelijst   |  Keuzelijst met meervoudige selectie....
Kolombeheerder:Voeg een specifiek aantal kolommen toe|Verplaats kolommen|Wissel zichtbaarheidsstatus van verborgen kolommen|Vergelijk bereiken en kolommen...
Uitgelichte functies:Rasterfocus   |  Ontwerpweergave   |Verbeterde formulebalk   | Werkmap- en bladbeheerder   |  Bronnenbibliotheek(Automatische tekst)|  Datumkiezer   |  Werkbladen samenvoegen  |  Versleutelen/Cellen decoderen   | E-mails verzenden op basis van lijst   |  Superfilter   |   Speciaal filter(Filter cellen met vetgedrukt lettertype/cursief/doorgestreept...) ...
Top 15 gereedschapssets:12 Teksthulpmiddelen(Tekst toevoegen,Specifieke tekens verwijderen, ...)|   50+Grafiektypen(Gantt-diagram, ...)|   40+ Praktische formules(Leeftijd berekenen op basis van geboortedatum, ...)|   19 Invoeghulpmiddelen(QR-code Invoegen,Afbeelding invoegen vanaf pad, ...)|   12 Conversiehulpmiddelen(Omzetten naar woorden,Wisselkoersconversie, ...)|   7 Samenvoegen en splitsenhulpmiddelen(Geavanceerd samenvoegen van rijen,Cellen splitsen, ...)|... en meer
Gebruik Kutools in uw voorkeurstaal – ondersteunt Engels, Spaans, Duits, Frans, Chinees en 40+ andere talen!

Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...

Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger

  • Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
  • Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!

Alle Kutools-add-ins in één installatieprogramma.

Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.

ExcelWordOutlookTabsPowerPoint
  • Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
  • Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
  • Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
  • 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
  • Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins