Note: The other languages of the website are Google-translated. Back to English

Outlookで定期的なスケジュールの電子メールを送信するにはどうすればよいですか?

Microsoft Outlookでは、スケジュールの定期的な予定、会議、またはタスクを他のユーザーに簡単に送信できます。 しかし、予定、会議、タスクなしでスケジュールの定期的な電子メールを送信したいだけの場合、どうすればよいでしょうか。 残念ながら、Outlookには定期的なスケジュールの電子メールを送信する機能はありませんが、チュートリアルでは、Outlookで定期的なスケジュールの電子メールを送信する方法を説明します。

OutlookでVBAコードを使用してスケジュール定期メールを送信する

すばらしいツールを使用して、Outlookでスケジュールの定期的なメールを簡単に送信できます


OutlookでVBAコードを使用してスケジュール定期メールを送信する

このチュートリアルはXNUMXつのパートに分かれており、これらのパートを完了すると、スケジュールの定期的な電子メールを送信できます。 次のようにしてください。

パート1:新しい予定を作成する

1.に移動してください カレンダー クリックして表示 カレンダー ナビゲーションペイン、をクリックして新しい予定を作成します 新しい予定ホーム タブでを確認できます。

3。 の中に 任命 下のダイアログ 任命 タブ。 必要がある:

A:を入力してください 件名 B:受信者のメールアドレスを 所在地
C:構成 開始時刻終了時間 D:下のリマインダーを選択します リマインダー ドロップダウンリスト。
15分を選択すると、メールが送信されたときに15分早く通知されます。
E:アポイントメントボディを作成します。

注意予定の件名 定期的なメールの件名になります。 そしてその 任命機関 受信者が電子メールを受信すると、定期的な電子メールの本文になります。

パート2:新しいカテゴリを作成する

次に、「」という名前の新しいカテゴリを作成する必要があります。スケジュール定期メールを送信する" 次のように:

1。 の中に 任命 ダイアログをクリックしてください 分類する > すべてのカテゴリ タグ 下のグループ 任命 タブでを確認できます。

2。 いつ カラーカテゴリ ダイアログがポップアップします。クリックしてください New ボタン。 の中に 新しいカテゴリを追加 ダイアログに「スケジュール定期メールを送信する「中 お名前 フィールド; 次に、で色を選択します ドロップダウンリスト。 次に、をクリックします OK.

3.次に、「スケジュール定期メールを送信する」カテゴリがリストされているので、チェックボックスをオンにしてからクリックしてください OK ボタン。

パート3:繰り返しを設定する

さて、アポイントメントの繰り返しを設定する時が来ました。

1。 クリック 再発 オプション 下のグループ 任命 タブ。 スクリーンショットを参照してください:

2。 の中に 予定の再発 ダイアログで、 再発 パターン。 終了時間が必要な場合は、下で構成してください 再発の範囲。 そして、 OK.

3.に戻ったとき 任命 ダイアログをクリックしてください 保存して閉じる ボタン。 スクリーンショットを参照してください:

パート4:VBAコードを使用してSchedule RecurringEmailを送信する

1.を押してください 他の + F11 を開く アプリケーション向け Microsoft Visual Basic ダイアログ。

2.をダブルクリックします Project1 > MicrosoftOutlookオブジェクト > このOutlookSession 左側のペインで。 スクリーンショットを参照してください:

3.次のVBAコードをコピーしてVBAエディターに貼り付けます。 そして、 セールで節約 ボタン。

VBA:スケジュールの定期的なメールの送信

Private Sub Application_Reminder(ByVal Item As Object)
'Updated by Extendoffice 20200522
Dim xMailItem As MailItem
Dim xItemDoc As Word.Document
Dim xNewDoc As Word.Document
Dim xFldPath As String
On Error Resume Next
If Item.Class <> OlObjectClass.olAppointment Then Exit Sub
If Item.Categories <> "Send Schedule Recurring Email" Then Exit Sub
Set xMailItem = Outlook.Application.CreateItem(olMailItem)
Set xItemDoc = Item.GetInspector.WordEditor
xFldPath = CStr(Environ("USERPROFILE"))
xFldPath = xFldPath & "\MyReminder"
If Dir(xFldPath, vbDirectory) = "" Then
    MkDir xFldPath
