メインコンテンツへスキップ

Outlookで返信するときにパーソナライズされたグリーティングを自動追加するにはどうすればよいですか?

通常、Outlookで電子メールメッセージに返信するときは、手動で挨拶を追加する必要があります。 実際には、元のメッセージには、送信者名などの受信者の情報が含まれています。 また、この記事では、Outlookで返信するときにパーソナライズされた挨拶を自動的に追加するXNUMXつの方法を紹介します。

VBAで返信するときにパーソナライズされた挨拶を自動追加

Outlook用Kutoolsで返信するときにパーソナライズされた挨拶を自動追加


矢印青い右バブル VBAで返信するときにパーソナライズされた挨拶を自動追加

次のVBAコードは、Outlookでメッセージに返信するときに、パーソナライズされたグリーティングを自動的に追加できます。 次のように実行できます。

1.返信する電子メールメッセージを選択します。

2。 プレス 他の + F11 キーを押して、Microsoft Visual Basic forApplicationsウィンドウを開きます。

3。 クリック インセット > モジュール、次のVBAコードを新しいモジュールウィンドウに貼り付けます。

VBA:パーソナライズされた挨拶で返信する

Sub ReplyWithGreeting()
Dim oMItem As Outlook.MailItem
Dim oMItemReply As Outlook.MailItem
Dim sGreetName As String
Dim iGreetType As Long
On Error Resume Next
Select Case TypeName(Application.ActiveWindow)
Case "Explorer"
Set oMItem = ActiveExplorer.Selection.Item(1)
Case "Inspector"
Set oMItem = ActiveInspector.CurrentItem
Case Else
End Select
On Error GoTo 0
If oMItem Is Nothing Then GoTo ExitProc
On Error Resume Next
iGreetType = InputBox("How to greet:" & vbCr & vbCr & "Type '1' for name, '2' for time of day")
On Error GoTo 0
If iGreetType = False Then GoTo ExitProc
If iGreetType = 1 Then
sGreetName = oMItem.SenderName
ElseIf iGreetType = 2 Then
Select Case Time
Case Is < 0.5
sGreetName = "Good morning"
Case 0.5 To 0.75
sGreetName = "Good afternoon"
Case Else
sGreetName = "Good evening"
End Select
Else
GoTo ExitProc
End If
Set oMItemReply = oMItem.Reply
With oMItemReply
.HTMLBody = "<span style=""font-size : 10pt""><p>Hi " & sGreetName & ",</p></span>" & .HTMLBody
.Display
End With
ExitProc:
Set oMItem = Nothing
Set oMItemReply = Nothing
End Sub

4。 プレス F5 キーまたはクリック ラン このVBAを実行するためのボタン。 以下のスクリーンショットのようにダイアログボックスが表示されます。 必要に応じて1または2と入力し、[ OK

受信者名で挨拶する場合は1を入力します。 時刻付きの挨拶のタイプ2:

Note:Outlook 2013では、閲覧ウィンドウでメッセージに返信すると、このVBAコードは機能しません。 クリック Outlook2013の閲覧ウィンドウで返信を無効にする方法についてはこちらをご覧ください.


矢印青い右バブル Outlook用Kutoolsで返信するときにパーソナライズされた挨拶を自動追加

一部のユーザーは、OutlookでVBAコードを適用したくない場合があります。 したがって、XNUMX番目の方法を紹介します:Outlook用のKutools 自動グリーティングユーティリティ すべての返信メッセージにパーソナライズされた挨拶を簡単に追加します。

Outlook用Kutools 多数の便利な機能を追加することにより、Outlookを介した毎日の電子メール通信を簡素化します。 続きを読む      今すぐダウンロード

1。 クリック クツール > オプション.

2. [オプション]ダイアログボックスを開いて、[ 返信 タブ、チェック 返信時に挨拶を追加 オプション、タイプHi < >、下のボックスに入力し、をクリックします OK

今後、Outlookでメッセージに返信すると、次のスクリーンショットのように、パーソナライズされた挨拶が電子メールの本文に自動的に追加されます。

Note:Outlook 2013では、閲覧ウィンドウでメッセージに返信すると、このユーティリティは機能しません。 クリック Outlook2013の閲覧ウィンドウで返信を無効にする方法についてはこちらをご覧ください.

Outlook用Kutoolsを無料でダウンロード


デモ:Outlookで返信するときにパーソナライズされた挨拶を自動追加する

先端: このビデオで、 クツール タブはによって追加されます Outlook用Kutools。 必要な場合はクリックしてください こちらをクリックすると、ツールが開きます。 無制限に60日間の無料トライアルがあります!

最高のオフィス生産性向上ツール

人気の機能: 重複を検索、強調表示、または識別する   |  空白行を削除する   |  データを失わずに列またはセルを結合する   |   数式なしのラウンド ...
スーパールックアップ: 複数の基準の VLookup    複数の値の VLookup  |   複数のシートにわたる VLookup   |   ファジールックアップ ....
詳細ドロップダウン リスト: ドロップダウンリストを素早く作成する   |  依存関係のドロップダウン リスト   |  複数選択のドロップダウンリスト ....
列マネージャー: 特定の数の列を追加する  |  列の移動  |  Toggle 非表示列の表示ステータス  |  範囲と列の比較 ...
注目の機能: グリッドフォーカス   |  デザインビュー   |   ビッグフォーミュラバー    ワークブックとシートマネージャー   |  リソースライブラリ (自動テキスト)   |  日付ピッカー   |  ワークシートを組み合わせる   |  セルの暗号化/復号化    リストごとにメールを送信する   |  スーパーフィルター   |   特殊フィルター (太字/斜体/取り消し線をフィルター...) ...
上位 15 のツールセット12 テキスト 工具 (テキストを追加, 文字を削除する、...)   |   50+ チャート 種類 (ガントチャート、...)   |   40+ 実用的 (誕生日に基づいて年齢を計算する、...)   |   19 挿入 工具 (QRコードを挿入, パスから画像を挿入、...)   |   12 変換 工具 (数字から言葉へ, 通貨の換算、...)   |   7 マージ&スプリット 工具 (高度な結合行, 分割セル、...)   |   ... もっと

Kutools for Excel で Excel スキルを強化し、これまでにない効率を体験してください。 Kutools for Excelは、生産性を向上させ、時間を節約するための300以上の高度な機能を提供します。  最も必要な機能を入手するにはここをクリックしてください...

kteタブ201905


Officeタブは、タブ付きのインターフェイスをOfficeにもたらし、作​​業をはるかに簡単にします

  • Word、Excel、PowerPointでタブ付きの編集と読み取りを有効にする、パブリッシャー、アクセス、Visioおよびプロジェクト。
  • 新しいウィンドウではなく、同じウィンドウの新しいタブで複数のドキュメントを開いて作成します。
  • 生産性を 50% 向上させ、毎日何百回もマウス クリックを減らすことができます!
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi, Pl can you help to edit the above to have only first name of the recipient and the greetings shall be 'Hi' only? Example:if senders e-mail is , my reply should have - Hi John
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations