Partager via


PickerResults.Add, méthode (Office)

Ajoute un objet PickerResult à la collection PickerResults .

Syntaxe

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

Expression Expression qui renvoie un objet PickerResults .

Parameters

Nom Requis/Facultatif Type de données Description
Id Requis String Représente un identificateur du PickerResult.
DisplayName Requis String Représente un nom d’affichage du PickerResult.
Type Obligatoire String Représente un type de PickerResult.
SIPId Facultatif String Actuellement non pris en charge. SipId est l’identificateur d’Office Communication Server. Il est utilisé uniquement pour le scénario de sélection de personnes.
ItemData Facultatif Variant Non-affichage des données de liaison d’élément.
SubItems Facultatif Variant Affiche les données de champ d’objectif ou non d’affichage du PickerResult. Il est utilisé pour passer des valeurs de colonne dans pickerDialog.

Valeur renvoyée

PickerResult

Exemple

Le code suivant définit les propriétés PickerDialog , puis affiche le PickerDialog.

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)

Voir aussi

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.