End If
xFldPath = xFldPath & "\AppointmentBody.xml"
xItemDoc.SaveAs2 xFldPath, wdFormatXMLDocument ' wdFormatXML
Set xNewDoc = xMailItem.GetInspector.WordEditor
VBA.DoEvents
xNewDoc.Application.Selection.HomeKey
xNewDoc.Activate
xNewDoc.Application.Selection.InsertFile FileName:=xFldPath, Attachment:=False
With xMailItem
    .To = Item.Location
    .Recipients.ResolveAll
    .Subject = Item.Subject
    .Send
End With
Set xMailItem = Nothing
VBA.Kill xFldPath
End Sub

4。 クリック 工具 > リファレンス を開く リファレンス - 事業 ダイアログ。 ダイアログで、 MicrosoftWordオブジェクトライブラリ オプションをクリックして OK ボタン。

5。 プレス 他の + Q 同時にキーを閉じて アプリケーション向け Microsoft Visual Basic 窓。

リマインダー ポップアップすると、最初の部分の[場所]フィールドに入力した受信者に電子メールが自動的に送信されます。 次に、をクリックします 却下する リマインダー ダイアログ。 そして、この時間帯に毎日定期的にメールが送信されます。 スクリーンショットを参照してください:

注意:VBAコードは、Outlook2010以降のバージョンで正常にテストされました。


すばらしいツールを使用して、Outlookでスケジュールの定期的なメールを簡単に送信できます

多くのOutlookユーザーにとって、上記の方法は面倒で正しく処理できません。 ここで強くお勧めします 自動送信をスケジュールする の特徴 Outlook用Kutools。 この機能を使用すると、複数の定期的な電子メールを簡単に作成し、必要に応じて、これらの電子メールを毎日、毎週、毎月、または毎年の間隔で定期的に送信するようにスケジュールできます。 それを成し遂げるために次のようにしてください。

【マイアカウント】に移動し、【購入した商品を表示】をクリックします。 Outlook用Kutoolsをダウンロード そして試してみてください。

1。 クリック クツール > 自動送信をスケジュールする > 自動送信スケジュールを作成する.

2.次に、メッセージウィンドウが開き、次のことを行う必要があります。

2.1)でメールの受信者を選択します に、Cc or Bcc 必要に応じてフィールドに入力し、メールに記入してください 主題;
2.2)メール本文を作成します。
2.3)をクリック 再発Kutools繰り返し タブ。 スクリーンショットを参照してください:

3.今、 メールの繰り返し ダイアログボックスがポップアップします。指定する必要があります 繰り返し時間, 繰り返しパターン再発の範囲 メールの場合は、をクリックします OK ボタン。

4.メッセージウィンドウに戻りますので、をクリックします 保存して閉じる ボタンをクリックして、定期的な設定を保存し、ウィンドウを閉じます。

ヒント: 上記の手順1〜4を繰り返して、必要に応じて複数の定期的なメールを作成できます。

5.次に、をクリックして機能をオンにします クツール > 自動送信をスケジュールする > 有効にします。

6.オープニングで Outlook用Kutools ダイアログボックスで、をクリックします。 [OK]をクリックします。

上記の設定を完了すると、指定した日時に達すると、定期的なメールが自動的に送信されます。

注意: 定期的なメールは次のように簡単に管理できます。

1。 クリック クツール > 自動送信をスケジュールする > 自動送信スケジュールを管理する.

2。 の中に 自動送信スケジュールの管理 ウィンドウ、あなたは作成することができます 新製品 定期的なメール、 編集、削除、 オンにする or オフ 必要に応じて、既存の定期的なメール。 または、をクリックすることもできます ログ 定期的なメールの送信履歴を表示するアイコン。

この機能の詳細については、ここをクリックしてください.

  Outlook用Kutools MicrosoftOutlook用の100以上の強力な機能が含まれています。 60日以内に制限なしで無料でお試しいただけます。 ダウンロード中!


Kutools for Outlook-100の高度な機能をOutlookにもたらし、作​​業をはるかに簡単にします!

  • 自動CC / BCC メール送信時のルールによる。 自動転送 カスタムによる複数の電子メール。 自動返信 Exchangeサーバーなし、およびより多くの自動機能...
  • BCC警告 -全員に返信しようとするとメッセージを表示する メールアドレスがBCCリストにある場合; 添付ファイルがない場合に通知する、その他の機能を思い出させる...
  • メール会話のすべての添付ファイルで(すべて)返信; 多くのメールに返信する すぐに; あいさつを自動追加 返信するとき; 件名に日付を追加...
  • 添付ファイルツール:すべてのメールのすべての添付ファイルを管理し、 自動デタッチ, すべて圧縮、すべての名前を変更、すべて保存...クイックレポート、 選択したメールを数える...
  • 強力な迷惑メール 習慣による; 重複するメールと連絡先を削除する... Outlookでよりスマートに、より速く、より良くすることができます。
