在Excel中發送電子郵件時如何插入Outlook簽名？

假設您想直接在 Excel 中發送電子郵件，如何在電子郵件中添加默認的 Outlook 簽名？本文提供了兩種方法來幫助您在 Excel 中發送電子郵件時添加 Outlook 簽名。

通過Excel VBA發送時將簽名插入Outlook電子郵件
 使用出色的工具在Excel中發送電子郵件時輕鬆插入Outlook簽名
有關在Excel中發送郵件的更多教程...

通過Excel VBA發送時將簽名插入Outlook電子郵件

例如，工作表中有一個電子郵件地址列表，用於向 Excel 中的所有這些地址發送電子郵件，並在電子郵件中添加默認的 Outlook 簽名。請應用下面的 VBA 代碼來實現它。

1.打開包含要通過電子郵件發送到的電子郵件地址列表的工作表，然後按其他 + F11 鍵。

2.在開幕 Microsoft Visual Basic for Applications 窗口中，單擊插入 > 模塊然後復制以下內容 VBA 2 進入模塊代碼窗口。

3.現在您需要更換 。身體 排入 VBA 2 與中的代碼 VBA 1. 之後，移動該行 。顯示 線下 使用xMailOut.

VBA 1：在 Excel 中使用 Outlook 默認簽名發送電子郵件的模板

.HTMLBody = "This is a test email sending in Excel" & "<br>" & .HTMLBody

VBA 2：將電子郵件發送到Excel中單元格中指定的電子郵件地址

Sub SendEmailToAddressInCells()
    Dim xRg As Range
    Dim xRgEach As Range
    Dim xRgVal As String
    Dim xAddress As String
    Dim xOutApp As Outlook.Application
    Dim xMailOut As Outlook.MailItem
    On Error Resume Next
    xAddress = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Please select email address range", "KuTools For Excel", xAddress, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    Set xOutApp = CreateObject("Outlook.Application")
    Set xRg = xRg.SpecialCells(xlCellTypeConstants, xlTextValues)
    For Each xRgEach In xRg
        xRgVal = xRgEach.Value
        If xRgVal Like "?*@?*.?*" Then
            Set xMailOut = xOutApp.CreateItem(olMailItem)
            With xMailOut
                .To = xRgVal
                .Subject = "Test"
                .Body = "Dear " _
                      & vbNewLine & vbNewLine & _
                        "This is a test email " & _
                        "sending in Excel"
                .Display
                '.Send
            End With
        End If
    Next
    Set xMailOut = Nothing
    Set xOutApp = Nothing
    Application.ScreenUpdating = True
End Sub

以下屏幕截圖可幫助您在更改VBA代碼後輕鬆找到差異。

4。按 F5 鍵來運行代碼。然後一個 Excel的Kutools 選擇框彈出，請選擇您要發送電子郵件的電子郵件地址，然後單擊 確定。

然後創建電子郵件。您可以看到 Outlook 默認簽名添加在電子郵件正文的末尾。

提示：

1.您可以根據需要更改VBA代碼1中的電子郵件正文。
2.運行代碼後，如果彈出錯誤對話框警告未定義用戶定義類型，請關閉此對話框，然後單擊工具 > 參考在 Microsoft Visual Basic for Applications 窗口。在開幕 參考– VBAProject 窗口中，檢查 Microsoft Outlook對像庫 框並單擊 確定。 然後再次運行代碼。

使用出色的工具在Excel中發送電子郵件時輕鬆插入Outlook簽名

如果您是VBA的新手，強烈建議您 發電子郵件 的效用 Excel的Kutools 為了你。使用此功能，您可以輕鬆地基於Excel中的某些字段發送電子郵件，並向其中添加Outlook簽名。請執行以下操作。

申請前 Excel的Kutools請 首先下載並安裝.

首先，您需要創建一個包含不同字段的郵件列表，您將基於這些字段發送電子郵件。

