PickerDialog.Resolve, méthode (Office)
Résout le jeton à l’aide du PickerDialog et récupère les résultats.
Syntaxe
expression. Resolve (TokenText, duplicateDlgMode)
Expression Expression qui renvoie un objet PickerDialog .
Parameters
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| TokenText | Requis | String | Chaîne de texte à résoudre. |
| duplicateDlgMode | Requis | Integer |
Valeur renvoyée
PickerResults
Exemple
Résout les entités à l’aide de l’objet PickerDialog .
Dim objPickerDialog As PickerDialog
Dim objPickerProperties As PickerProperties
Dim objPickerProperty As PickerProperty
Dim objPickerExistingResults As PickerResults
Dim objPickerExistingResult 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)
' Resolve the token by using Picker Dialog and get the results.
Set objPickerResults = objPickerDialog.Resolve("johndoe", False)
Voir aussi
- Membres de l’objet PickerDialog
- Interface PickerDialog
- Interfaces de boîte de dialogue Sélecteur d’objets
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.