PickerDialog.Show Method (Office)
Displays the Picker Dialog with already specified data handler and given options.
Version Information
Version Added: Office 2010
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 Picker Dialog user interface provides multiple item selection functions. |
ExistingResults |
Optional |
PickerResults |
Contains existing PickerResults in Picker Dialog user interface. These results are displayed in the selected item control. |
Return Value
PickerResults
Example
The following code sets the Picker Dialog properties and then displays the Picker Dialog.
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", "http://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)