Outlook VBA教程:MoveTo方法

将文件夹移至指定的目标文件夹中。

expression.MoveTo(DestinationFolder)

expression  必选。该表达式返回MAPIFolder对象。

DestinationFolder  必选。返回 MAPIFolder对象的表达式。要将文件夹移动到的目标文件夹。

VBA示例

本 Visual Basic for Applications 示例将新文件夹添加到默认的“联系人”文件夹中,然后使用MoveTo方法将其移至默认的“收件箱”文件夹中。


Set myOlApp = CreateObject("Outlook.Application")
Set myNameSpace = myOlApp.GetNameSpace("MAPI")
Set myFolder = myNameSpace.GetDefaultFolder(olFolderContacts)
Set myNewFolder = myFolder.Folders.Add("My Contacts")
myNewFolder.MoveTo myNameSpace.GetDefaultFolder(olFolderInbox)

如果使用 VBScript,则不创建Application对象,而且也不能使用命名常量。本示例说明如何使用 VBScript 执行相同任务。


Set myNameSpace = Application.GetNameSpace("MAPI")
Set myFolder = myNameSpace.GetDefaultFolder(10)
Set myNewFolder = myFolder.Folders.Add("My Contacts")
myNewFolder.MoveTo myNameSpace.GetDefaultFolder(6)

上页:Outlook VBA教程:Move方法 下页:Outlook VBA教程:OnStatusChange方法

Outlook VBA教程:MoveTo方法:相关链接

Outlook VBA教程:OnStatusChange方法 Outlook VBA教程:PickFolder方法
Outlook VBA教程:Post方法 Outlook VBA教程:PrintOut方法
Outlook VBA教程:PublishForm方法 Outlook VBA教程:Quit方法
Outlook VBA教程:Remove方法 Outlook VBA教程:RemoveMember方法
Outlook VBA教程:RemoveMembers方法 Outlook VBA教程:RemoveStore方法
Outlook VBA教程:Reply方法 Outlook VBA教程:ReplyAll方法
Outlook VBA教程:Reset方法 Outlook VBA教程:ResetColumns方法
Outlook VBA教程:Resolve方法 Outlook VBA教程:ResolveAll方法
Outlook VBA教程:Respond方法 Outlook VBA教程:Restrict方法
Outlook VBA教程:Save方法 Outlook VBA教程:SaveAs方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号