Zawartość
Użycie kontrolki ListView z polami wyboru na formularzu VBA może uczynić aplikację bardziej dynamiczną, udostępniając opcje użytkownikowi. ListView pokazuje elementy za pomocą jednego z czterech różnych widoków i układa je w kolumny z nagłówkami Microsoft Excel lub bez nich. Użyj właściwości „ListItems.Add”, aby dodać elementy i „Zaznaczone”, aby określić, które elementy zostały wybrane przez użytkownika.
Instrukcje
Wypełnij formant ListView w programie Excel przy użyciu VBA (Hemera Technologies / Photos.com / Getty Images)-
Otwórz Microsoft Excel, kliknij zakładkę „Developer”, a następnie „Visual Basic”, aby otworzyć okno edytora VBA Kliknij menu „Insert”, a następnie „UserForm” (formularz użytkownika), aby utworzyć nowy formularz. Kliknij „Narzędzia”, „Dodatkowe kontrolki” i zaznacz pole obok „Microsoft ListView Control” (kontrolka Microsoft ListView), aby dodać nową kontrolkę „ListView” do formularza.
-
Kliknij prawym przyciskiem myszy formant „ListView”, a następnie „Właściwości”. Przewiń okno w dół i wybierz „Prawda” obok opcji „Pola wyboru”. Kliknij „CommandButton” w panelu „Toolbox”, a następnie w formularzu, aby dodać nowy przycisk. Dodaj drugi przycisk, wykonując te same czynności.
-
Kliknij dwukrotnie „CommandButton1”, aby utworzyć nowe zdarzenie dla tego przycisku. Dodaj następujący kod do popularnego „ListBox” z trzema elementami:
Me.ListView1.ListItems.Add (1) = "Sprawdź pozycję 1" Me.ListView1.ListItems.Add (2) = "Sprawdź pozycję 2" Me.ListView1.ListItems.Add (3) = "Sprawdź pozycję 3"
-
Wróć do formularza i kliknij dwukrotnie „CommandButton2”, aby utworzyć nowe zdarzenie kliknięcia dla tego przycisku. Dodaj następujący kod, aby przejść przez elementy „ListBox” i wyświetlić wybrane elementy w oknie „Natychmiastowe”:
Dla licznika = 1 Do Me.ListView1.ListItems.Count Jeśli Me.ListView1.ListItems.Item (licznik) .Sprawdzone Następnie Debug.Print Me.ListView1.ListItems.Item (licznik) .Text End If
-
Wróć do formularza i kliknij „F5”, aby uruchomić program. Następnie kliknij „CommandButton1”, aby wypełnić kontrolkę „ListView”, a następnie „CommandButton2”, aby wyświetlić wybrane elementy.
Czego potrzebujesz
- Microsoft Excel