Outlookのメッセージファイル(.msg)から送信元アドレスや件名、本文等のデータを取り出すことができます。 よくあるのは、受信トレイのメールからデータを取り出したりしますが、今回は任意の場所にコピーしたメッセージファイル(.msg)からデータを取り出す方法をご紹介します。 まずは宣言 Dim OL As Object Dim msg As Object Outlookオブジェクトを生成 Set OL = CreateObject("Outlook.Application") msgファイルを指定 strFileName = "c:\sample.msg" メッセージファイルをオブジェクトに読み込む Set msg = OL.CreateItemFromTemplate(strFileName) 各種データを取得します。 Debug.Print "SentOnBehalfOfName: