次の方法で共有

DistListItem.AddMembers メソッド (Outlook)

  • [アーティクル]

配布リストに新しいメンバーを追加します。

構文

式。 AddMembers( _Recipients_ )

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

パラメーター

名前 必須 / オプション データ型 説明
受信者 必須 Recipients 配布リストに追加するメンバーを指定します。

例

このマイクロソフトの 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

関連項目

配布リスト オブジェクト

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

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