excel - 创建 Outlook 对象时未定义用户定义类型

Question

Dim oApp As Outlook.Application
Dim oMail As MailItem
Dim oMail As String
Dim strbody As String
Dim fdatum As String
Dim VorschauBereich As Range
Dim Tabnr As Integer
Dim Tabtext As String
Set oApp = CreateObject("Outlook.application")
Set oMail = oApp.CreateItem(oIMailItem)

我得到标题中命名的错误，光标跳转到 Dim Dim oApp As Outlook.Application

Answer 1

要解决此问题，您可以通过在引用中添加 Mircrosoft 对象库来使用早期绑定(bind)(从工具菜单中)。或者，您可以通过将 Outlook 对象声明更改为以下内容来使用后期绑定(bind):

Dim oApp As Object
Dim oMail As Object

然后像这样创建对象:

Set oApp = CreateObject("Outlook.application")
Set oMail = oApp.CreateItem(0)

根据您的excel WB是否被其他人使用，我更喜欢后期绑定(bind)以避免其他人机器上的引用出现任何问题。后期绑定(bind)的缺点是您在编码时无法获得 inteli-text 帮助。希望这可以帮助!