Outlook 操作 - メール送信
　
　目的

Microsoft Outlook Object Library を使用して Visual Basic から Outlook でメールを送信する。（ Outlook Express では使用できません ）

　ポイント

Outlook Object Library の各オブジェクトは階層構造になっています。
各オブジェクトのプロパティやメソッドに関する説明は Outlook に付属する Visual Basic ヘルプに記されています。

　
　サンプルコード

Option Explicit

Private Sub cmdMail_Click()

    Dim ol As Object ' Outlook.Application
    Dim iM As Object ' Outlook.MailItem
    
    Set ol = CreateObject("Outlook.Application")
    
    Set iM = ol.CreateItem(0) ' メールアイテム(MailItem)の作成
    
    iM.Subject = "こんにちわ"  ' 件名の設定
    iM.Body = "お元気ですか？" ' 内容の設定
    iM.To = "ママ<test@test-by-outlook.com>" ' 送信先の設定
    
    iM.Send  ' 送信
    
End Sub

ソースのダウンロードはありません。