通过excel使用VBA发送电子邮件,并在文件夹中保存电子邮件模板?

通过excel使用VBA发送电子邮件,并在文件夹中保存电子邮件模板?,excel,vba,email,outlook,Excel,Vba,Email,Outlook,我在excel中有一个电子邮件列表,我想在outlook中发送一封预先制作好的电子邮件,并将其保存为文件夹中的模板。而不是尝试通过VBA重新创建此电子邮件。我很想知道是否可以将保存的Outlook模板发送到每封电子邮件 为模板尝试此操作。您可能希望将电子邮件和内容变量传递给函数,但听起来您可以使用已经得到的来重新配置该部分 Sub CreateEmailfromTemplate() Dim obApp As Application Dim NewMail As Outlook.M

我在excel中有一个电子邮件列表,我想在outlook中发送一封预先制作好的电子邮件,并将其保存为文件夹中的模板。而不是尝试通过VBA重新创建此电子邮件。我很想知道是否可以将保存的Outlook模板发送到每封电子邮件

为模板尝试此操作。您可能希望将电子邮件和内容变量传递给函数,但听起来您可以使用已经得到的来重新配置该部分

Sub CreateEmailfromTemplate()
    Dim obApp As Application
    Dim NewMail As Outlook.MailItem

    Set obApp = Outlook.Application
    Set NewMail = obApp.CreateItemFromTemplate("C:\directory\Template.oft")
    NewMail.Display
    With NewMail
        .To = "example@mail.com"
        .Display
    End With

    Set obApp = Nothing
    Set NewMail = Nothing
End Sub

你试过使用MailMerge吗?我不知道那是什么。这不会被记为垃圾邮件吗?MailMerge只打印我需要作为电子邮件发送的内容。MailMerge也发送电子邮件。