/ / Excel-VBA-Kombinationsfeld

Excel-VBA-Kombinationsfeld

Ein Kombinationsfeld ist eine Dropdown-Liste, aus der ein Benutzer ein Element auswählen oder seine eigene Auswahl eingeben kann. So erstellen Sie ein Kombinationsfeld im Excel VBAFühren Sie die folgenden Schritte aus.

1. Klicken Sie auf der Registerkarte Entwickler auf Einfügen.

2. Klicken Sie in der Gruppe ActiveX-Steuerelemente auf Kombinationsfeld.

Erstellen Sie ein Kombinationsfeld in Excel VBA

3. Ziehen Sie ein Kombinationsfeld auf Ihr Arbeitsblatt.

Ziehen Sie ein Kombinationsfeld

Hinweis: Sie können den Namen eines Steuerelements ändern, indem Sie mit der rechten Maustaste auf das Steuerelement klicken (stellen Sie sicher, dass der Entwurfsmodus ausgewählt ist) und dann auf Eigenschaften klicken. Für jetzt lassen wir ComboBox1 als den Namen des Kombinationsfelds.

Erstellen Sie ein Arbeitsmappen-Open-Event. Code, der dem Open Event der Arbeitsmappe hinzugefügt wurde, wird beim Öffnen der Arbeitsmappe von Excel VBA ausgeführt.

4. Öffnen Sie den Visual Basic-Editor.

5. Doppelklicken Sie im Projekt-Explorer auf Diese Arbeitsmappe.

6. Wählen Sie Arbeitsmappe aus der linken Dropdown-Liste und wählen Sie Öffnen aus der rechten Dropdown-Liste.

Arbeitsmappe Öffnen Sie Ereignis in Excel VBA

7. Fügen Sie dem Arbeitsmappe-Open-Ereignis die folgenden Codezeilen hinzu, um dem Kombinationsfeld Elemente hinzuzufügen:

With Sheet1.ComboBox1
    .AddItem "Paris"
    .AddItem "New York"
    .AddItem "London"
End With

Hinweis: verwenden Sheet2 wenn Ihr Kombinationsfeld auf dem zweiten Arbeitsblatt befindet, Sheet3 wenn Ihr Kombinationsfeld auf dem dritten Arbeitsblatt befindet, usw. Wenn Sie diese Codezeilen außerhalb der Arbeitsmappe Open-Ereignis verwenden, sollten Sie die Codezeilen unten, bevor diese hinzufügen Codezeilen. Die erste Codezeile löscht das Kombinationsfeld. Auf diese Weise werden Ihre Artikel nicht mehrfach hinzugefügt, wenn Sie Ihren Code mehr als einmal ausführen. Die zweite Codezeile löscht Ihre eigene Wahl.

ComboBox1.Clear
ComboBox1.Value = ""

8. Um dieses Kombinationsfeld mit einer Zelle zu verknüpfen, klicken Sie mit der rechten Maustaste auf das Kombinationsfeld (stellen Sie sicher, dass der Entwurfsmodus ausgewählt ist) und klicken Sie auf Eigenschaften. Füllen Sie D2 für LinkedCell aus.

LinkedCell

Hinweis: Beachten Sie auch die ListFillRange-Eigenschaft, um ein Kombinationsfeld mit einem Zellbereich zu füllen.

9. Speichern, schließen und öffnen Sie die Excel-Datei erneut.

Ergebnis:

Kombinationsfeld

Obwohl es in einigen Situationen nützlich sein kann, ein Kombinationsfeld direkt in Ihrem Arbeitsblatt zu platzieren, ist ein Kombinationsfeld besonders nützlich, wenn es in einem Benutzerformular platziert wird.

Lesen Sie auch: