PickerResults.Add-Methode (Office)

Artikel
04/07/2023

Fügt der PickerResults-Auflistung ein PickerResult-Objekt hinzu.

Syntax

Ausdruck. Add (Id, DisplayName, Type, SIPId, ItemData, SubItems)

Ausdruck Ein Ausdruck, der ein PickerResults-Objekt zurückgibt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
Id	Erforderlich	String	Stellt einen Bezeichner des PickerResult dar.
DisplayName	Erforderlich	String	Stellt einen Anzeigenamen des PickerResult dar.
Typ	Erforderlich	String	Stellt einen Typ des PickerResult dar.
SIPId	Optional	String	Derzeit nicht unterstützt. Die SIPId ist der Bezeichner für Office Communication Server. Es wird nur für das Personenauswahlszenario verwendet.
ItemData	Optional	Variant	Nicht angezeigte Elementbindungsdaten.
SubItems	Optional	Variant	Zeigt die Zweck- oder Nicht-Anzeige-Felddaten des PickerResult an. Es wird zum Übergeben von Spaltenwerten im PickerDialog verwendet.

Rückgabewert

PickerResult

Beispiel

Der folgende Code legt die PickerDialog-Eigenschaften fest und zeigt dann pickerDialog an.

Dim objPickerDialog As PickerDialog 
Dim objPickerProperties As PickerProperties 
Dim objPickerProperty As PickerProperty 
Dim objPickerExistingResults As PickerResults 
Dim objPickerExistingResults As PickerResult 
Dim objPickerResults As PickerResults 
 
' Configure the Picker Dialog properties. 
Set objPickerDialog = Application.PickerDialog 
objPickerDialog.DataHandlerId = "{000CDF0A-0000-0000-C000-000000000046}" 
objPickerDialog.Title = "Sample Picker Dialog" 
Set objPickerProperties = objPickerDialog.Properties 
Set objPickerProperty = objPickerProperties.Add("SiteUrl", "https://my", msoPickerFieldtypeText) 
Set objPickerExistingResults = objPickerDialog.CreatePickerResults 
Set objPickerExistingResult = objPickerExistingResults.Add("johndoe@contoso.com", "John Doe", "User") 
 
' Show the Picker Dialog and get the results. 
Set objPickerResults = objPickerDialog.Show(True, objPickerExistingResult)

Siehe auch

Elemente des PickerResults-Objekts

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.

Freigeben über