Méthode MailItem.Copy (Outlook)
Crée une autre occurrence d'un objet.
Syntaxe
expression. Copie
expression Variable qui représente un objetMailItem.
Exemple
Cet exemple Visual Basic pour Applications crée un message électronique, définit l’objet sur « Speeches », utilise la méthode Copy pour le copier, puis déplace la copie dans un dossier de messagerie nouvellement créé nommé « Saved Mail » dans le dossier Boîte de réception.
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
Voir aussi
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.