2014/01/17

Outlook メール送信時に自動処理したい



こんにちは!自動化大好きtknriaです!



Outlook2010を使っていて、メール送信と同時に処理を行いたいことがあります。

例えば、条件を満たしていなければアラートを出したり、メール内容をtxtファイルにコピーして一括管理したかったり。
件名と宛先を表示して確認を促したりもしたいですね。

もちろん、仕分けルールでもできないことはないです!

でも、もっと細かく、もっと複雑な処理をしたかったりもするのが人情ってもんです。



■ メール送信時に自動処理!


VBAで実装します。


'-------ここからソース-------
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)

    ' ここに行いたい処理

End Sub
'-------ここまでソース-------


もともとApplicationとして用意してもらっているので簡単ですね。



■ 億劫なあとがき


とはいえ、仕分けルールを作成すれば済むレベルの処理であれば、そちらを使ったら良いと思います。

使い分け大事!