Wie öffnet man ein Arbeitsblatt, indem man seinen Namen in einer Kombinationsbox in Excel auswählt?
Angenommen, Sie haben eine Kombinationsbox in Ihrer Excel-Arbeitsmappe, die eine Liste aller Arbeitsblattnamen enthält. Sie möchten ein bestimmtes Arbeitsblatt öffnen, indem Sie dessen Namen aus der Kombinationsbox auswählen. Dieser Leitfaden zeigt, wie Sie dies mit VBA-Code erreichen können, mit Schritten zur Befüllung der Kombinationsbox mit Arbeitsblattnamen und zur Aktivierung der gewünschten Funktionalität.
Öffnen Sie ein Arbeitsblatt, indem Sie seinen Namen in einer Kombinationsbox mit VBA-Code auswählen.
Öffnen Sie ein Arbeitsblatt, indem Sie seinen Namen in einer Kombinationsbox mit VBA-Code auswählen.
Der folgende VBA-Code kann Ihnen helfen, zu einem bestimmten Arbeitsblatt basierend auf der Auswahl in der Kombinationsbox in Excel zu gelangen. Bitte folgen Sie den nachstehenden Anweisungen.
Hinweis: Wenn die Kombinationsbox keine Arbeitsblattnamen in Ihrem Arbeitsblatt enthält, folgen Sie bitte dem folgenden Tipp, um schnell alle Arbeitsblattnamen in diese Kombinationsbox einzufügen. Wenn bereits eine Kombinationsbox mit allen Arbeitsblattnamen vorhanden ist, fahren Sie direkt mit Schritt 1 fort.
Tipp: Fügen Sie eine Befehlsschaltfläche 1 in Ihr Arbeitsblatt ein, klicken Sie mit der rechten Maustaste darauf und wählen Sie Ansicht Code aus dem Kontextmenü. Kopieren Sie dann den folgenden VBA-Code in das Codefenster und drücken Sie die Tasten Alt + Q, um das Microsoft Visual Basic for Applications-Fenster zu schließen. Klicken Sie auf die eingefügte Befehlsschaltfläche, dann werden automatisch alle Arbeitsblattnamen der aktuellen Arbeitsmappe in die ComboBox1 eingefügt.
VBA-Code: Alle Arbeitsblattnamen einfach in eine Kombinationsbox einfügen.
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 SubWenn bereits eine Kombinationsbox mit allen Arbeitsblattnamen vorhanden ist, gehen Sie wie folgt vor.
1. Aktivieren Sie den Entwurfsmodus unter der Registerkarte Entwickler.
2. Klicken Sie mit der rechten Maustaste auf die Kombinationsbox mit den Arbeitsblattnamen und wählen Sie Ansicht Code aus dem Kontextmenü.
3. Das Microsoft Visual Basic for Applications-Fenster wird geöffnet. Ersetzen Sie den ursprünglichen VBA-Code im Codefenster durch den folgenden VBA-Code.
VBA-Code: Öffnen eines bestimmten Arbeitsblatts durch den ausgewählten Wert der Kombinationsbox.
Private Sub ComboBox1_Change()
Dim actWsh As String
actWsh = ComboBox1.Text
Worksheets(actWsh).Select
End SubHinweis: Im Code ist ComboBox1 der Name der Kombinationsbox, die die Arbeitsblattnamen enthält.
4. Drücken Sie die Tasten Alt + Q, um das Microsoft Visual Basic for Applications-Fenster zu schließen, und deaktivieren Sie den Entwurfsmodus unter der Registerkarte Entwickler.
Nun wird beim Auswählen eines beliebigen Arbeitsblattnamens in der Kombinationsbox das entsprechende Arbeitsblatt automatisch geöffnet.
Alle Arbeitsblattnamen der aktuellen Arbeitsmappe in Excel einfach auflisten:
Die Verwendung des Blattindex in Ihrer Arbeitsmappe erleichtert die Verwaltung Ihrer Arbeitsblätter. Mit der Verknüpfungstabelle erstellen Funktion von Kutools für Excel können Sie ganz einfach einen Blattindex erstellen, der alle Arbeitsblattnamen der aktuellen Arbeitsmappe enthält. Danach können Sie schnell zu einem bestimmten Arbeitsblatt wechseln, indem Sie einfach auf den Arbeitsblattnamen im Indexarbeitsblatt klicken. Siehe Screenshot unten:
Kutools für Excel - Verleihen Sie Excel mit über 300 essenziellen Tools einen echten Schub. Nutzen Sie dauerhaft kostenlose KI-Funktionen! Holen Sie es sich jetzt
Ähnliche Artikel:
- Wie kopiert man den Wert einer Kombinationsbox in die aktive Zelle in Excel?
- Wie zeigt man das Datumsformat in der Ausgabe der Kombinationsbox in Excel an?
- Wie blendet man eine Befehlsschaltfläche basierend auf einem bestimmten Zellenwert in Excel aus oder ein?
- Wie verhindert oder deaktiviert man das Tippen in einer Kombinationsbox in Excel?
- Wie navigiert man per Tab aus einer Kombinationsbox zu einer bestimmten Zelle in Excel?
Die besten Produktivitätstools für das Büro
Stärken Sie Ihre Excel-Fähigkeiten mit Kutools für Excel und genießen Sie Effizienz wie nie zuvor. Kutools für Excel bietet mehr als300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen...
Office Tab bringt die Tab-Oberfläche in Office und macht Ihre Arbeit wesentlich einfacher
- Aktivieren Sie die Tabulator-Bearbeitung und das Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Tabs innerhalb desselben Fensters, statt in neuen Einzelfenstern.
- Steigert Ihre Produktivität um50 % und reduziert hunderte Mausklicks täglich!
Alle Kutools-Add-Ins. Ein Installationspaket
Das Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro und ist ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- All-in-One-Paket — Add-Ins für Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Ein Installationspaket, eine Lizenz — in wenigen Minuten einsatzbereit (MSI-kompatibel)
- Besser gemeinsam — optimierte Produktivität in allen Office-Anwendungen
- 30 Tage kostenlos testen — keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis — günstiger als Einzelkauf der Add-Ins