使用Excel VBA在Outlook邮件中的粘贴正文后插入签名

在Excel VBA中使用Outlook邮件粘贴正文并插入签名，可以通过以下步骤实现：

1. 首先，确保已经引用了Microsoft Outlook对象库。在VBA编辑器中，点击"工具" -> "引用"，勾选"Microsoft Outlook xx.x Object Library"，点击确定。
2. 创建一个Outlook应用对象和邮件对象，然后设置邮件的相关属性。代码示例如下：

Dim olApp As Outlook.Application
Dim olMail As Outlook.MailItem

Set olApp = New Outlook.Application
Set olMail = olApp.CreateItem(olMailItem)

With olMail
    .Subject = "邮件主题"
    .BodyFormat = olFormatHTML ' 设置邮件正文格式为HTML
    .HTMLBody = "邮件正文内容" ' 设置邮件正文内容
    
    ' 插入签名
    .HTMLBody = .HTMLBody & "<br><br>" & olMail.HTMLBody & "<br>" & olMail.GetInspector().WordEditor.Content.Text
    
    ' 添加附件等其他操作
    
    .Display ' 显示邮件
End With

Set olMail = Nothing
Set olApp = Nothing

在上述代码中，我们首先创建了一个Outlook应用对象和一个邮件对象。然后，我们设置了邮件的主题和正文格式为HTML。接下来，我们设置了邮件的正文内容，并在正文后插入了签名。

1. 在插入签名的部分，我们使用了.HTMLBody属性来获取邮件的HTML格式正文内容，并使用.GetInspector().WordEditor.Content.Text来获取签名的文本内容。然后，我们将签名文本插入到邮件的HTML正文中。
2. 最后，我们可以通过.Display方法来显示邮件，或者使用.Send方法直接发送邮件。

需要注意的是，上述代码中的邮件正文内容和签名内容可以根据实际需求进行修改。另外，关于Excel VBA和Outlook的更多详细信息和操作方法，可以参考腾讯云的Outlook开发文档。