Outlook VBA教程:通过 Visual Basic 应用程序使 Outlook 自动化

因为 Microsoft Outlook 支持自动化,所以可以从任何用 Microsoft Visual Basic 编写的程序控制 Outlook。自动化为一个应用程序访问支持自动化的另一个应用程序的对象、方法、属性和事件提供了标准方法。

Outlook对象模型提供了管理 Outlook 文件夹中存储的数据所需的所有功能,还提供了控制 Outlook 用户界面外观的功能。

若要启动 Outlook 自动化会话,可以用早绑定或晚绑定。晚绑定使用 GetObject 或 CreateObject函数初始化 Outlook。例如,以下代码将对象变量设置为 OutlookApplication对象,该对象为 Outlook对象模型中的最高层对象。所有自动化代码都必须首先定义 Outlook Application对象,才能够访问其他 Outlook对象。


Dim objOL as Object
Set objOL = CreateObject("Outlook.Application")

若要使用早绑定,首先要设置到 Outlook对象库的引用。然后就可用以下语法启动 Outlook 会话。


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

大部分编程解决方案都与 Outlook 中存储的数据进行交互。Outlook 在邮件应用程序编程接口 (MAPI) 文件夹中存储其全部信息。在将对象变量设置为 Outlook Application对象后,通常要设置一个Namespace对象来引用 MAPI,如以下示例所示。


Set objOL = New Outlook.Application
Set objNS = objOL.GetNameSpace("MAPI")
Set objFolder = objNS.GetDefaultFolder(olFolderContacts)

将对象变量设置为引用包括要使用的项目的文件夹后,就可以用适当的代码完成任务,如以下示例所示。


Sub CreateNewDefaultOutlookTask()
    Dim objOLApp As Outlook.Application
    Dim NewTask As Outlook.TaskItem
    ' Set the Application object
    Set objOLApp = New Outlook.Application
    ' You can only use CreateItem for default items
    Set NewTask = objOLApp.CreateItem(olTaskItem)
    ' Display the new task form so the user can fill it out
    NewTask.Display
End Sub

上页:Outlook VBA教程:从其他 Microsoft Office 应用程序自动化 Outlook 下页:Outlook VBA教程:使用 COM 加载项自定义 Outlook

Outlook VBA教程:通过 Visual Basic 应用程序使 Outlook 自动化:相关链接

Outlook VBA教程:使用 COM 加载项自定义 Outlook Outlook VBA教程:在自动化中使用事件
Outlook VBA教程:使用 Outlook Visual Basic for Applications 响应 Outlook事件 Outlook VBA教程:使用 Outlook 中的 Visual Basic for Applications
Outlook VBA教程:使用 EntryID 和 StoreID Outlook VBA教程:在 Visual Basic 编辑器中处理窗体
Outlook VBA教程:处理 Outlook事件 Outlook VBA教程:编写 Outlook 宏
Outlook VBA教程:Activate事件 Outlook VBA教程:AdvancedSearchComplete事件
Outlook VBA教程:AdvancedSearchStopped事件 Outlook VBA教程:AttachmentAdd事件
Outlook VBA教程:AttachmentRead事件 Outlook VBA教程:BeforeAttachmentSave事件
Outlook VBA教程:BeforeCheckNames事件 Outlook VBA教程:BeforeDelete事件
Outlook VBA教程:BeforeFolderSwitch事件 Outlook VBA教程:BeforeGroupAdd事件
Outlook VBA教程:BeforeGroupRemove事件 Outlook VBA教程:BeforeGroupSwitch事件
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号