Pole listy w Excel VBA (przykłady) | Jak utworzyć pole listy w programie Excel?

Pole listy w VBA to lista, która jest przypisana do zmiennej, a lista zawiera różne dane wejściowe do wyboru, z pola listy możemy wybrać wiele opcji naraz, pole listy można przekształcić w formularz użytkownika w programie Excel VBA, wybierając listę box i rysując go na formularzu użytkownika dla pola listy, mamy nazwany zakres, który ma określone wartości podane do wyboru w polu listy.

Co to jest pole listy w Excel VBA?

Pole listy to lista, z której użytkownik może wybrać element. Pole listy w Excel VBA może być używane, jeśli chcesz wyświetlić listę wartości, z których użytkownicy mogą wybierać.

Jak utworzyć pole listy w programie Excel?

Aby utworzyć pole listy w arkuszu programu Excel, wykonaj następujące kroki:

Najpierw musisz włączyć kartę Deweloper widoczną na wstążce, aby uzyskać dostęp do poleceń VBA i formantów ActiveX. Aby uzyskać kartę Deweloper , otwórz okno dialogowe Opcje programu Excel , kliknij Dostosuj Wstążkę w programie Excel i zaznacz pole wyboru Deweloper.

Kliknij wstążkę programu Excel, a następnie wybierz kartę Deweloper, a następnie kliknij przycisk Wstaw, a następnie kliknij element sterujący Pole listy, aby wstawić nowe pole listy w arkuszu programu Excel.

Następnie narysuj prostokąt w arkuszu programu Excel, aby utworzyć pole listy w programie Excel.

Wybierając List Box w programie Excel, kliknij kartę programisty i wybierz Właściwości. Otworzy się okno Właściwości.

W oknie Właściwości, w ustawieniu Zakres wypełnienia listy, wprowadź Dni - nazwany zakres z dniami tygodnia.

Kliknij właściwość Multi Select iz listy rozwijanej wybierz 1-fmMultiSelectMulti, jak pokazano na poniższym zrzucie ekranu.

Kliknij właściwość Styl listy iz listy rozwijanej wybierz 1-fmListStyleOption. Spowoduje to dodanie pól wyboru po lewej stronie elementów listy, jak pokazano na poniższym zrzucie ekranu.

Zamknij okno Właściwości.

Możesz wyłączyć tryb projektowania, klikając opcję Tryb projektowania.

Jak utworzyć pole listy w Excel VBA?

Możesz rozważyć następujący przykład, aby lepiej zrozumieć pole listy VBA:

Możesz pobrać ten szablon Excel Boxes tutaj - List Boxes Excel Template

Przykład 1

Aby połączyć to pole listy z komórką, kliknij prawym przyciskiem pole listy (upewnij się, że wybrany jest tryb projektowania) i kliknij Właściwości. Wypełnij B17 dla połączonej komórki, jak pokazano na poniższym zrzucie ekranu.

Miesiąc Nazwa listy jako Miesiąc przejdź do właściwości i wybierz Zakres wypełnienia listy jako Miesiąc.

Dane zmienią się w komórce B17 po zmianie wyboru w polu listy, jak pokazano na poniższym zrzucie ekranu.

Przykład 2 - Jak utworzyć listę wartości w formularzu użytkownika?

Przejdź do karty Deweloper, a następnie kliknij opcję Visual Basic w kodzie lub naciśnij klawisze Alt + F11.

Przejdź do menu Wstaw, kliknij Formularz użytkownika.

Przeciągnij kontrolkę pola listy w formularzu użytkownika z przybornika.

Kliknij dwukrotnie UserForm i wybierz zdarzenie Userform, jak pokazano na poniższym zrzucie ekranu.

Teraz dodaj następujący kod do procedury pośredniej.

Private Sub UserForm_Initialize ()

ListBox1.AddItem „MBA”

ListBox1.AddItem „MCA”

ListBox1.AddItem „MSC”

ListBox1.AddItem „MECS”

ListBox1.AddItem „CA”

Napis końcowy

Teraz naciśnij klawisz F5, aby uruchomić kod.

Przykład # 3 - Jak dodać dynamiczną kontrolkę pola listy

Dodaj dynamiczną kontrolkę pola listy w formularzu użytkownika za pomocą VBA

Dodaj przycisk polecenia do formularza użytkownika z przybornika.

Kliknij prawym przyciskiem myszy przycisk polecenia, kliknij właściwości

Zmień podpis przycisku polecenia na „Create_Listbox”

Kliknij dwukrotnie przycisk polecenia

Teraz pokazuje następujący kod.

Private Sub CommandButton1_Click ()

Napis końcowy

Wywołaj poniższą procedurę o nazwie „Add_Dynamic_Listbox” i znajdź poniższą procedurę do uruchomienia.

Sub Add_Dynamic_Listbox ()

„Dodaj dynamiczne pole listy i przypisz je do obiektu„ LstBx ”

Ustaw LstBx = UserForm3.Controls.Add („Forms.ListBox.1”)

„Pozycja listy wartości

LstBx.Left = 20

LstBx.Top = 10

Napis końcowy

Teraz kliknij F5, aby uruchomić makro.

Jak dodać elementy do kontroli pola listy w VBA?

Prywatna wstawka podrzędna _Items _To_LstBox ()

ListBox1.AddItem „Pozycja 1”

ListBox1.AddItem „Pozycja 2”

ListBox1.AddItem „Pozycja 3”

ListBox1.AddItem „Pozycja 4”

ListBox1.AddItem „Pozycja 5”

Napis końcowy

Jak wyczyścić elementy z pola listy za pomocą VBA?

Sub Clr_LstBx ()

UserForm3.ListBox1.Clear

Napis końcowy

Przykład 4

Załóżmy, że mamy dane sprzedaży i chcemy uzyskać szczegółowe informacje o sprzedaży w graficznym interfejsie użytkownika, wybierając opcję wyboru pozycji w polu listy. Następnie musimy zmienić wybierz komórkę indeksu jako łącze do komórki i zastosuj formułę WYSZUKAJ.PIONOWO, aby pobrać szczegóły sprzedaży, jak pokazano na poniższych zrzutach ekranu.