step3 送信者のアドレス、件名を習得できるようになりました step3.5 文字列操作で必要な最低限の知識もカバーしました。 これで下準備は万全です。 今回は、早速メールに添付されているファイルを一括でマクロを使って保存する方法について整理しましょう。 これでほとんど目標に掲げたことをカバーできるようになります。 Sub Outlook_test() Dim objOL As Object Dim objNAMESPC As Object Dim myfolder As Object Set objOL = CreateObject("Outlook.Application") Set objNAMESPC = objOL.GetNamespace("MAPI") Set myfolder = objNAMESPC.GetDefaultFolder(olFolderInbox) Deb