TaskItem.Copy 方法 (Outlook)
创建对象的另一个实例。
语法
表达式。复制
表达 一个代表 TaskItem 对象的变量。
示例
本Visual Basic for Applications示例创建一封电子邮件,将 Subject 设置为“Speeches”,使用 Copy 方法进行复制,然后将副本移动到收件箱文件夹中名为“已保存邮件”的新创建的电子邮件文件夹中。
Sub CopyItem()
Dim myNameSpace As Outlook.NameSpace
Dim myFolder As Outlook.Folder
Dim myNewFolder As Outlook.Folder
Dim myItem As Outlook.MailItem
Dim myCopiedItem As Outlook.MailItem
Set myNameSpace = Application.GetNamespace("MAPI")
Set myFolder = myNameSpace.GetDefaultFolder(olFolderInbox)
Set myNewFolder = myFolder.Folders.Add("Saved Mail", olFolderDrafts)
Set myItem = Application.CreateItem(olMailItem)
myItem.Subject = "Speeches"
Set myCopiedItem = myItem.Copy
myCopiedItem.Move myNewFolder
End Sub
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。