Wie kann man ein Kombinationsfeld beim Öffnen der Arbeitsmappe mit bestimmten Daten füllen?

Normalerweise können Sie ein Kombinationsfeld (ActiveX-Steuerelement) mit einem bestimmten Zellendatenbereich füllen, indem Sie die Zellbezüge in das Feld ListFillRange der Eigenschaften des Kombinationsfelds eingeben. Wenn Sie ein Kombinationsfeld direkt mit bestimmten Daten füllen möchten, ohne dessen Eigenschaften manuell anzupassen, kann Ihnen die in diesem Artikel beschriebene Methode helfen.

Kombinationsfeld mit bestimmten Daten über VBA-Code füllen

Kombinationsfeld mit bestimmten Daten über VBA-Code füllen

Diese Methode kann Ihnen helfen, ein Kombinationsfeld direkt beim Öffnen der Arbeitsmappe mit bestimmten Daten zu füllen. Gehen Sie 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 ThisWorkbook, um den ThisWorkbook-Code-Editor zu öffnen. Kopieren Sie dann den folgenden VBA-Code hinein. Siehe Screenshot:

VBA-Code: Kombinationsfeld beim Öffnen der Arbeitsmappe mit bestimmten 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-Makrofähige Arbeitsmappe und schließen Sie sie.

4. Öffnen Sie die Arbeitsmappe erneut, und Sie werden sehen, dass das Kombinationsfeld mit den angegebenen Daten gefüllt wurde, wie im folgenden Screenshot gezeigt:

Verwandte Artikel:

• Wie kopiert man den Wert eines Kombinationsfelds in die aktive Zelle in Excel?
• Wie zeigt man das Datumsformat in der Ausgabe eines Kombinationsfelds in Excel an?
• Wie verhindert oder deaktiviert man das Eintippen in ein Kombinationsfeld in Excel?
• Wie füllt man ein Kombinationsfeld mit Daten eines benannten Bereichs in Excel?