Not: Web sitesinin diğer dilleri Google tarafından çevrilmiştir. İngilizceye dön
Oturum aç  \/ 
x
or
x
Kaydol  \/ 
x

or

Outlook'ta orijinal e-posta mesajıyla otomatik olarak nasıl yanıtlanır?

Normalde, e-postayı ofis dışında otomatik olarak kullanmak için bir kural oluşturduğumuzda, ancak gövdedeki orijinal mesaj dahil edilmeyecektir. Outlook'ta orijinal mesaj içeren e-postalara otomatik olarak nasıl güvenebilirsiniz? Bu makalede, Outlook'ta bu işi olabildiğince çabuk bitirmenize yardımcı olacak bir VBA kodundan bahsedeceğim.

VBA kodu ile görünümde orijinal mesajla otomatik yanıt e-postaları


VBA kodu ile görünümde orijinal mesajla otomatik yanıt e-postaları

Normal Outlook kuralı, işle başa çıkmanıza yardımcı olamaz, ancak aşağıdaki VBA kodu ile bunu hızlı ve kolay bir şekilde bitirebilirsiniz. Lütfen şunu yapın:

1. Basılı tutun ALT + F11 tuşlarını açmak için Uygulamalar için Microsoft Visual Basic pencere.

2. In Uygulamalar için Microsoft Visual Basic pencere, çift tıklama ThisOutlookSession dan Proje1 (VbaProject.OTM) bölmesini açın ve ardından aşağıdaki kodu kopyalayıp boş modüle yapıştırın.

VBA kodu: Orijinal mesajla otomatik yanıt e-postaları:

Public WithEvents xlItems As Outlook.Items
Private Sub Application_Startup()
    Set xlItems = Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub xlItems_ItemAdd(ByVal objItem As Object)
Dim xlReply As MailItem
Dim xStr As String
If objItem.Class <> olMail Then Exit Sub
Set xlReply = objItem.Reply
With xlReply
     xStr = "<p>" & "Hi, Your email has been received. Thank you!" & "</p>"
     .HTMLBody = xStr & .HTMLBody
     .Send
End With
End Sub 

3. Ardından kod penceresini kaydedin ve kapatın, VBA kodunun etkili olması için Outlook'u kapatın veya yeniden başlatın. Şimdi, e-posta aldığınızda, Outlook, gösterilen aşağıdaki ekran görüntüsü gibi orijinal mesajla otomatik bir yanıt gönderecek:


Outlook için Kutools - Outlook'a 100 Gelişmiş Özellik Getirir ve Çalışmayı Çok Daha Kolay Hale Getirir!

  • Otomatik CC / BCC e-posta gönderirken kurallara göre; Otomatik İleri Özel olarak birden çok E-posta; Otomatik cevap değişim sunucusu olmadan ve daha fazla otomatik özellik ...
  • BCC Uyarısı - tümünü yanıtlamaya çalıştığınızda mesaj göster posta adresiniz BCC listesindeyse; Eksik Olduğunda Hatırlatve daha fazlası özellikleri hatırlat ...
  • Posta görüşmesindeki Tüm Eklerle Yanıtla (Tümü); Birçok E-postayı Yanıtla saniyeler içinde; Otomatik Karşılama Ekleme cevap verdiğinde; Konuya Tarih Ekle ...
  • Ek Araçları: Tüm Postalardaki Tüm Ekleri Yönetin, Otomatik Ayır, Tümünü Sıkıştır, Tümünü Yeniden Adlandır, Tümünü Kaydet ... Hızlı Rapor, Seçili Postaları Say...
  • Güçlü Önemsiz E-postalar özel olarak; Yinelenen Postaları ve Kişileri Kaldır... Outlook'ta daha akıllı, daha hızlı ve daha iyi yapmanızı sağlar.
shot kutools görünüm kutools sekmesi 1180x121
shot kutools görünüm kutools artı sekme 1180x121
 

Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.