PickerResults.Add method (Office)

Adiciona um objeto PickerResult à coleção PickerResults .

Sintaxe

expressão. Adicionar (ID, DisplayName, Type, SIPId, ItemData, SubItems)

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

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
Id Obrigatório String Representa um identificador do PickerResult.
DisplayName Obrigatório String Representa um nome a apresentar do PickerResult.
Tipo Obrigatório String Representa um tipo de PickerResult.
SIPId Opcional String Sem suporte atualmente. O SIPId é o identificador do Office Communication Server. É utilizado apenas para o cenário de escolha de pessoas.
ItemData Opcional Variant Dados de enlace de itens não apresentados.
SubItems Opcional Variant Apresenta os dados de campos de finalidade ou não apresentação do PickerResult. É utilizado para transmitir valores de coluna no PickerDialog.

Valor de retorno

PickerResult

Exemplo

O código seguinte define as propriedades do PickerDialog e, em seguida, apresenta o PickerDialog.

Dim objPickerDialog As PickerDialog 
Dim objPickerProperties As PickerProperties 
Dim objPickerProperty As PickerProperty 
Dim objPickerExistingResults As PickerResults 
Dim objPickerExistingResults 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) 
Set objPickerExistingResults = objPickerDialog.CreatePickerResults 
Set objPickerExistingResult = objPickerExistingResults.Add("johndoe@contoso.com", "John Doe", "User") 
 
' Show the Picker Dialog and get the results. 
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.

  • Last updated on