ショットkutoolsの見通しkutoolsタブ1180x121
ショットkutoolsの見通しkutoolsプラスタブ1180x121
 
コメントを並べ替える
コメント (167)
まだ評価はありません。 最初に評価してください!
このコメントは、サイトのモデレーターによって最小化されました
この方法は役に立ちました。 それは私がそれをテストしていたときに作成された最初のXNUMXつの予定のために働きました。 しかし、その後、動作を停止しました。
このコメントは、サイトのモデレーターによって最小化されました
同じ問題が発生しました。手順を複数回繰り返しましたが、まったく機能せず、メールも送信されません。修正できましたか?
このコメントは、サイトのモデレーターによって最小化されました
こんにちは私は上記の手順に従って定期的な電子メールを設定できましたが、予定の本文にハイパーリンクを作成したとき、イベントがトリガーされ、メールでメールを受け取ったときに、ハイパーリンクはRawリンクに変換されました。 どんな助けでも感謝します、ありがとう。
このコメントは、サイトのモデレーターによって最小化されました
ありがとうございました! これはうまくいきました。 送信される電子メールに添付ファイルを含める方法はありますか? カレンダーイベントに添付ファイルを追加してテストを試みましたが、メールに表示されません。
このコメントは、サイトのモデレーターによって最小化されました
添付ファイルを追加する方法について回答を得たことがありますか? ありがとう!
このコメントは、サイトのモデレーターによって最小化されました
これをテストメールで機能させることができましたが、今では何も実行されなくなり、すべてを削除して手順を繰り返しました。これには他に何かありますか? 2013年も見通しです
このコメントは、サイトのモデレーターによって最小化されました
私も同じ問題を抱えています。 これは初めて機能しましたが、定期的な予定のリマインダーがメールをトリガーしていないようです。 誰かがこの問題の解決策を見つけましたか?
このコメントは、サイトのモデレーターによって最小化されました
[quote]これをテストメールで機能させることができましたが、現在は何も実行されていません。すべてを削除して手順を繰り返しましたが、これ以上のことはありますか? 2013年も見通しですワンダフル[/ quote]これを解決したことはありますか? 私はこれを設定しただけで、あなたがしたのと同じことを見ています。 初めてうまくいきましたが、その後は何もしませんでした。
このコメントは、サイトのモデレーターによって最小化されました
デフォルトでオフになっているOutlookでマクロを有効にすることで、最終的にこれを整理しました。 私が今抱えている唯一の問題は、電子メールのテキストがプレーンテキストのみであり、太字、フォントサイズ、色の変更などが発生しないことです。 上記のコードを変更して、電子メールにRTFまたはHTMLテキストを含める方法はありますか?
このコメントは、サイトのモデレーターによって最小化されました
こんにちはあなたはこれを解決しましたか。 私は同じ問題を抱えていますこれを試しましたが、機能していません。 Sub SetMailFormat_2002_2003_2007_2010(ByRef mail As Object)Dim mailFormat As System.Int32 mailFormat = Convert.ToInt32(mail.GetType()。InvokeMember( "BodyFormat"、_ Reflection.BindingFlags.GetProperty、Nothing、mail、Nothing))'OlBodyFormat.olFormatUnspecific = 0'OlBodyFormat.olFormatPlain = 1'OlBodyFormat.olFormatHTML = 2'OlBodyFormat.olFormatRichText = 3 If(mailFormat = 1)Then mailFormat = 2 mail.GetType()。InvokeMember( "BodyFormat"、_ Reflection.BindingFlags.SetProperty、_ Nothing、mail、New Object(){mailFormat})End Sub Private Sub Application_Reminder(ByVal Item As Object)Dim MItem As MailItem Set MItem = Application.CreateItem(olMailItem)If Item.MessageClass "IPM.Appointment" Then Exit Sub If Item .Categories "Send Schedule Recurring Email" Then Exit Sub MItem.To = Item.Location MItem.Subject = Item.Subject MItem.Body = Item.Body MItem.Send Set MItem = Nothing End Sub
このコメントは、サイトのモデレーターによって最小化されました
[quote]デフォルトでオフになっているOutlookでマクロを有効にすることで、最終的にこれを整理しました。 私が今抱えている唯一の問題は、電子メールのテキストがプレーンテキストのみであり、太字、フォントサイズ、色の変更などが発生しないことです。 上記のコードを変更して、電子メールにRTFまたはHTMLテキストを含める方法はありますか?カイル[/quote]こんにちはこれに対する解決策を見つけましたか。 私はそれが必要です:)キム
このコメントは、サイトのモデレーターによって最小化されました
このような場合は、Windowsタスクスケジューラの使用を検討することもできます。 使いやすく、アタッチメントも扱えます。
このコメントは、サイトのモデレーターによって最小化されました
タスクを試してみましたが、添付ファイルがメールの本文に届かないため、何も得られません。 あなたがそれをどのようにしたか教えてください。
このコメントは、サイトのモデレーターによって最小化されました
どのコードを使用していますか? 添付ファイルはメールに添付されませんでした。
このコメントは、サイトのモデレーターによって最小化されました
どのようにそれをオフにしますか?
このコメントは、サイトのモデレーターによって最小化されました
頭のてっぺんから、定期的な電子メールの送信を停止するには、次のいずれかを実行できます。1.予定を完全に削除します。 2.設定したカテゴリを変更または削除します。 3.「終了期限」の日付を予定の繰り返しに適用します。
このコメントは、サイトのモデレーターによって最小化されました
定期的なメールを送信するには、Outlookを開いて実行する必要がありますか?
このコメントは、サイトのモデレーターによって最小化されました
このコードはOffice365-Outlook2013で機能しますか? 手順を数回実行し、マクロも有効にしました。 リマインダーを受け取り、却下を押しますが、メールが送信されません。
このコメントは、サイトのモデレーターによって最小化されました
ねえ、これをチェックしてください-私はあなたがこの機能を絶対に気に入ると思います..これ以上毎週のテンプレートメールはありません
このコメントは、サイトのモデレーターによって最小化されました
連絡先の配布リストに送信する方法はありますか?
このコメントは、サイトのモデレーターによって最小化されました
はいアーロン、私はこれを自分で行う必要がありました。 「スペックグループ」という配布リスト(Outlook連絡先グループ)を追加してみました。 これは送信されませんでした。 ただし、リスト名を「Spec @ Group」に変更して(実際の電子メールアドレスのように見せるため)、これは完全に機能しました。 ピックアップするには「@」が必要です。 ヤマ勘! :笑:
このコメントは、サイトのモデレーターによって最小化されました
これはうまくいきました。 複数のグループに移動するには、同じメールアドレスが必要です。 誰か助けてもらえますか? Private Sub Application_Reminder(ByVal Item As Object)Dim CF As Folder Set CF = Application.Session.GetDefaultFolder(olFolderContacts)Dim DLI As DistListItem Set DLI = CF.Items( "GDL Group 1")Dim MItem As MailItem Set MItem=Application。 CreateItem(olMailItem)If Item.MessageClass "IPM.Appointment" Then Exit Sub If Item.Categories "Recurring GDL Recert Email" Then Exit Sub MItem.To = DLI MItem.Subject = Item.Subject MItem.Body =Item.BodyMItem。 Set MItem = NothingEndSubを送信します
このコメントは、サイトのモデレーターによって最小化されました
すでに設定済みで、含めたい他の配布リストを含む/指す別の配布リストを作成します。
このコメントは、サイトのモデレーターによって最小化されました
コンピューターがなくなったときにOutlookで送信される電子メールをスケジュールすることは可能ですか。 たとえば、日曜日に月曜日の会議の予約リマインダーを送信したいのですが、日曜日は仕事をしていないので、仕事をしていないときにコンピューターがオフ? ありがとう!
このコメントは、サイトのモデレーターによって最小化されました
Alt&F11を押してもVBAコードが表示されませんでした。 Microsoft Visual Basic for Applicationsを起動できましたが、コードがありませんでした。 あなたがアドバイスしていただけますか? ありがとう、ラジ
このコメントは、サイトのモデレーターによって最小化されました
こんにちはRaj、VBAコードは存在しないはずです。 上記のガイドに従うと、「ThisOutlookSession」をダブルクリックすると空になっているはずです。 ガイドに示されているコードをコピーして「ThisOutlookSession」ウィンドウに貼り付けてから保存する必要があります。 お役に立てれば。
このコメントは、サイトのモデレーターによって最小化されました
こんにちは、すべての手順を実行して保存し、別のメールを作成します。コードは前回から残っています。 カテゴリに添付されているコードが選択されているので、各メールにコードを追加する必要はありませんか?
このコメントは、サイトのモデレーターによって最小化されました
こんにちはボニー、VBAコードは一度だけ追加する必要があります(最初の定期的な電子メールの場合)。 複数の定期的な電子メールを設定する場合は、その手順を見逃してください。
このコメントは、サイトのモデレーターによって最小化されました
私はOffice2016を持っており、あなたの指示に正確に従ってこれを試しました。 機能した!! どうもありがとう。 Outlook 2016とVBAエディターでマクロのセキュリティ設定を変更して機能させる必要がありましたが、変更すると、手順は簡単に流れました。
このコメントは、サイトのモデレーターによって最小化されました
こんにちは、Outlookのマクロセキュリティ設定をどのように変更しましたか?また、何に変更しましたか?
このコメントは、サイトのモデレーターによって最小化されました
つまり、XNUMXつあります。XNUMXつは私が書いた方法では表示されません。IEには太字はありません。XNUMXつは署名を追加する方法です。 通常の署名ではなくハイパーリンクとして表示されるためです。 助けてくれてありがとう。
このコメントは、サイトのモデレーターによって最小化されました
Alex Mineは、フォーマットも削除された状態で表示されます。 どうやってそれを保つのですか?
このコメントは、サイトのモデレーターによって最小化されました
それはうまく送信されましたが、それは私の電子メール本文にあるすべての凝ったフォーマットを落としました。 このフォーマットを維持するにはどうすればよいですか?
このコメントは、サイトのモデレーターによって最小化されました
エクセルのスプレッドシートを添付する方法を知る必要がありますか?
このコメントは、サイトのモデレーターによって最小化されました
やあみんな。 このコードはうまく機能しますが、少し問題があります。 私が送信しようとしている電子メールは、メッセージの送信(マクロが使用)とPROGRAMARIRED-TEAMの14つのカテゴリの一部です。 [メッセージの送信]カテゴリのみを追加するとマクロは正常に機能しますが、他のカテゴリが追加されるとすぐに、マクロは電子メールの送信を停止します。 これがこれまでのコードです。 助けてください:P Private Sub Application_Reminder(ByVal Item As Object)Dim objMsg As MailItem Set objMsg = Application.CreateItem(olMailItem)'IPM.TaskItem to watch the Task Reminders If Item.MessageClass "IPM.Appointment" Then Exit Sub End If If Item.Categories "Send Message" Then Exit Sub End If objMsg.To = Item.Location objMsg.BCC = "andrei.buldus@promotor.ws" objMsg.Subject = "Instiintare expirare Autorizatie / Contract Service" objMsg.Body = "Buna ziua、 "&vbNewLine&vbNewLine&_" Conform bazei noastre de date、autorizatia / Contractul de service、incheiat intre compania nostra si "+ Item.Subject +" urmeaza saexpire in termen deXNUMXzile。 " &vbNewLine&_ "Acest lucru este in atentia departamentului nostru Service、si urmeaza sa fiti contactati in cel mai scurt timp posibil pentru a stabili cursulactiunilorviitoare。" &vbNewLine&vbNewLine&_ "Va multumim pentruincredereaacordata。" &vbNewLine&_ "Promotor Import Export SRL"&vbNewLine&vbNewLine&vbNewLine&_ "Acesta este unmesajautomat。" objMsg.Send Set objMsg = Nothing End Sub
このコメントは、サイトのモデレーターによって最小化されました
行が原因で停止しています....IfItem.Categories <> "Send Schedule Recurring Email" Then Exit Sub
他のカテゴリを追加すると、exit subがキューになります。おそらくinstr(1、item.categories、 "Send Schedule Recurring Email")= 0の場合、exitsubなどを使用します。
ここにはまだコメントが投稿されていません
もっと読み込む
あなたのコメントを残す
ゲストとして投稿
×
この投稿を評価:
0   文字
推奨される場所