ListBox. ItemsSelected-Eigenschaft (Access)ListBox.ItemsSelected property (Access)

Mithilfe der ItemsSelected-Eigenschaft können Sie einen schreibgeschützten Verweis auf die ausgeblendete ItemsSelected-Auflistung zurückgeben.You can use the ItemsSelected property to return a read-only reference to the hidden ItemsSelected collection. Diese ausgeblendete Auflistung kann für den Zugriff auf Daten in den ausgewählten Zeilen eines Listenfeld-Steuerelements mit Mehrfachauswahl verwendet werden.This hidden collection can be used to access data in the selected rows of a multiselect list box control.

SyntaxSyntax

Ausdruck. ItemsSelectedexpression.ItemsSelected

Ausdruck Eine Variable, die ein ListBox -Objekt darstellt.expression A variable that represents a ListBox object.

BemerkungenRemarks

Die Auflistung ItemsSelectedItemsSelected unterscheidet sich dadurch von anderen Auflistungen, dass es sich bei ihr um eine Auflistung von Variablen des Datentyps VariantsVariant statt von Objekten handelt.The ItemsSelected collection is unlike other collections in that it is a collection of Variants rather than of objects. Jede Variable des Datentyps VariantVariant ist ein ganzzahliger Index, der auf eine ausgewählte Zeile in einem Listen- oder Kombinationsfeld verweist.Each Variant is an integer index referring to a selected row in a list box or combo box.

Verwenden Sie die ItemsSelected -Auflistung in Verbindung mit der Column -Eigenschaft oder der ItemData -Eigenschaft, um Daten aus ausgewählten Zeilen in einem Listen-oder Kombinationsfeld abzurufen.Use the ItemsSelected collection in conjunction with the Column property or the ItemData property to retrieve data from selected rows in a list box or combo box. Sie können die ItemsSelected -Auflistung mit der For Each...Next -Anweisung anzeigen.You can list the ItemsSelected collection by using the For Each...Next statement.

Wenn Sie beispielsweise über ein Employees -Listenfeld in einem Formular verfügen, können Sie die ItemsSelected -Auflistung auflisten und die ItemData -Eigenschaft des Steuerelements verwenden, um den Wert der gebundenen Spalte für jede ausgewählte Zeile im Listenfeld zurückzugeben.For example, if you have an Employees list box on a form, you can list the ItemsSelected collection and use the control's ItemData property to return the value of the bound column for each selected row in the list box.

Zum Aktivieren der Mehrfachauswahl von Zeilen in einem Listenfeld legen Sie die MultiSelect-Eigenschaft des Steuerelements auf Simple oder Extended fest.To enable multiple selection of rows in a list box, set the control's MultiSelect property to Simple or Extended.

Die ItemsSelected -Auflistung verfügt über zwei Eigenschaften, die Eigenschaften count und Item und keine Methoden.The ItemsSelected collection has two properties, the Count and Item properties, and no methods.

BeispielExample

Im folgenden Beispiel wird der Wert der gebundenen Spalte für jede ausgewählte Zeile in einem namens Listenfeld in einem Kontakt Formular gedruckt.The following example prints the value of the bound column for each selected row in a Names list box on a Contacts form. Zum Testen dieses Beispiels erstellen Sie das Listenfeld, und stellen Sie seine BoundColumn-Eigenschaft nach Belieben und seine MultiSelect-Eigenschaft auf Einzeln oder Erweitert ein.To try this example, create the list box and set its BoundColumn property as desired and its MultiSelect property to Simple or Extended. Wechseln Sie zur Formularansicht, wählen Sie im Listenfeld mehrere Zeilen aus, und führen Sie den folgenden Code aus.Switch to Form view, select several rows in the list box, and run the following code.

Sub BoundData() 
 Dim frm As Form, ctl As Control 
 Dim varItm As Variant 
 
 Set frm = Forms!Contacts 
 Set ctl = frm!Names 
 For Each varItm In ctl.ItemsSelected 
 Debug.Print ctl.ItemData(varItm) 
 Next varItm 
End Sub

Im folgenden Beispiel wird dasselbe Listenfeld-Steuerelement verwendet, aber die Werte jeder Spalte für jede ausgewählte Zeile im Listenfeld werden anstelle der Werte in der gebundenen Spalte ausgegeben.The following example uses the same list box control, but prints the values of each column for each selected row in the list box, instead of only the values in the bound column.

Sub AllSelectedData() 
 Dim frm As Form, ctl As Control 
 Dim varItm As Variant, intI As Integer 
 
 Set frm = Forms!Contacts 
 Set ctl = frm!Names 
 For Each varItm In ctl.ItemsSelected 
 For intI = 0 To ctl.ColumnCount - 1 
 Debug.Print ctl.Column(intI, varItm) 
 Next intI 
 Debug.Print 
 Next varItm 
End Sub

Support und FeedbackSupport and feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation?Have questions or feedback about Office VBA or this documentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.