Excel-VBA-Listenfeld
Ein Listenfeld ist eine Liste von wo ein Benutzer ein Element auswählen kann. Um ein Listenfeld in Excel VBA zu erstellen, führen Sie die folgenden Schritte.
-
Wählen Sie auf der Registerkarte Entwickler auf Einfügen.
-
In der Gruppe ActiveX-Steuerelemente, klicken Sie auf Listenfeld.
Ziehen Sie ein Listenfeld 3. Wählen Sie auf Ihrem Arbeitsblatt.
Hinweis: Sie können den Namen einer Kontrolle durch einen Rechtsklick auf die Steuerung ändern kann (stellen Sie sicher, Design-Modus gewählt ist) und dann auf Eigenschaften klicken. Vorerst werden wir ListBox1 wie der Name des Listenfeld verlassen.
Erstellen Sie eine Arbeitsmappe öffnen Ereignis. Code zum Öffnen des Arbeitsmappe Ereignis hinzugefügt wird von Excel VBA ausgeführt werden, wenn Sie die Arbeitsmappe öffnen.
-
Öffnen Sie den Visual Basic-Editor.
-
Klicken Sie doppelt auf dieser Arbeitsmappe im Projekt-Explorer.
-
Arbeitsmappe Wählen Sie aus der linken Dropdown-Liste und Öffnen von rechts Dropdown-Liste wählen.
-
Um Elemente in dem Listenfeld, fügen Sie die folgenden Codezeilen in die Arbeitsmappe öffnen Ereignis hinzufügen:
With Sheet1.ListBox1 .AddItem "Paris" .AddItem "New York" .AddItem "London" End With
Hinweis: Verwenden Sie Sheet2 wenn Ihr Listenfeld auf dem zweiten Arbeitsblatt befindet, Sheet3 wenn Ihr Listenfeld auf dem dritten Arbeitsblatt befindet, usw. Wenn Sie diese Codezeilen außerhalb der Arbeitsmappe Open-Ereignis verwenden, möchten Sie vielleicht die folgende Codezeile hinzufügen vor diesen Codezeilen. Diese Codezeile löscht das Listenfeld. Auf diese Weise Ihre Artikel werden nicht mehrfach hinzugefügt werden, wenn Sie Ihren Code mehr als einmal ausführen.
ListBox1.Clear
-
Dieses Listenfeld eine Zelle zu verknüpfen, die rechte Maustaste auf dem Listenfeld (stellen Sie sicher, Design-Modus ausgewählt ist) und klicken Sie auf Eigenschaften. Füllen Sie D3 für LinkedCell.
Hinweis: auch die ListFillRange Eigenschaft sehen Sie ein Listenfeld mit einer Reihe von Zellen zu füllen.
-
Speichern, schließen und die Excel-Datei öffnen.
Ergebnis:
Obwohl in einigen Situationen kann es sinnvoll sein, direkt auf dem Arbeitsblatt ein Listenfeld zu platzieren, ist ein Listenfeld besonders nützlich, wenn auf einer Userform platziert.