How to auto add personalized greeting when replying in Outlook?
Normally when replying an email message in Outlook, we have to manually add greeting. Actually, the original message contains the recipient's information, such as the sender name. And in this article I will introduce two methods to automatically add personalized greeting when replying in Outlook.
Auto add personalized greeting when replying with VBA
The following VBA code can automatically add personalized greeting when replying messages in Outlook. You can do as follows:
1. Select the email message that you will reply.
2. Press the Alt + F11 keys to open the Microsoft Visual Basic for Applications window.
3. Click the Insert > Module, and paste following VBA code into the new module window.
VBA: Reply with personalized greeting
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)
Set oMItem = ActiveExplorer.Selection.Item(1)
Set oMItem = ActiveInspector.CurrentItem
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"
sGreetName = "Good evening"
Set oMItemReply = oMItem.Reply
.HTMLBody = "<span style=""font-size : 10pt""><p>Hi " & sGreetName & ",</p></span>" & .HTMLBody
Set oMItem = Nothing
Set oMItemReply = Nothing
4. Press the F5 Key or click Run button to run this VBA. It will pop up a dialog box as below screen shot shown. Type 1 or 2 based on your needs, and then click OK button.
Auto add personalized greeting when replying with Kutools for Outlook
Some users might not like to apply VBA code in Outlook. Therefore I introduce the second method: Kutools for Outlook's Auto Greeting utility will add personalized greeting easily in all replying messages.
Kutools for Outlook simplifies your daily email communication through Outlook by adding dozens of handy features. Read More Free Download Now
1. Click the Kutools > Options.
2. In the opening Options dialog box, go to the Reply tab, check the Add greeting when reply option, type Hi <<SenderName>>, into the below box, and click the OK button.
From now on, when replying messages in Outlook, the personalized greeting will be added automatically into the email body as following screen shot shown:
Select Duplicate or Unique Rows; Select Blank Rows (all cells are empty); Super Find and Fuzzy Find in Many Workbooks; Random Select...
Exact Copy Multiple Cells without changing formula reference; Auto Create References to Multiple Sheets; Insert Bullets, Check Boxes and more...
Extract Text, Add Text, Remove by Position, Remove Space; Create and Print Paging Subtotals; Convert Between Cells Content and Comments...
Super Filter (save and apply filter schemes to other sheets); Advanced Sort by month/week/day, frequency and more; Special Filter by bold, italic...
Combine Workbooks and WorkSheets; Merge Tables based on key columns; Split Data into Multiple Sheets; Batch Convert xls, xlsx and PDF...
More than 300 powerful features. Supports Office/Excel
2007-2019 and 365. Supports all languages. Easy deploying in your enterprise or organization. Full features
30-day free trial. 60-day money back guarantee.