Skip to main content

Kutools for Office — 一套工具，五種功能。完成更多工作。

如何在Outlook中為回覆和轉寄設定不同的簽名？

Author Xiaoyang Last modified

通常，您可以在Outlook中為不同的帳戶設定不同的簽名，但您是否嘗試過為回覆和轉寄應用不同的簽名呢？這意味著，當您回覆電子郵件時插入簽名1，而當您轉寄電子郵件時則應用簽名2。那麼，您該如何在Outlook中解決這個問題呢？

使用VBA代碼為回覆和轉寄設定不同的簽名

使用VBA代碼為回覆和轉寄設定不同的簽名

以下的VBA代碼可以幫助您為回覆和轉寄設定不同的簽名，請按照以下步驟逐一操作：

1. 按住 ALT + F11 鍵以打開 Microsoft Visual Basic for Applications 窗口。

2. 接著，點擊 插入 > 模組，將以下代碼複製並粘貼到打開的空白模組中，參見截圖：

VBA代碼：為回覆和轉寄設定不同的簽名：

Public WithEvents GExplorer As Outlook.Explorer
Public WithEvents GMail As Outlook.MailItem
Public GFSO As Scripting.FileSystemObject
Public GTextStream As Scripting.TextStream
Public GText As String
Private Sub Application_Startup()
    Set GExplorer = Outlook.Application.ActiveExplorer
    Set GFSO = New Scripting.FileSystemObject
End Sub
Private Sub GExplorer_SelectionChange()
    Dim xItem As Object
    On Error Resume Next
    Set xItem = GExplorer.Selection.Item(1)
    If xItem.Class <> olMail Then Exit Sub
    Set GMail = xItem
End Sub
Private Sub GMail_Reply(ByVal Response As Object, Cancel As Boolean)
    InsertSignature Response, "Signature1.htm"   'change this signature name for replies
End Sub
Private Sub GMail_Forward(ByVal Forward As Object, Cancel As Boolean)
    InsertSignature Forward, " Signature2.htm"    'change this signature name for forwards
End Sub
Private Sub InsertSignature(Item As Object, SignName As String)
    Dim xSignatureFile As String
    Dim xMailItem As Outlook.MailItem
    xSignatureFile = CreateObject("WScript.Shell").SpecialFolders(5)
    xSignatureFile = xSignatureFile & "\Microsoft\Signatures\" & SignName
    Set GTextStream = GFSO.OpenTextFile(xSignatureFile)
    GText = ""
    GText = GTextStream.ReadAll
    If Item.Class <> olMail Then Exit Sub
    Set xMailItem = Item
    With xMailItem
        .Display
        .HTMLBody = .HTMLBody & "<br><br>" & GText
    End With
End Sub

注意：在上述代碼中，Signature1 和 Signature2 是您希望用於回覆和轉寄的兩個簽名名稱。請根據需要更改這些名稱。

doc sig forwar reply 1

3. 仍在 Microsoft Visual Basic for Applications 窗口中，點擊 工具 > 參考 以進入 References-Project1 對話框，並從可用參考列表框中勾選 Microsoft Scripting Runtime 選項，參見截圖：

doc sig forwar reply 2

4. 然後點擊 確定 關閉對話框，從現在開始，當您回覆電子郵件時，會立即插入 Signature1，參見截圖：

doc sig forwar reply 3

而當您轉寄郵件時，將插入 Signature2，如下方截圖所示：

doc sig forwar reply 4

最佳辦公室生產力工具

最新消息：Kutools for Outlook 推出免費版本！

體驗全新 Kutools for Outlook，超過100項精彩功能！立即下載！

🤖 Kutools AI ：採用先進的AI技術輕鬆處理郵件，包括答覆、摘要、優化、擴充、翻譯及撰寫郵件。

📧 郵件自動化：自動回覆（支援POP及IMAP） / 排程發送郵件 / 發送郵件時根據規則自動抄送密送 / 自動轉發（高級規則） / 自動添加問候語 / 自動分割多收件人郵件為個別郵件 ...

📨 郵件管理：撤回郵件 / 根據主題等方式阻止詐騙郵件 / 刪除重複郵件 / 高級搜索 / 整合文件夾 ...

📁 附件專業工具：批量保存 / 批量拆離 / 批量壓縮 / 自動保存 / 自動拆離 / 自動壓縮 ...

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

👍 一鍵便利：帶附件全部答復 / 防詐騙郵件 / 🕘顯示發件人時區 ...

👩🏼‍🤝‍👩🏻 聯絡人與日曆：從選中郵件批量添加聯絡人 / 分割聯絡人組為個別組 / 移除生日提醒 ...

以您偏好的語言使用 Kutools，支援英語、西班牙語、德語、法語、中文及超過40種其他語言！

只需點擊一次，即可立即解鎖 Kutools for Outlook。別等了，現在下載提升您的工作效率！

kutools for outlook features1 kutools for outlook features2

🚀 一鍵下載 — 獲取全部 Office 插件

強力推薦：Kutools for Office（5合1）

一鍵下載五個安裝程式，包括 Kutools for Excel, Outlook, Word, PowerPoint及 Office Tab Pro。 立即下載！

  • ✅ 一鍵便利：一次操作即可下載全部五套安裝包。
  • 🚀 隨時處理任何 Office 任務：安裝您需求的插件，隨時隨地。
  • 🧰 包含：Kutools for Excel / Kutools for Outlook / Kutools for Word / Office Tab Pro / Kutools for PowerPoint