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

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

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

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

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

OfficeタブOfficeでタブ付きの編集と閲覧を有効にし、作業をはるかに簡単にします...
Kutools for Excelはほとんどの問題を解決し、生産性を80%向上させます
  • 何でも再利用: 最もよく使用される、または複雑な数式、グラフなどをお気に入りに追加して、後ですぐに再利用できます。
  • 20以上のテキスト機能: テキスト文字列から数値を抽出します。 テキストの一部を抽出または削除します。 数字と通貨を英語の単語に変換します。
  • マージツール:複数のワークブックとシートをXNUMXつに。 データを失うことなく複数のセル/行/列をマージします。 重複する行と合計をマージします。
  • 分割ツール:値に基づいてデータを複数のシートに分割します。 XNUMXつのワークブックから複数のExcel、PDF、またはCSVファイル。 XNUMX列から複数列。
  • 貼り付けスキップ 非表示/フィルタリングされた行; カウントと合計 背景色別; パーソナライズされた電子メールを複数の受信者にまとめて送信します。
  • スーパーフィルター: 高度なフィルタースキームを作成し、任意のシートに適用します。 並び替え 週、日、頻度など。 フィルタ 太字、数式、コメント...
  • 300以上の強力な機能。 Office2007-2019および365で動作します。 すべての言語をサポートします。 企業や組織に簡単に導入できます。

矢印青い右バブル 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:

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


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

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

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

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

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

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

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

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


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

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


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

Kutools for Excelはほとんどの問題を解決し、生産性を80%向上させます

  • 再利用: すばやく挿入 複雑な数式、チャート および以前に使用したものすべて。 セルを暗号化する パスワード付き。 メーリングリストを作成する そしてメールを送る...
  • スーパーフォーミュラバー (複数行のテキストと数式を簡単に編集できます); 読書レイアウト (多数のセルを簡単に読み取って編集する); フィルター範囲に貼り付け...
  • セル/行/列をマージする データを失うことなく; 分割セルコンテンツ; 重複する行/列を組み合わせる...重複セルを防止します。 範囲を比較する...
  • [複製]または[一意]を選択します 行; 空白行を選択 (すべてのセルは空です); スーパーファインドとファジーファインド 多くのワークブックで; ランダム選択...
  • 正確なコピー 数式参照を変更せずに複数のセル。 参照の自動作成 複数のシートに; 箇条書きを挿入、チェックボックスなど...
  • テキストを抽出、テキストの追加、位置による削除、 スペースを削除する; ページング小計の作成と印刷。 セルの内容とコメントを変換する...
  • スーパーフィルター (フィルタースキームを保存して他のシートに適用します); 高度な並べ替え 月/週/日、頻度など。 特殊フィルター 太字、斜体...
  • ワークブックとワークシートを組み合わせる; キー列に基づいてテーブルをマージします。 データを複数のシートに分割; xls、xlsx、PDFをバッチ変換...
  • 300以上の強力な機能。 Office / Excel2007-2019および365をサポートします。すべての言語をサポートします。 企業や組織に簡単に導入できます。 全機能30日間の無料トライアル。 60日間の返金保証。
kteタブ201905

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

  • Word、Excel、PowerPointでタブ付きの編集と読み取りを有効にする、パブリッシャー、アクセス、Visioおよびプロジェクト。
  • 新しいウィンドウではなく、同じウィンドウの新しいタブで複数のドキュメントを開いて作成します。
  • 生産性が50%向上し、毎日何百ものマウスクリックが減ります。
officetab下部
コメントを並べ替える
コメント (1)
まだ評価はありません。 最初に評価してください!
このコメントは、サイトのモデレーターによって最小化されました
こんにちは、Plは、受信者の名だけを持ち、挨拶は「こんにちは」だけになるように上記を編集するのを手伝ってもらえますか? 例:送信者の電子メールがMark.James@xxx.comの場合、返信には次のようになります-こんにちはジョン
ここにはまだコメントが投稿されていません
あなたのコメントを残す
ゲストとして投稿
×
この投稿を評価:
0   文字
推奨される場所