Skip to main content

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

Author: Siluvia Last Modified: 2025-05-29

Stel dat je een Keuzelijst hebt in je Excel-werkboek met daarin een lijst van alle werkbladnamen. Je wilt een specifiek werkblad openen door de naam ervan te selecteren in de Keuzelijst. Deze handleiding laat zien hoe je dit kunt doen met behulp van VBA-code, met stappen om de Keuzelijst te vullen met werkbladnamen en de gewenste functionaliteit in te schakelen.

A screenshot of a Combo Box in Excel containing sheet names

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 kan je helpen naar een specifiek werkblad te gaan op basis van de selectie in de Keuzelijst in Excel. Volg de volgende stappen.

Opmerking: Als de Keuzelijst geen enkele werkbladnaam bevat in je werkblad, volg dan de onderstaande tip om snel alle werkbladnamen toe te voegen aan die Keuzelijst. Als er al een Keuzelijst bestaat met alle werkbladnamen, ga dan direct naar stap 1.

Tip: Voeg een Opdrachtknop 1 in je werkblad in, klik er met de rechtermuisknop op en selecteer Weergave Code uit het rechtermuisknopmenu. Kopieer en plak vervolgens de onderstaande VBA-code in het Codevenster, en druk op de Alt + Q toetsen om het Microsoft Visual Basic for Application-venster te sluiten. Klik op de ingevoegde Opdrachtknop, dan worden alle werkbladnamen van het huidige werkboek automatisch toegevoegd aan ComboBox1.

VBA-code: Voeg eenvoudig alle werkbladnamen 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 werkbladnamen, doe dan het volgende.

1. Schakel de Ontwerpmodus in onder het tabblad Ontwikkelaar.

2. Klik met de rechtermuisknop op de keuzelijst met werkbladnamen, en klik vervolgens op Weergave Code in het rechtermuisknopmenu.

A screenshot of the right-click menu to access Combo Box code in Excel

3. Het Microsoft Visual Basic for Applications-venster verschijnt. Vervang de oorspronkelijke VBA-code in het Codevenster door de onderstaande VBA-code.

VBA-code: Open een specifiek werkblad via de geselecteerde waarde van 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 die de werkbladnamen bevat.

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

Nu zal het selecteren van elke werkbladnaam in de Keuzelijst automatisch het bijbehorende werkblad openen.


Alle werkbladnamen van het huidige werkboek gemakkelijk weergeven in Excel:

Het gebruik van een bladindex in je werkboek helpt je om je werkbladen gemakkelijk te beheren. Met het hulpprogramma Maak koppeltabel van Kutools voor Excel kun je eenvoudig een bladindex maken met alle werkbladnamen in het huidige werkboek. Daarna kun je snel naar een bepaald werkblad gaan door gewoon op de werkbladnaam in het Indexwerkblad te klikken. Zie onderstaande schermafbeelding:

A screenshot showing a sheet index created with Kutools for Excel

Kutools voor Excel - Boost Excel met meer dan 300 essentiële tools. Geniet van permanent gratis AI-functies! Nu verkrijgen


Gerelateerde artikelen:

Beste Office-productiviteitstools

🤖 Kutools AI Assistent: Breng een revolutie teweeg in data-analyse Methode: Intelligente uitvoering |Code genereren |Aangepaste formules maken |Gegevens analyseren en grafieken genereren |Kutools-functies gebruiken
Populaire functies: Dubbele waarden markeren, markeren of identificeren | Verwijder lege rijen | Kolommen of cellen samenvoegen zonder gegevensverlies | Afronden ...
Super ZOEKEN: VLookup met meerdere criteria | VLookup met meerdere waarden | Meervoudig-blad opzoeken | Fuzzy Match ...
Geavanceerde keuzelijst: Snel keuzelijst maken | Afhankelijke keuzelijst | Meervoudige selectie keuzelijst ...
Kolombeheer: Specifiek aantal kolommen toevoegen | Kolommen verplaatsen | Zichtbaarheid van verborgen kolommen wisselen | Bereik & kolommen vergelijken ...
Uitgelichte functies: Rasterfocus | Ontwerpweergave | Verbeterde formulebalk | Werkboek- & Werkbladbeheer | AutoTekstbibliotheek | Datumkiezer | Gegevens samenvoegen | Cellen coderen/decoderen | E-mail verzenden per lijst | Superfilter | Speciaal filter (filter cellen met vetgedrukt/cursief/doorhalen...) ...
Top15 toolsets:12 Teksttools (Tekst toevoegen, Specifieke tekens verwijderen, ...) |50+ Grafiek type (Gantt-diagram, ...) |40+ Praktische formules (Leeftijd berekenen op basis van geboortedatum, ...) |19 Invoegtools (QR-code invoegen, Afbeelding invoegen vanaf pad, ...) | 12 Conversietools (Omzetten naar woorden, Valutaconversie, ...) | 7 Samenvoeg- & Opsplitstools (Geavanceerd samenvoegen van rijen, Cellen splitsen, ...) | ... en meer

Versterk je Excel-vaardigheden met Kutools voor Excel en ervaar ongeëvenaarde efficiëntie. Kutools voor Excel biedt meer dan300 geavanceerde functies om je productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die je het meest nodig hebt...


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

  • Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in
  • Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster, in plaats van in nieuwe vensters.
  • Verhoog je productiviteit met50% en bespaar dagelijks honderden muisklikken!