Partilhar via


Método PickerDialog.CreatePickerResults (Office)

Cria um objeto PickerResults vazio.

Sintaxe

expressão. CreatePickerResults

expressão Uma expressão que devolve um objeto PickerDialog .

Valor de retorno

PickerResults

Comentários

Pode adicionar o PickerResult ao objeto devolvido e especificá-lo para o segundo parâmetro do método Show , uma vez que já existem resultados do objeto PickerDialog .

Exemplo

O código seguinte 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.