共用方式為


DistListItem.AddMembers 方法 (Outlook)

將新成員新增到通訊群組清單中。

語法

expressionAddMembers( _Recipients_ )

表達 代表 DistListItem 物件的 變數。

參數

名稱 必要/選用 資料類型 描述
收件者 必要 收件者 要新增到通訊群組清單的成員。

範例

此 Microsoft Visual Basic for Applications (VBA) 範例會建立新的通訊群組清單,並將目前使用者和 'Dan Wilson' 新增到清單中。 如果指定的收件者無效,則 AddMember 方法將失敗。 因此,若要執行此範例,請用有效的收件者名稱取代 'Dan Wilson'。

Sub AddNewMembers() 
 
 Dim myNameSpace As Outlook.NameSpace 
 
 Dim myDistList As Outlook.DistListItem 
 
 Dim myTempItem As Outlook.MailItem 
 
 Dim myRecipients As Outlook.Recipients 
 
 
 
 Set myNameSpace = Application.GetNamespace("MAPI 
 
 Set myDistList = Application.CreateItem(olDistributionListItem 
 
 Set myTempItem = Application.CreateItem(olMailItem 
 
 Set myRecipients = myTempItem.Recipients 
 
 myDistList.DLName = _ 
 
 InputBox("Enter the name of the new distribution list 
 
 myRecipients.Add myNameSpace.CurrentUser.Name 
 
 myRecipients.Add "Dan Wilson 
 
 myRecipients.ResolveAll 
 
 myDistList.AddMembers myRecipients 
 
 myDistList.Save 
 
 myDistList.Display 
 
End Sub

另請參閱

DistListItem 物件

支援和意見反應

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