Método MailItem.Copy (Outlook)
Crea otra sesión de un objeto.
Sintaxis
expresión. Copia
expresión Variable que representa un objeto MailItem.
Ejemplo:
En este ejemplo de Visual Basic para Aplicaciones se crea un mensaje de correo electrónico, se establece el asunto en "Speeches", se usa el método Copy para copiarlo y, a continuación, se mueve la copia a una carpeta de correo electrónico recién creada denominada "Correo guardado" dentro de la carpeta Bandeja 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
Consulte también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.