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

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.