Compartilhar via


Método PickerDialog.CreatePickerResults (Office)

Cria um objeto PickerResults vazio.

Sintaxe

expressão. CreatePickerResults

Expressão Uma expressão que retorna um objeto PickerDialog .

Valor de retorno

PickerResults

Comentários

Você pode adicionar o PickerResult ao objeto retornado e especifique-o ao segundo parâmetro do método Show como resultados já existentes do objeto PickerDialog .

Exemplo

O código a seguir define várias propriedades do PickerDialog e adiciona os PickerResults já existentes aos resultados.

Dim objPickerDialog As PickerDialog 
Dim objPickerExistingResults As PickerResults 
 
Set objPickerDialog = Application.PickerDialog 
objPickerDialog.DataHandlerId = "{000CDF0A-0000-0000-C000-000000000046}" 
objPickerDialog.Title = "Sample Picker Dialog" 
 
Set objPickerExistingResults = objPickerDialog.CreatePickerResults 
Set objPickerExistingResult = objPickerExistingResults.Add("johndoe@contoso.com", "John Doe", "User") 
Set objPickerResults = objPickerDialog.Show(True, objPickerExistingResult) 

Confira também

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.