Método PickerDialog.Resolve (Office)
Resolve o token usando o PickerDialog e recupera os resultados.
Sintaxe
expressão. Resolver (TokenText, duplicateDlgMode)
Expressão Uma expressão que retorna um objeto PickerDialog .
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| TokenText | Obrigatório | String | A cadeia de caracteres de texto a ser resolvida. |
| duplicateDlgMode | Obrigatório | Integer |
Valor de retorno
PickerResults
Exemplo
Resolve entidades usando o objeto 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)
Confira também
- Membros do objeto PickerDialog
- Interface PickerDialog
- Interfaces da caixa de diálogo Seletor de Objetos
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.