Inhalt

• Anweisungen
• Was du brauchst

Die Verwendung eines ListView-Steuerelements mit Kontrollkästchen in einem VBA-Formular kann eine Anwendung dynamischer machen, indem dem Benutzer Optionen zur Verfügung gestellt werden. Eine ListView zeigt Elemente in einer von vier verschiedenen Ansichten und ordnet sie in Spalten mit oder ohne Microsoft Excel-Header an. Verwenden Sie die Eigenschaft "ListItems.Add", um Elemente hinzuzufügen, und "Checked", um festzustellen, welche Elemente vom Benutzer ausgewählt wurden.

Anweisungen

Füllen Sie das ListView-Steuerelement in Excel mithilfe von VBA aus (Hemera Technologies / Photos.com / Getty Images)

1. Öffnen Sie Microsoft Excel, klicken Sie auf die Registerkarte "Entwickler" und anschließend auf "Visual Basic", um das Fenster des VBA-Editors zu öffnen. Klicken Sie auf das Menü "Einfügen" und anschließend auf "UserForm" (Benutzerformular), um ein neues Formular zu erstellen. Klicken Sie auf "Extras", "Zusätzliche Steuerelemente", und aktivieren Sie das Kontrollkästchen neben "Microsoft ListView-Steuerelement" (Microsoft ListView-Steuerelement), um dem Formular ein neues "ListView" -Steuerelement hinzuzufügen.

2. Klicken Sie mit der rechten Maustaste auf das Steuerelement "ListView" und anschließend auf "Eigenschaften". Scrollen Sie im Fenster nach unten und wählen Sie "True" neben der Option "Checkboxes". Klicken Sie im Bereich "Toolbox" auf "Befehlsschaltfläche" und dann im Formular, um eine neue Schaltfläche hinzuzufügen. Fügen Sie mit den gleichen Schritten eine zweite Schaltfläche hinzu.

   
   

3. Doppelklicken Sie auf "CommandButton1", um ein neues Ereignis für diese Schaltfläche zu erstellen. Fügen Sie der populären "ListBox" den folgenden Code mit drei Elementen hinzu:

   Me.ListView1.ListItems.Add (1) = "Check Item 1" Me.ListView1.ListItems.Add (2) = "Check Item 2" Me.ListView1.ListItems.Add (3) = "Check Item 3"

4. Gehen Sie zurück zum Formular und doppelklicken Sie auf "CommandButton2", um ein neues Klickereignis für diese Schaltfläche zu erstellen. Fügen Sie den folgenden Code hinzu, um durch die "ListBox" -Elemente zu gehen und die ausgewählten Elemente im Fenster "Direkt" anzuzeigen:

   Für counter = 1 To Me.ListView1.ListItems.Count Wenn Me.ListView1.ListItems.Item (counter) .Checked Dann Debug.Print Me.ListView1.ListItems.Item (counter) .Text End If Next

5. Gehen Sie zurück zum Formular und klicken Sie auf "F5", um das Programm auszuführen. Klicken Sie dann auf "CommandButton1", um das Steuerelement "ListView" aufzufüllen, und anschließend auf "CommandButton2", um die ausgewählten Elemente anzuzeigen.

   
   

Was du brauchst

• Microsoft Excel