- ベストアンサー
Outlookを使用しながらメールの添付ファイルを自動保存する
- Outlookを利用しつつ、添付ファイルの自動保存機能を持ったソフトやプログラムは存在するのか？
- Outlookを利用しながらも、メールに添付されたファイルを自動的に特定のフォルダに保存する方法はあるのか？
- Outlookを使っている場合でも、添付ファイルの自動保存を実現するためのソフトやプログラムの選択肢はあるのか？
- みんなの回答 （2）
- 専門家の回答
質問者が選んだベストアンサー
- ベストアンサー
例えばこんな感じでしょうか。 動作の概要 該当メールの全ての添付ファイルを、指定したフォルダに保存する。 仕訳ルールによる処理を想定しています。 コードの設置後、仕訳ルールの「スクリプトを実行する」に登録することで、 新着メールを自動処理したり、特定フォルダのメールを一括処理したりできます。 Sub Sample(メール As MailItem) 保存先フォルダのパス = "C:\Documents and Settings\UserName\My Documents\保存フォルダ" For Each 添付ファイル In メール.Attachments 添付ファイル.SaveAsFile (保存先フォルダのパス & 添付ファイル.DisplayName) Next 添付ファイル End Sub Outlook2003で動作確認済みですが、あくまでサンプルですので、 ・指定したフォルダが存在しない ・保存するファイルと同名のファイルが既に保存先フォルダにある といった状況は想定しておりません。
その他の回答 (1)
#1です。 「保存先フォルダのパス」の指定ですが、パスの最後に"\"が必要です。 （検証したパスから書き直す際に付け忘れました。失礼） Sub Sample(メール As MailItem) 保存先フォルダのパス = "C:\Documents and Settings\UserName\My Documents\保存フォルダ\" For Each 添付ファイル In メール.Attachments 添付ファイル.SaveAsFile (保存先フォルダのパス & 添付ファイル.DisplayName) Next 添付ファイル End Sub
お礼
なるほど。簡単なプログラムで出来るものなのですね！ありがとうございました。