Question

我收到了一些重复的VBA代码问题，但这无法帮助我完成我的身体信息。当你检查.HTMLBody = strbody在这里我有一些自由写大笔记。请帮助在下面给出的代码中添加签名

请帮我在邮件中为下面给出的VBA添加outlook默认签名。如果您在VBA中添加签名代码，那将非常有用。提前致谢。

注意 - 在excel中使用此VBA来生成具有附件和正文的给定邮件ID的自动邮件。

Dim OutApp As Object
Dim OutMail As Object
Dim strbody As String

Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(0)

strbody = " Hello"

On Error Resume Next
With OutMail
    .to = "test@gmail.com"
    .cc = "test1@gmail.com"
    .BCC = ""
    .Subject = "TRANSACTING : " & Format(Date, "DD-MMM-YYYY")
    .HTMLBody = strbody
    'You can add an attachment like this
    .Attachments.Add ("E:\Auto Reports\test.xlsb")
    .send   'or use .Display
End With
On Error GoTo 0

Set OutMail = Nothing
Set OutApp = Nothing
End Sub

在邮件中添加outlook默认签名

0 个答案: