Wie füllt man ein Kombinationsfeld beim Öffnen der Arbeitsmappe mit vorgegebenen Daten?
Normalerweise füllen Sie ein Kombinationsfeld (ActiveX-Steuerelement) mit einem bestimmten Zellbereich, indem Sie die entsprechenden Zellbezüge in das Feld „ListFillRange“ der Eigenschaften des Kombinationsfelds eingeben. Möchten Sie das Kombinationsfeld jedoch direkt mit festgelegten Daten befüllen, ohne seine Eigenschaften manuell anzupassen, hilft Ihnen die in diesem Artikel beschriebene Methode weiter.
Ein Kombinationsfeld mit festgelegten Daten mithilfe von VBA-Code füllen
Ein Kombinationsfeld mit festgelegten Daten mithilfe von VBA-Code füllen
Diese Methode ermöglicht es Ihnen, ein Kombinationsfeld beim Öffnen der Arbeitsmappe direkt mit vorgegebenen Daten zu befüllen. Gehen Sie dazu wie folgt vor:
1. Drücken Sie gleichzeitig die Tasten Alt+F11, um das Fenster Microsoft Visual Basic for Applications zu öffnen.
2. Doppelklicken Sie im Fenster Microsoft Visual Basic for Applications im linken Bereich auf DieseArbeitsmappe, um den Code-Editor für DieseArbeitsmappe zu öffnen. Fügen Sie anschließend den folgenden VBA-Code ein. Siehe Screenshot:
VBA-Code: Ein Kombinationsfeld beim Öffnen der Arbeitsmappe mit festgelegten Daten füllen
Private Sub Workbook_Open()
'Updated by Extendoffice 2018/1/30
With Sheet1.ComboBox1
.Clear
.AddItem "Select a Fruit"
.AddItem "Apple"
.AddItem "Banana"
.AddItem "Peach"
.AddItem "Pineapple"
.AddItem "Watermelon"
.Text = .List(0)
End With
End Sub
Hinweise:
3. Speichern Sie die Arbeitsmappe im Format Excel-Arbeitsmappe mit Makros aktiviert und schließen Sie sie.
4. Öffnen Sie die Arbeitsmappe erneut – und schon sehen Sie, dass das Kombinationsfeld mit den festgelegten Daten gefüllt ist, wie im folgenden Screenshot gezeigt:
Verwandte Artikel:
- Wie kann man den Wert eines Kombinationsfelds in die aktive Zelle in Excel übernehmen?
- Wie lässt sich das Datumsformat in der Ausgabe eines Kombinationsfelds in Excel korrekt anzeigen?
- Wie kann man die Eingabe in ein Kombinationsfeld in Excel verhindern oder deaktivieren?
- Wie füllt man ein Kombinationsfeld in Excel mit Daten aus einem benannten Bereich?
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 zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...
Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
- Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!
Alle Kutools-Add-Ins – ein Installationsprogramm
Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
- Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
- Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
- 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins