Düzenle

Aracılığıyla paylaş


PickerDialog.Show method (Office)

Displays the PickerDialog with the already specified data handler and given options.

Syntax

expression.Show (IsMultiSelect, ExistingResults)

expression An expression that returns a PickerDialog object.

Parameters

Name Required/Optional Data type Description
IsMultiSelect Optional Boolean Specifies whether the PickerDialog user interface provides multiple item selection functions.
ExistingResults Optional PickerResults Contains existing PickerResults in the PickerDialog user interface. These results are displayed in the selected item control.

Return value

PickerResults

Example

The following code sets the PickerDialog properties and then displays the 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) 
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)

See also

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.