Wie fülle ich eine Userform ComboBox mit allen Blattnamen in Excel?
In diesem Artikel wird das Auffüllen aller Blattnamen der aktuellen Arbeitsmappe in ein Kombinationsfeld für Benutzerformulare in Excel beschrieben.
Füllen Sie eine Benutzerformular-ComboBox mit allen Blattnamen mit VBA-Code
Füllen Sie eine Benutzerformular-ComboBox mit allen Blattnamen mit VBA-Code
Mit dem folgenden VBA-Code können Sie alle Blattnamen der aktuellen Arbeitsmappe in ein Kombinationsfeld für Benutzerformulare einfügen. Bitte gehen Sie wie folgt vor.
1. Drücken Sie die Taste Andere + F11 Tasten gleichzeitig zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.
2. In dem Microsoft Visual Basic für Applikationen Im Fenster fügen Sie bitte ein Benutzerformular ein, indem Sie auf klicken Insert > Benutzerformular wie unten Screenshot gezeigt.
3. Zeichnen Sie dann ein Kombinationsfeld-Steuerelement und fügen Sie es in das Benutzerformular ein. Siehe Screenshot:
4. Klicken Sie mit der rechten Maustaste auf das eingefügte Kombinationsfeld und wählen Sie Code anzeigen aus dem Kontextmenü. Siehe Screenshot:
5. In der Öffnung Microsoft Visual Basic für Applikationen Bitte kopieren Sie den folgenden VBA-Code und fügen Sie ihn ein, um den ursprünglichen Code im Codefenster zu ersetzen.
VBA-Code: Füllen Sie eine Userform ComboBox mit allen Blattnamen der aktuellen Arbeitsmappe
Private Sub UserForm_Initialize()
Dim I As Long
Me.ComboBox1.Clear
For I = 1 To Sheets.Count
Me.ComboBox1.AddItem Sheets(I).Name
Next
Me.ComboBox1.Value = ActiveSheet.Name
End Sub
Note: Im Code ist ComboBox1 der Name der eingefügten Combo Box. Bitte ändern Sie es in Ihr eigenes.
6. Drücken Sie die Taste F5 Taste zum Ausführen des Codes. Im sich öffnenden Benutzerformular können Sie sehen, dass alle Blattnamen der aktuellen Arbeitsmappe im Kombinationsfeld angezeigt werden, wie im folgenden Screenshot dargestellt:
Listen Sie ganz einfach alle Blattnamen in Excel auf
Das Liste der Blattnamen erstellen Nutzen von Kutools for Excel kann dabei helfen, alle Arbeitsblattnamen der aktiven Arbeitsmappe in einem neuen Arbeitsblatt in Excel einfach aufzulisten. Und Sie können direkt zum entsprechenden Arbeitsblatt wechseln, indem Sie auf den Blattnamen klicken, wie im folgenden Screenshot gezeigt.
Jetzt herunterladen und ausprobieren! (30 Tage kostenloser Trail)
Weitere Artikel:
- Wie kopiere ich den Kombinationsfeldwert in eine aktive Zelle in Excel?
- Wie zeige ich das Datumsformat in der Kombinationsfeldausgabe in Excel an?
- Wie öffne ich ein bestimmtes Arbeitsblatt anhand des ausgewählten Werts eines Kombinationsfelds in Excel?
- Wie kann ich die Eingabe in ein Kombinationsfeld in Excel verhindern oder deaktivieren?
- Wie kann ich das Kombinationsfeld verlassen, um eine bestimmte Zelle in Excel auszuwählen?
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 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 Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich
- Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
- Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!