Método TaskItem.Copy (Outlook)
Cria outra instância de um objeto.
Sintaxe
expressão. Cópia
Expressão Uma variável que representa um objeto TaskItem .
Exemplo
Este Visual Basic for Applications exemplo cria uma mensagem de email, define o Assunto como "Falas", usa o método Copiar para copiá-lo e, em seguida, move a cópia para uma pasta de email recém-criada chamada "Email Salvo" na pasta Caixa de Entrada.
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
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.