Outlook VBA教程:FolderAdd事件

当将文件夹添加到指定的Folders集合时发生。该事件在 VBScript 中不可用。

Sub object_FolderAdd(ByVal Folder As MAPIFolder)

object  该表达式的值为 Folders集合对象。

Folder  必选。添加到集合中的MAPIFolder

VBA示例

本示例显示在用户的“收件箱”文件夹中创建的新文件夹。


Dim myOlApp As New Outlook.Application
Public WithEvents myOlFolders As Outlook.Folders
Public Sub Initialize_handler()
    Set myOlFolders = myOlApp.GetNamespace("MAPI").GetDefaultFolder(olFolderInbox).Folders
End Sub
Private Sub myOlFolders_FolderAdd(ByVal Folder As Outlook.MAPIFolder)
    Folder.Display
End Sub

上页:Outlook VBA教程:Deactivate事件 下页:Outlook VBA教程:FolderChange事件

Outlook VBA教程:FolderAdd事件:相关链接

Outlook VBA教程:FolderChange事件 Outlook VBA教程:FolderRemove事件
Outlook VBA教程:FolderSwitch事件 Outlook VBA教程:Forward事件
Outlook VBA教程:GroupAdd事件 Outlook VBA教程:ItemAdd事件
Outlook VBA教程:ItemChange事件 Outlook VBA教程:ItemRemove事件
Outlook VBA教程:ItemSend事件 Outlook VBA教程:MapiLogonComplete事件
Outlook VBA教程:NewExplorer事件 Outlook VBA教程:NewInspector事件
Outlook VBA教程:NewMail事件 Outlook VBA教程:OnError事件
Outlook VBA教程:Open事件 Outlook VBA教程:OptionsPagesAdd事件
Outlook VBA教程:Progress事件 Outlook VBA教程:PropertyChange事件
Outlook VBA教程:Quit事件 Outlook VBA教程:Read事件
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号