Jak korzystać z ListView z CheckBox w VBA

Autor: Peter Berry
Data Utworzenia: 11 Sierpień 2021
Data Aktualizacji: 14 Styczeń 2025
Anonim
ListView Checkboxes And Checked Item Userform Excel VBA
Wideo: ListView Checkboxes And Checked Item Userform Excel VBA

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)
  1. 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.

  2. 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.

  3. 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"

  4. 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

  5. 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

Jakie chemikalia tworzą wybielacz?

Charles Brown

Styczeń 2025

Wybielacz łuży do dezynfekcji i dezodoryzacji różnych rzeczy. Można nią dezynfekować zabawki dziecięce, czyścić blaty kuchenne i łazienki, częto łuży do rozjaśniania i czyzczenia ubrań. Itnieją d...

Jeśli potrzebujez kwiatów o określonym kolorze, ale nie możez ich nigdzie znaleźć, co robiz? Ufarbuj je!Jeśli potrzebujez kwiatów o określonym kolorze, ale nie możez ich nigdzie znaleźć, co ...

Fascynujące Publikacje