2008/12/20
[macro][Outlook2007]Re: Re: Re:を何とかする
ありがちなRe: Re: Re:なサブジェクトを何とかする方法。 「Re: Re:」や「RE:Re: Re:」などのサブジェクトを「Re: 」にします。 組み込み方は前のエントリを参照
Dim reSubjectRe As New RegExp reSubjectRe.Global = True reSubjectRe.IgnoreCase = True reSubjectRe.Pattern = "(?:re\d*\:\s*)+"
oMailItem.Subject = reSubjectRe.Replace(oMailItem.Subject, "Re: ")
あと知らなかったんですがOfficeには簡単にオレオレコード署名を作る方法があるんですね。これを使えばデフォルトのセキュリティ設定でThisOutlookSessionが動きます。導入の仕方はこちらを参考に。makecert.exeとか使わなくてもいいんだーへぇー
12/23追記。Re2:とかにも対応
元記事:http://blogs.wankuma.com/mutaguchi/archive/2008/12/20/164557.aspxプライバシーポリシー