Outlook’ta yanıt verirken kişiselleştirilmiş selamı otomatik olarak nasıl ekleyebilirim?
Genellikle Outlook’ta bir e-postayı yanıtlarken selamı manuel olarak eklemek zorunda kalırız. Oysa orijinal ileti, Gönderen Adı gibi alıcının bilgilerini zaten içerir. Bu makalede, Outlook’ta yanıt verirken kişiselleştirilmiş selamı otomatik olarak eklemek için iki pratik yöntem sunuyorum.
VBA ile yanıt verirken kişiselleştirilmiş selamı otomatik ekleme
Kutools for Outlook ile yanıt verirken kişiselleştirilmiş selamı otomatik ekleme
VBA ile yanıt verirken kişiselleştirilmiş selamı otomatik ekleme
Aşağıdaki VBA kodu, Outlook’ta iletileri yanıtlarken kişiselleştirilmiş bir selamı otomatik olarak eklemenizi sağlar. Bunun için aşağıdaki adımları izleyebilirsiniz:
1. Yanıtlayacağınız e-posta iletisini seçin.
2. Microsoft Visual Basic for Applications penceresini açmak için Alt+F11 tuşlarına basın.
3. Yeni modül penceresine aşağıdaki VBA kodunu yapıştırmak için Ekle > Modül seçeneğine tıklayın.
VBA: Kişiselleştirilmiş selamla yanıt verme
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 Sub4. Bu VBA kodunu çalıştırmak için F5 tuşuna basın veya Çalıştır düğmesine tıklayın. Aşağıdaki ekran görüntüsünde gösterildiği gibi bir iletişim kutusu açılacaktır. İhtiyacınıza göre 1 veya 2 yazın ve ardından Tamam düğmesine tıklayın.
| Alıcı adıyla selamlama için 1 yazın: | Günün saatiyle selamlama için 2 yazın: |
 |  |
Not: Outlook 2013 sürümünde bu VBA kodu, Okuma Bölmesi’nden iletiye yanıt verirseniz çalışmaz. Outlook 2013’te Okuma Bölmesi’nden yanıtlamayı devre dışı bırakma hakkında daha fazla bilgi için buraya tıklayın.
Kutools for Outlook ile yanıt verirken kişiselleştirilmiş selamı otomatik ekleme
Bazı kullanıcılar Outlook’a VBA kodu uygulamak istemeyebilir. Bu nedenle ikinci bir yöntemi sizlere tanıtmak istiyorum: Kutools for Outlook’un Otomatik Selam Aracı, tüm yanıt iletilerine kolayca kişiselleştirilmiş selamlar eklemenizi sağlar.
Kutools for Outlook, onlarca kullanışlı özelliği ekleyerek Outlook üzerinden günlük e-posta iletişimlerinizi kolaylaştırır.Daha Fazla Bilgi Edinin Şimdi Ücretsiz İndirin
1. Kutools > Seçenekler seçeneğine tıklayın.
2. Açılan Seçenekler iletişim kutusunda Yanıtla sekmesine gidin, E-postaları oluştururken, yanıtlarken veya iletileri iletirken otomatik olarak selamlama ekleyin seçeneğini işaretleyin, aşağıdaki kutuya ihtiyacınıza göre >, > veya > gibi yer tutucuları içeren selam metnini özelleştirin ve Tamam düğmesine tıklayın.
Artık Outlook’ta iletilere yanıt verdiğinizde, kişiselleştirilmiş selam aşağıdaki ekran görüntüsünde gösterildiği gibi e-posta gövdesine otomatik olarak eklenecektir:
Not: Outlook 2013 sürümünde bu araç, Okuma Bölmesi’nden iletiye yanıt verirseniz çalışmaz. Outlook 2013’te Okuma Bölmesi’nden yanıtlamayı devre dışı bırakma hakkında bilgi almak için buraya tıklayın.
En İyi Office Verimlilik Araçları
Excel becerilerinizi Kutools for Excel ile güçlendirin ve hiç yaşamadığınız bir verimlilik deneyimi yaşayın.Kutools for Excel, verimliliği artırmak ve Zamanı Kaydet için 300’den fazla gelişmiş özelliğe sahiptir.İhtiyacınız olan özelliği hemen edinmek için buraya tıklayın…
Office Tab, Office uygulamalarına sekmeli arayüz getirir ve işlerinizi çok daha kolay hale getirir
- Word, Excel, PowerPoint, Publisher, Access, Visio ve Project'te sekmeli düzenleme ve okuma özelliğini etkinleştirin.
- Birden fazla belgeyi yeni pencerelerde değil, aynı pencerenin yeni sekmelerinde açın ve oluşturun.
- Günlük verimliliğinizi %50 artırır ve her gün yüzlerce fare tıklamasından tasarruf etmenizi sağlar!
Tüm Kutools eklentileri, tek bir yükleyiciyle!
Kutools for Office paketi, Excel, Word, Outlook ve PowerPoint için eklentileriyle birlikte Office Tab Pro’yu da içerir; bu da Office uygulamalarında çalışan ekipler için idealdir.
- Hepsi-bir-arada paket— Excel, Word, Outlook ve PowerPoint eklentileri + Office Tab Pro
- Tek yükleyici, tek lisans— birkaç dakikada kurulum (MSI uyumlu)
- Birlikte daha iyi çalışır— Office uygulamaları arasında akıcı verimlilik
- 30 günlük tam özellikli deneme— kayıt gerekmez, kredi kartı gerekmez
- En iyi fiyat-performans— tek tek eklenti satın alımına göre tasarruf edin