Share via


PickerDialog.Show メソッド (Office)

既に指定されたデータ ハンドラーと指定されたオプションを持つ PickerDialog を表示します。

構文

Show (IsMultiSelect, ExistingResults)

PickerDialog オブジェクトを返す式。

パラメーター

名前 必須 / オプション データ型 説明
IsMultiSelect 省略可能 Boolean PickerDialog ユーザー インターフェイスが複数の項目選択関数を提供するかどうかを指定します。
ExistingResults 省略可能 PickerResults PickerDialog ユーザー インターフェイスの既存の PickerResults が含まれています。 These results are displayed in the selected item control.

戻り値

PickerResults

次のコードは 、PickerDialog プロパティを設定し、 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)

関連項目

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。