MailItem.SendUsingAccount プロパティ (Outlook)

MailItem を送信するアカウントを表す Account オブジェクトを取得または設定します。 値の取得と設定が可能です。

構文

。 SendUsingAccount

MailItem オブジェクトを返す式。

注釈

SendUsingAccount プロパティを使用して、Send メソッドが呼び出されたときに MailItem の送信に使用するアカウントを指定できます。 MailItem に指定したアカウントがもはや存在しない場合は、Null (Visual Basic では Nothing) が返されます。

Microsoft Visual Basic for Applicationsの次のコード サンプルでは、Accounts コレクションを列挙して Pop3 アカウントを見つけます。 アカウントが見つかった場合は、プログラムによってメッセージが作成され、 SendUsingAccount プロパティが Pop3 アカウントに割り当てられます。 SendUsingAccount プロパティは、 Send メソッドを呼び出す前に割り当てておく必要があります。

Sub SendUsingAccount() 
 
 Dim oAccount As Outlook.account 
 
 For Each oAccount In Application.Session.Accounts 
 
 If oAccount.AccountType = olPop3 Then 
 
 Dim oMail As Outlook.MailItem 
 
 Set oMail = Application.CreateItem(olMailItem) 
 
     oMail.Subject = "Sent using POP3 Account" 
 
     oMail.Recipients.Add ("someone@example.com") 
 
     oMail.Recipients.ResolveAll 
 
 Set oMail.SendUsingAccount = oAccount 
 
     oMail.Send 
 
 End If 
 
 Next 
 
End Sub

関連項目

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

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