如何在 Outlook 中自動為所有外發郵件附加名片？

在某些情況下，您可能希望為所有外發郵件發送您的 vCard，以便收件人可以快速輕鬆地將您的信息保存在他們的地址簿中。 在 Outlook 中，您可以使用以下方法盡快解決此任務。

通過創建簽名自動為所有傳出消息附加名片

使用 VBA 代碼自動為所有傳出消息附加名片

通過創建簽名自動為所有傳出消息附加名片

通常，您可以為您的 vCard 創建一個簽名，然後始終打開該簽名。 請這樣做：

1. 創建新電子郵件，在新消息窗口中，單擊 插入 > 簽名，請參見屏幕截圖：

2。 在彈出的 簽名和文具 對話框中的 電子郵件簽名 標籤，點擊 全新 按鈕，然後輸入這個新簽名的名稱，看截圖：

3。 然後，點擊 OK 關閉 新簽名 對話框中，從 選擇要編輯的簽名 列錶框，然後單擊 名片，請參見屏幕截圖：

4。 在 插入名片 對話框中，從 在看 下拉列表，然後在下面的列錶框中選擇指定的名片，看截圖：

5。 然後，點擊 OK 關閉此對話框，然後返回 簽名和文具 對話框，繼續選擇新的簽名名稱，然後從 電子郵件帳戶 下拉列表。 然後，從 新訊息 下拉列表。

6。 完成設置後，請點擊 OK 按鈕。 從現在開始，當您創建新消息時，指定的名片將插入消息正文並同時添加為附件，見截圖：

使用 VBA 代碼自動為所有傳出消息附加名片

要為所有外發郵件附加名片，您可以將名片另存為 vcf 文件，然後應用 VBA 代碼將其自動附加為附件。 請執行以下步驟：

1。 去的 人物 窗格中，選擇要作為名片發送的聯繫人。

2. 然後，單擊 文件 > 另存為，在另存為窗口中，指定放置此卡片的位置，然後在 文件名 文本框，然後選擇 電子名片文件 來自 除上文所 類型下拉，看截圖：

3. 然後，按住 ALT + F11 鍵打開 Microsoft Visual Basic for Applications 窗口。

4。 然後，雙擊 本次展望會議 來自 項目-項目1 窗格，然後將以下代碼複製並粘貼到空白代碼窗口中：

VBA 代碼：自動為所有傳出消息附加名片

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

5. 然後，保存並關閉代碼窗口，重新啟動 Outlook 以激活代碼。

6. 現在，在創建新消息時，指定的名片會自動作為附件插入，見截圖：