Outlook) (SelectNamesDialog 物件

顯示 [ 選取名稱 ] 對話方塊，讓使用者從一或多個通訊清單中選取專案，並傳回 SelectNamesDialog.Recipients屬性所指定之集合物件中的選取專案。

註解

您可以透過呼叫 NameSpace.GetSelectNamesDialog，產生 SelectNamesDialog 物件的實例。

SelectNamesDialog.Display所顯示的對話方塊類似于 Outlook 使用者介面中的 [選取名稱] 對話方塊。 它會遵循內建 [選取名稱] 對話方塊的大小和位置設定。 不過，其預設狀態不會在 [收件者]、[副本] 及 [密件副本] 編輯方塊上方顯示 [郵件收件者]。 如需使用 SelectNamesDialog 物件來顯示 [ 選取名稱 ] 對話方塊的詳細資訊，請參閱 從通訊錄顯示名稱。

範例

下列程式碼範例示範如何使用 SelectNamesDialog 物件，在類似于 Outlook 使用者介面中 [ 選取名稱 ] 對話方塊的對話方塊中顯示 [連絡人] 資料夾的專案。

Sub ShowContactsInDialog() 
 
 Dim oDialog As SelectNamesDialog 
 
 Dim oAL As AddressList 
 
 Dim oContacts As Folder 
 
 
 
 Set oDialog = Application.Session.GetSelectNamesDialog 
 
 Set oContacts = _ 
 
 Application.Session.GetDefaultFolder(olFolderContacts) 
 
 
 
 'Look for the address list that corresponds with the Contacts folder 
 
 For Each oAL In Application.Session.AddressLists 
 
 If oAL.GetContactsFolder = oContacts Then 
 
 Exit For 
 
 End If 
 
 Next 
 
 With oDialog 
 
 'Initialize the dialog box with the address list representing the Contacts folder 
 
 .InitialAddressList = oAL 
 
 .ShowOnlyInitialAddressList = True 
 
 If .Display Then 
 
 'Recipients Resolved 
 
 'Access Recipients using oDialog.Recipients 
 
 End If 
 
 End With 
 
End Sub

方法

名稱
Display
SetDefaultDisplayMode

屬性

名稱
AllowMultipleSelection
Application
BccLabel
Caption
CcLabel
Class
ForceResolution
InitialAddressList
NumberOfRecipientSelectors
Parent
Recipients
Session
ShowOnlyInitialAddressList
ToLabel

另請參閱

Outlook 物件模型參考

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。