次の方法で共有

DistListItem.AddMember メソッド (Outlook)

  • [アーティクル]

指定された配布リストに新しいメンバーを追加します。 配布リストには、有効なメール アドレスを表す Recipient オブジェクトが含まれています。

構文

式。AddMember (Recipient)

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

パラメーター

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

注釈

特定の配布リストに複数のメンバーを追加する場合は、 AddMembers メソッドを使用します。

例

次の Microsoft Visual Basic for Applications (VBA) の例は、新しい DistributionList オブジェクトを作成しに受信者を追加します。 指定された受信者が無効な場合は、 AddMember メソッドは失敗します。 次の使用例を実行するには、受信者の名前と ' Dan Wilson' を交換してください。

Sub AddNewMember() 
 
 'Adds a member to a new distribution list 
 
 
 
 Dim objItem As Outlook.DistListItem 
 
 Dim objMail As Outlook.MailItem 
 
 Dim objRcpnt As Outlook.Recipient 
 
 
 
 Set objMail = Application.CreateItem(olMailItem) 
 
 
 
 Set objItem = Application.CreateItem(olDistributionListItem) 
 
 'Create recipient for distlist 
 
 Set objRcpnt = Application.Session.CreateRecipient("Dan Wilson") 
 
 objRcpnt.Resolve 
 
 objItem.AddMember objRcpnt 
 
 'Add note to list and display 
 
 objItem.DLName = "Northwest Sales Manager" 
 
 objItem.Body = "Regional Sales Manager - NorthWest" 
 
 objItem.Save 
 
 objItem.Display 
 
End Sub

関連項目

配布リスト オブジェクト

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

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