Kode VBA berikut dapat secara otomatis menambahkan salam yang dipersonalisasi saat membalas pesan di Outlook. Anda dapat melakukan sebagai berikut:

1. Pilih pesan email yang akan Anda balas.

2. tekan lain + F11 kunci untuk membuka jendela Microsoft Visual Basic for Applications.

3. Klik Menyisipkan > Modul, dan tempelkan kode VBA berikut ke jendela modul baru.

VBA: Balas dengan salam yang dipersonalisasi

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. tekan F5 Kunci atau klik Run tombol untuk menjalankan VBA ini. Ini akan memunculkan kotak dialog seperti gambar di bawah ini. Ketik 1 atau 2 berdasarkan kebutuhan Anda, lalu klik OK .

Ketik 1 untuk salam dengan nama penerima:	Ketik 2 untuk menyapa dengan waktu:

Note: Di Outlook 2013, kode VBA ini tidak berfungsi jika Anda membalas pesan di Panel Baca. Klik di sini untuk mengetahui cara menonaktifkan balasan di Panel Baca di Outlook 2013.

Beberapa pengguna mungkin tidak ingin menerapkan kode VBA di Outlook. Oleh karena itu saya perkenalkan metode kedua: Kutools for Outlook's Utilitas Ucapan Otomatis akan menambahkan salam yang dipersonalisasi dengan mudah di semua pesan balasan.

Kutools untuk Outlook menyederhanakan komunikasi email harian Anda melalui Outlook dengan menambahkan lusinan fitur praktis. Baca Selengkapnya      Download Gratis Sekarang

1. Klik Kutools > Opsi.

2. Pada kotak dialog Opsi pembuka, pergi ke membalas tab, periksa Tambahkan salam saat membalas pilihan, ketik Hi < >, ke dalam kotak di bawah, dan klik OK .

Mulai sekarang, saat membalas pesan di Outlook, salam yang dipersonalisasi akan ditambahkan secara otomatis ke badan email seperti yang ditunjukkan cuplikan layar berikut:

Note: Di Outlook 2013, utilitas ini tidak berfungsi jika Anda membalas pesan di Panel Baca. Klik di sini untuk mengetahui cara menonaktifkan balasan di Panel Baca di Outlook 2013.

Unduh Gratis Kutools untuk Outlook