Outlook'ta tüm giden iletiler için otomatik olarak kartvizit nasıl eklenir?

Bazı durumlarda, alıcıların bilgilerinizi hızlı ve kolay bir şekilde adres defterlerine kaydedebilmeleri için tüm giden mesajlar için vCard'ınızı göndermek isteyebilirsiniz. Outlook'ta bu görevi aşağıdaki yöntemlerle olabildiğince çabuk çözebilirsiniz.

İmza oluşturarak tüm giden mesajlar için otomatik olarak kartvizit ekleyin

VBA kodunu kullanarak tüm giden mesajlar için otomatik olarak kartvizit ekleyin

İmza oluşturarak tüm giden mesajlar için otomatik olarak kartvizit ekleyin

Normalde vCard'ınızın imzasını oluşturabilir ve ardından imzayı her zaman açabilirsiniz. Lütfen şu şekilde yapın:

1. Yeni bir e-posta oluşturun, yeni mesaj penceresinde Ekle > imza, ekran görüntüsüne bakın:

2. Dışarı çıkan İmza ve Kırtasiye iletişim kutusunun altında E-posta İmzası sekmesini tıklayın yeni düğmesine basın ve bu yeni imza için bir ad girin, ekran görüntüsüne bakın:

3. Daha sonra, OK kapatmak için Yeni İmza iletişim kutusunda, bu yeni imza adını seçin Düzenlenecek imzayı seçin liste kutusunu seçin ve ardından Kartvizit, ekran görüntüsüne bakın:

4. In Kartvizit Takın iletişim kutusunda, iletişim klasörünü seçin. Arama konumu açılır liste, ardından aşağıdaki liste kutusunda belirtilen kartviziti seçin, ekran görüntüsüne bakın:

5. Daha sonra, OK bu iletişim kutusunu kapatmak ve İmza ve Kırtasiye iletişim kutusunda, yeni imza adını seçmeye devam edin ve ardından bu imzayı otomatik olarak eklemek istediğiniz e-posta hesabını E-posta hesabı açılır liste. Ardından, yeni oluşturulan imza adını seçin. Yeni mesajlar açılır liste.

İpuçları: Her yanıt ve iletiye vCard eklemek istiyorsanız, lütfen yeni imza adını vCard ile seçin. Cevaplar / iletiler liste.

6. Ayarları tamamladıktan sonra lütfen tıklayın OK buton. Şu andan itibaren, yeni bir mesaj oluşturduğunuzda, belirtilen kartvizit mesaj gövdesine eklenecek ve aynı anda ek olarak eklenecektir, bkz. ekran görüntüsü:

VBA kodunu kullanarak tüm giden mesajlar için otomatik olarak kartvizit ekleyin

Tüm giden mesajlara kartvizit eklemek için, kartviziti bir vcf dosyası olarak kaydedebilir ve ardından otomatik olarak ek olarak eklemek için bir VBA kodu uygulayabilirsiniz. Lütfen aşağıdaki adımlarla yapın:

1. Gidin İnsanlar bölmesinde, kartvizit olarak göndermek istediğiniz kişiyi seçin.

2. Ardından, tıklayın fileto > Farklı Kaydet, Farklı Kaydet penceresinde bu kartı koymak için bir yer belirtin ve ardından kutucuğa bir ad yazın. dosya adı metin kutusunu seçin ve vCard Dosyaları itibaren Olarak kaydet aşağı açılır yazın, ekran görüntüsüne bakın:

3. Ve sonra, basılı tutun ALT + F11 tuşlarını açmak için Uygulamalar için Microsoft Visual Basic pencere.

4. Ardından çift tıklayın Bu OutlookOturumu itibaren Proje-Proje1 bölmesini açın ve ardından aşağıdaki kodu kopyalayıp boş kod penceresine yapıştırın:

VBA kodu: Tüm giden mesajlar için otomatik olarak kartvizit ekleyin

Public WithEvents GInpectors As Inspectors
Private Sub Application_Startup()
  Set GInpectors = Application.Inspectors
End Sub
Private Sub GInpectors_NewInspector(ByVal Inspector As Inspector)
'Updateby ExtendOffice
Dim xMail As MailItem
Dim xSubject As String
On Error Resume Next
If Inspector.CurrentItem.Class <> olMail Then Exit Sub
Set xMail = Inspector.CurrentItem
xSubject = VBA.UCase$(xMail.Subject)
If (VBA.InStr(xSubject, "RE: ") = 1) Or (VBA.InStr(xSubject, "FW: ") = 1) Then Exit Sub
With xMail
  .Attachments.Add "C:\Users\Desktop\Leonel Davis.vcf"
End With
End Sub

not: Yukarıdaki kodda, C:\Kullanıcılar\Masaüstü\Leonel Davis.vcf kaydettiğiniz kartvizitinizin dosya yoludur, lütfen ihtiyacınıza göre değiştirin.