访问 Outlook VBA 对象模型时文字冻结

Word freezing when accessing Outlook VBA object model

Office 365

word中的VBA是用来发邮件的。该代码已成功用于许多计算机,但特别是在使用 CreateObject 访问对象模型时,代码开头的单词冻结。如果 Outlook 打开它工作正常但关闭它冻结,与其他计算机在这两种情况下都工作正常。

Dim objOL          As Object
Dim objEmailItem   As Object

Set objOL = CreateObject("outlook.application")      '*** Freezing  ***
Set objEmailItem = objOL.createItem(varOlmailitem)

我尝试卸载 office 并重新安装,停止防病毒,重新启动。

谢谢。

尝试使用早期绑定,首先需要设置对Outlook对象库的引用。使用 Visual Basic for Applications (VBA) 工具菜单上的引用命令设置对 Microsoft Outlook xx.x 对象库的引用,其中 xx.x 表示您正在使用的 Outlook 版本.然后您可以使用以下语法启动 Outlook 会话。

Dim objOL as Outlook.Application 
Set objOL = New Outlook.Application

有关详细信息,请参阅 Automating Outlook from a Visual Basic Application