outlook2003のマクロでmsgファイルを受信トレイに取り込む方法は

質問

OUTLOOKメールの、msgファイル（”ファイル名を付けて保存”から、msg形式(Outlook メッセージ形式)で保存したファイル）があります。

このmsg形式のファイルを、ドラッグ＆ドロップで、受信トレイに持ってくれば取り込めます。
マクロで、同じ動作ができないでしょうか？

回答No.2

marbin

#1です。
ちょっと外してるかも？？です。
失礼しました。

回答No.1

marbin

未検証ですが、↓の応用でいけるかも？？

エクセルからメール送信
http://oshiete1.goo.ne.jp/qa4168739.html

お礼

教えていただいた回答の中身をいろいろ調べていたら解決しました。
CopyFileメソッドでした。サンプルはこんな感じ。
情報ありがとうございました。

Dim olApp As New Outlook.Application
Dim doc As Object

strPath = "C:\MyMail.msg"
Set doc = olApp.CopyFile(strPath, "Inbox")

補足

ええ、逆なんです。メッセージをファイルに保存するマクロはいろいろな場所で見ますが、保存したファイルを読み込むマクロを探していまして。