KutoolsforOffice — 一套方案,五大工具。事半功倍。三月特賣:20% 折扣

如何在 Outlook 中自動為所有寄件附加電子名片?

作者Xiaoyang修改日期

在某些情況下,您可能希望為所有寄件自動附加您的電子名片(vCard),讓收件人能快速又輕鬆地將您的資訊儲存至通訊簿。在 Outlook 中,您可透過以下方法迅速完成此設定。

透過建立簽名檔自動為所有寄件附加名片

透過使用 VBA 程式碼自動為所有寄件附加名片


透過建立簽名檔自動為所有寄件附加名片

一般來說,您可以建立包含電子名片的簽名檔,並始終啟用該簽名檔。請依照下列步驟操作:

1. 在新郵件視窗中,按一下插入> 簽名,如截圖所示:

透過建立簽名檔,自動為所有寄件附加名片的步驟

2. 在彈出的簽名與信箋對話方塊中,於電子郵件簽名頁籤下,按一下新增按鈕,並為此新簽名輸入名稱,如截圖所示:

透過建立簽名檔,自動為所有寄件附加名片的步驟

3. 接著,按一下確定以關閉新增簽名對話方塊,從選擇要編輯的簽名清單方塊中選取此新簽名名稱,然後按一下名片,如截圖所示:

透過建立簽名檔,自動為所有寄件附加名片的步驟

4. 在插入名片對話方塊中,從瀏覽位置下拉清單中選擇連絡人資料夾,然後在下方清單方塊中選取指定的名片,如截圖所示:

透過建立簽名檔,自動為所有寄件附加名片的步驟

5. 接著,按一下確定以關閉此對話方塊,並返回簽名與信箋對話方塊。請繼續選取新簽名名稱,並從電子郵件帳戶下拉清單中指定要自動套用此簽名的電子郵件帳戶,再從新郵件下拉清單中選擇剛剛建立的簽名名稱。

提示:若您希望在所有回覆與轉寄郵件中也加入電子名片,請在回覆/轉寄清單中選擇包含電子名片的新簽名名稱。
透過建立簽名檔,自動為所有寄件附加名片的步驟

6. 完成設定後,請按一下確定按鈕。從現在起,當您建立新郵件時,指定的名片將自動插入郵件本文並同時附加為附件,如截圖所示:

透過建立簽名檔,自動為所有寄件附加名片的步驟

Outlook 中的 AI 郵件助理:聰明回覆、清晰溝通,一鍵輕鬆搞定!

透過 Kutools for Outlook 的 AI 郵件助理,輕鬆簡化您每日的 Outlook 工作!這款強大工具能學習您過往的郵件內容,提供智慧又精準的回覆建議、優化郵件文字,並協助您毫不費力地起草與潤飾訊息。
doc ai email handle

此功能支援:

  • 智慧回覆:根據您過往的對話,量身打造精準到位的回應,立即可用。
  • 內容強化:自動優化您的郵件文字,提升清晰度與影響力。
  • 輕鬆撰寫:只需提供關鍵字,其餘交給 AI 處理,並支援多種潤色風格。
  • 智慧擴充:根據上下文提供貼心建議,延伸您的創意與想法。
  • 摘要功能:立即獲取長篇郵件的簡明摘要。
  • 全球溝通:輕鬆將郵件翻譯成任何語言。

此功能支援:

  • 智慧郵件回覆
  • 優化內容
  • 關鍵字草稿
  • 智慧內容擴充
  • 郵件摘要
  • 多語言翻譯

別再等待——立即下載 AI 郵件助理,盡情享受


透過使用 VBA 程式碼自動為所有寄件附加名片

若要為所有寄件自動附加名片,請先將名片儲存為 .vcf 檔案,再透過一段 VBA 程式碼,讓系統自動將其作為附件加入郵件中。請依下列步驟操作:

1. 前往連絡人窗格,選取您要作為名片傳送的連絡人。

2. 接著,按一下檔案> 另存新檔,在「另存新檔」視窗中,指定此名片的儲存位置,於檔案名稱文字方塊中輸入檔案名稱,並從儲存類型下拉清單中選擇 vCard 檔案,如截圖所示:

透過使用 VBA 程式碼,自動為所有寄件附加名片的步驟

3. 接著,按下 ALT + F11 鍵,即可開啟 Microsoft Visual Basic for Applications 視窗。

4. 接著,在 Project-Project 1 窗格中雙擊 ThisOutlookSession,然後將下方程式碼複製並貼上至空白程式碼視窗中:

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
注意:上述程式碼中的 C:\Users\Desktop\Leonel Davis.vcf 是您已儲存的檔案路徑路徑,請依實際需求修改。
透過使用 VBA 程式碼,自動為所有寄件附加名片的步驟

5. 接著,請儲存並關閉程式碼視窗,然後重新啟動 Outlook 以啟用此程式碼。

6. 現在,當您建立新郵件時,指定的名片將自動作為附件插入,如截圖所示:

透過使用 VBA 程式碼,自動為所有寄件附加名片的步驟

示範:自動為所有寄件附加名片

 

最佳 Office 生產力工具

體驗全新 Kutools for Outlook,內含 100+ 項超強功能!立即點擊下載!

🤖KUTOOLS AI運用先進 AI 技術,輕鬆處理電子郵件——無論是回覆、摘要、優化、擴充、翻譯還是撰寫郵件,通通一鍵搞定!

📧 郵件自動化自動答覆(支援 POP 與 IMAP)預約寄送郵件寄信時依規則自動抄送密送自動轉發(高級規則)自動加入問候語自動將多收件人郵件拆分為個別訊息……

📨 郵件管理撤回郵件依主旨等條件封鎖詐騙郵件刪除重複郵件高級搜尋整合文件夾……

📁 附件專業版批次儲存批次解除附加批次壓縮自動保存自動拆離自動壓縮……

🌟 介面魔法😊更多精美酷炫表情符號重要郵件來到時提醒您最小化 Outlook 而非關閉……

👍 一鍵奇蹟帶附件全部答復防釣魚郵件🕘顯示發送者當前時間時區……

👩🏼‍🤝‍👩🏻 聯絡人與行事曆從選取的郵件中批次新增聯絡人將聯繫人組拆分為個別群組移除生日提醒……

用您的慣用語言暢享 Kutools — 完整支援英文、西班牙文、德文、法文、中文等 40 多種語言!

立即一鍵解鎖 Kutools for Outlook!別再等待,馬上下載,全面提升工作效率!

kutools for outlook features1kutools for outlook features2

🚀 一鍵下載 — 立即取得所有 Office 增益集

強烈推薦:Kutools for Office(5 合 1)

一鍵下載五個安裝程式,一次完成 — Kutools for Excel、Outlook、Word、PowerPointOffice Tab Pro立即點擊下載!

  • 一鍵便利:只需一次操作,即可下載全部五個安裝套件!
  • 🚀 隨時應對任何 Office 任務:按需安裝所需增益集,立即提升工作效率!
  • 🧰 包含:Kutools for Excel/Kutools for Outlook/Kutools for Word/Office Tab Pro/Kutools for PowerPoint