Excel自动通过Outlook发送电子邮件随机发送

我已经继承了Excel用户窗体的开发，其中包含一个发送按钮以将用户数据返回到中央邮箱。该工具刚刚推出到更大的社区，一些用户遇到未发送的电子邮件。这些都是随机事件，因为用户有时可以发送表单而不是表单特定的。Excel自动通过Outlook发送电子邮件随机发送

该工具使用下面的代码来创建电子邮件：

Set ObjOL = CreateObject("Outlook.Application") 
Set ObjOutMail = ObjOL.CreateItem(0)

，并通过发送：

ObjOutMail.send

我们曾与许多用户试用了从未有过任何问题，但我们现在有一些用户成功发送了一个或多个表单，但有一个或多个表单也失败了，他们也无法再发送成功的表单。

没有错误信息，Outlook“这可能是病毒等”。确认是照常开除的（我们没有试图绕过这个），但'已发送物品'中没有任何内容。用户还能够发送传统生成的电子邮件，因此不存在邮箱限制。

用户窗体是模态的，并在发送时将三个用户字段复制到“Sheet1”，保存并自行保存。

真的不知所措。

感谢您的任何建议。

编辑：要添加我们仍然在Win XP上使用Office 2003。

2014-09-26 mr_yogi

只需添加，我就可以在发送它的位置之后“观察”ObjOutMail对象，并且它看起来应该与正确的收件人，主题，附件等一样。它只是没有被发送。 – 2014-09-26 12:01:53

您可以将ObjOutMail.send替换为ObjOutMail.Display，并查看它是否尝试生成电子邮件？ – Dave 2014-09-26 12:11:04

这将有助于看到一些代码。否则，我们还在猜测。 – Excellll 2014-09-26 14:38:47

感谢所有回复，使用.display属性向我展示了发生了什么。

电子邮件是针对我认为是明确的地址，但有一个额外的'（MULTIUSER）'后缀，我没有;实现实际上是地址的一部分，DOH！

上周以及由相同地址组成但具有不同后缀的类似邮箱被添加到系统中。 Outlook Outlook无法解析地址，也未发送电子邮件。

再次感谢。

2014-09-26 16:02:35

回答