我有一个数据列表,例如存储在Excel工作表中的客户信息(姓名,电子邮件,金额欠额等)。我的目标是点击Excel中的按钮,并在Outlook模板中向每个客户端发送他们的信息。使用Outlook模板和设置变量从Excel 2007 VBA发送电子邮件
- 创建一个邮件对象
- 设置邮件对象的模板文件
- 设置,然后在模板中填充数据有关当前客户端 - 在这里主要是卡住了,不知道如何在指定变量模板,然后与他们在VBA
- 保存到草稿供日后查看/发送
如。亲爱的< < CLIENTNAME >> =亲爱的约翰史密斯
我的代码迄今:
Dim myOlApp As Outlook.Application
Dim MyItem As Outlook.MailItem
Set myOlApp = CreateObject("Outlook.Application")
Set MyItem = myOlApp.CreateItemFromTemplate("C:\egTemplate.oft")
With MyItem
.To = Worksheets("Clients").Range(1, 2)
.Subject = "Monthly bill"
'Refer to and fill in variable items in template
.Save
End With
Set MyItem = Nothing
Set MyOlApp = Nothing
我需要知道,如果这甚至有可能,我可以不用插件,如果是的话,没有人知道一个我可以遵循的良好的链接/教程?
在此先感谢和亲切的问候
更新增加了我的代码,并做了一些修改请求
感谢队友这工作完美。甚至没有想到旧的替换动作:) –
任何想法如何这将适用于Excel/Outlook 2010?现在我升级了运行时错误287? –
这应该可能以同样的方式工作。尝试逐步调试'Worksheets'单元格值和'.Body'或'.HTMLBody'。或者问一个新的问题,并在这里链接 – JMax