您可以根據需要手動創建郵件列表，也可以應用“創建郵件列表”功能快速完成。

1。點擊 Kutools 加 > 創建郵件列表。

2。在裡面 創建郵件列表 對話框中，指定所需的字段，選擇在何處輸出列表，然後單擊 OK 按鈕。

3.現在，將創建一個郵件列表示例。由於這是一個示例列表，因此您需要將字段更改為某些所需的內容。（允許多行）

4.之後，選擇整個列表（包括標題），然後單擊 Kutools 加 > 發電子郵件。

5。在裡面 發電子郵件 對話框：

5.1）所選郵件列表中的項目會自動放置在相應的字段中；
5.2）完成電子郵件正文；
5.3）同時檢查 通過Outlook發送電子郵件 及 使用Outlook的簽名設置 盒;
5.4）點擊發送按鈕。看截圖：

現在，電子郵件已發送。並將默認的Outlook簽名添加到電子郵件正文的末尾。

如果您想免費試用（30-day) 這個實用程序， 請點擊下載，然後按照上述步驟進行操作。

將電子郵件發送到Excel單元格中指定的電子郵件地址
假設您有一個電子郵件地址列表，並且您想直接在Excel中批量向這些電子郵件地址發送電子郵件。如何實現呢？本文將向您展示將電子郵件發送到Excel中單元格中指定的多個電子郵件地址的方法。

發送電子郵件，並將指定範圍複製並粘貼到Excel中的電子郵件正文中
在許多情況下，Excel工作表中指定範圍的內容可能對您的電子郵件通信很有用。在本文中，我們將介紹一種直接在Excel中發送將具有指定範圍的電子郵件粘貼到電子郵件正文中的方法。

發送帶有Excel中附加的多個附件的電子郵件
本文討論的是通過帶有Excel中附加的多個附件的Outlook發送電子郵件。

如果在Excel中已達到到期日期，則發送電子郵件
例如，如果C列中的截止日期小於或等於7天（當前日期為2017/9/13），則向A列中的指定收件人發送電子郵件提醒，並在B列中指定內容。實現這一目標？本文將提供一種VBA方法來詳細處理它。

根據Excel中的單元格值自動發送電子郵件
假設您要基於Excel中指定的單元格值通過Outlook向特定收件人發送電子郵件。例如，當工作表中單元格D7的值大於200時，將自動創建一封電子郵件。本文介紹了一種VBA方法供您快速解決此問題。

有關在Excel中發送郵件的更多教程...

最佳辦公效率工具

Kutools for Excel 解決了你的大部分問題，並將你的生產力提高了 80%

重用: 快速插入 複雜的公式，圖表 以及您以前使用過的任何東西；加密單元帶密碼創建郵件列表並發送電子郵件...
超級公式欄（輕鬆編輯多行文本和公式）；閱讀版式（輕鬆讀取和編輯大量單元格）；粘貼到過濾範圍...
合併單元格/行/列不會丟失數據；拆分單元格內容；合併重複的行/列...防止細胞重複；比較範圍...
選擇重複或唯一行; 選擇空白行（所有單元格都是空的）；超級查找和模糊查找在許多工作簿中；隨機選擇...
確切的副本多個單元格，無需更改公式參考；自動創建參考到多張紙；插入項目符號，複選框等...
提取文字，添加文本，按位置刪除，刪除空間; 創建和打印分頁小計；在單元格內容和註釋之間轉換...
超級濾鏡（將過濾方案保存並應用於其他工作表）；高級排序按月/週/日，頻率及更多；特殊過濾器用粗體，斜體...
結合工作簿和工作表; 根據關鍵列合併表；將數據分割成多個工作表; 批量轉換xls，xlsx和PDF...
超過 300 項強大的功能. 支持 Office / Excel 2007-2021 和 365。支持所有語言。在您的企業或組織中輕鬆部署。完整功能 30 天免費試用。 60 天退款保證。