定期的に送信するようなメールで、日付だけ変えたいという場合があります。そういう場合のためにマクロを作ってみました。 このマクロは TEMPLATE_FILE で指定したファイル (下記の例では c:\temp\test.otf) をテンプレートとして開き、件名と本文に含まれる yyyy/mm/dd という文字列をマクロを実行した日付に置き換えます。 Public Sub OpenTemplateWithDate() Const TEMPLATE_FILE = "c:\temp\test.oft" Dim objItem As MailItem Dim dtShort dtShort = FormatDateTime(Now, vbShortDate) Set objItem = Application.CreateItemFromTemplate(TEMPLATE_FILE) objIte