Método NoteItem.Copy (Outlook)

Crea otra sesión de un objeto.

Sintaxis

más sencilla.Copiar

expresión Una expresión que devuelve un objeto NoteItem .

Valor devuelto

Objeto NoteItem que representa una copia de la nota especificada.

Ejemplo

Este ejemplo de Visual Basic para Aplicaciones crea un mensaje de correo electrónico, establece el Asunto en "Discursos", utiliza el método Copiar para copiarlo y, a continuación, 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

Vea también

Objeto NoteItem

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.