excel - 为什么我不能在不引用 Outlook 库的情况下使用 MailItem.BodyFormat？

Question

当 VBA 项目包含对 Microsoft Outlook 对象库的引用时，以下代码可以正常工作。否则，最后一行会产生 Invalid procedure call or argument 错误。

Set olApp = CreateObject("Outlook.Application")
Set olMail = olApp.CreateItem(0)
olMail.BodyFormat = olFormatHTML 'error here :-(

我认为我从未遇到过只有当我添加对该库的引用时该库中的属性或方法才可用的情况。

此问题发生在 Excel 2010/2013 上。我没有在其他版本上测试过它。

Answer 1

我认为您的问题很简单，如果没有引用，olFormatHTML 就没有任何值(value)，因为它是 Outlook 枚举的一部分。尝试改用文字值:

olMail.BodyFormat = 2

或者先声明一个常量:

Const olFormatHTML as Long = 2