PC起動時に自動作成される勤務開始メールの作り方

勤務開始のような毎朝送るメールを、簡単に作りたいなーと思ったことありませんか？

今回は、PCを起動した時にメールを自動作成する方法を紹介します！

さかい

はじめまして、さかいと申します。
インスタで『自動化オタクの仕事術』を紹介している自分が解説させていただきます！

イメージ
vbsファイルの作成
まとめ

イメージ

PCの電源をつけると、以下のメールが作成されます

件名の日付は、当日の日付を自動で設定するようにしています

あとは送信ボタンを押すだけなので、ちょっとした時短になるかなと思います

vbsファイルの作成

早速、ファイルの作り方を解説していきます！

1.メモ帳を起動

2.メモ帳に以下のコードを貼り付け

宛先やタイトル、メール本文は作成したい文章に修正してください

日付が件名や本文に不要な場合は、今日の日付を取得とcurrentDateを削除するとOKです

Set objOutlook = CreateObject("Outlook.Application")
Set objMail = objOutlook.CreateItem(0)

' 今日の日付を取得
currentDate = Month(Date) & "/" & Day(Date)

' メールの設定
objMail.To = "test.com"
objMail.Subject = currentDate & " さかい 勤務開始"
objMail.Body = "本日の業務を開始します。"

' メールを表示
objMail.Display

' オブジェクトを解放
Set objMail = Nothing
Set objOutlook = Nothing