Outlook-FolderにPDFをインポート

Question

ここに私が持っている質問があります：そこにドラッグアンドドロップするのと同じ方法で、VBA-Macro経由でOutlookフォルダにPDFファイルをインポートすることは可能ですか？私は単純なPDFを必要とするだけなので、ファイルがOutlookを介してSAPにアップロードされると、空の電子メールに添付すれば、PDFをすぐに開くことができます。

ありがとうございます！ Markus

Answer 1

Outlookオブジェクトモデルでは、新しいドキュメントアイテムを作成することはできません。既存のアイテムにのみアクセスできます。

Redemptionを使用する場合は、RDODocumentItemオブジェクトを使用できます。次のようなもの：

set Session = CreateObject("Redemption.RDOSession") 
Session.MAPIOBJECT = Application.Session.MAPIOBJECT 
set Folder = Session.GetDefaultFolder(olFolderDrafts) 
set Msg = Folder.Items.Add("IPM.Document") 
Msg.SetDocument("c:\Temp\test.pdf") 
Msg.Save