次の方法で共有

SelectNamesDialog.Display メソッド (Outlook)

  • [アーティクル]

[ 名前の選択] ダイアログ ボックスを表示します。

構文

式。 Display

式SelectNamesDialog オブジェクトを表す変数。

戻り値

場合は、ユーザーがクリックした 、 [ok]、キャンセルするか、[閉じる] アイコンをクリックする場合は True 、 Boolean値です。

注釈

[名前の選択] ダイアログ ボックスを表示するには、 表示 は、以前の位置とサイズ (上、左、幅、および高さで示されます)、ダイアログ ボックスを使用します。

[ 名前の選択] ダイアログ ボックスはモーダルです。つまり、ユーザーが [ OK]、[ キャンセル]、または [閉じる] アイコンをクリックするまでは、コードの実行が停止します。

メモリの不足を含むエラー条件を検出する必要があります。さもないと、別のメッセージやダイアログ ボックスが開きます。

例

次のコードは、メール アイテムを作成し、ユーザーが [名前の選択] ダイアログ ボックスで Exchange のグローバル アドレス一覧から受信者を選択できるようにします。完全に解決できる受信者が選択された場合は、メール アイテムを送信します。

Sub SelectRecipients() 
 Dim oMsg As MailItem 
 Set oMsg = Application.CreateItem(olMailItem) 
 Dim oDialog As SelectNamesDialog 
 Set oDialog = Application.Session.GetSelectNamesDialog 
 With oDialog 
 .InitialAddressList = _ 
 Application.Session.GetGlobalAddressList 
 .Recipients = oMsg.Recipients 
 If .Display Then 
 'Recipients Resolved 
 oMsg.Subject = "Hello" 
 oMsg.Send 
 End If 
 End With 
End Sub

関連項目

SelectNamesDialog オブジェクト

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

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