Méthode MailItem.Move (Outlook)

  • Article

Déplace un élément Microsoft Outlook vers un nouveau dossier.

Syntaxe

expression. Move( _DestFldr_ )

expression Variable qui représente un objet MailItem.

Paramètres

Nom Requis/Facultatif Type de données Description
DestFldr Obligatoire Folder Expression qui renvoie un objet Folder. Dossier de destination.

Valeur renvoyée

Valeur Object qui représente l’élément déplacé vers le dossier désigné.

Exemple

Cet exemple Visual Basic pour Applications (VBA) utilise GetDefaultFolder pour renvoyer l’objet Folder qui représente le dossier par défaut. Il utilise ensuite les méthodes Find et FindNext pour rechercher tous les messages envoyés par Dan Wilson et utilise la méthode Move pour déplacer tous les messages électroniques envoyés par Dan Wilson du dossier Boîte de réception par défaut vers le dossier Courrier personnel. Pour exécuter cet exemple sans erreur, remplacez « Dan Wilson » par un nom d'expéditeur valide et vérifiez qu'il existe un dossier sous Boîte de réception nommé « Courrier personnel ». Sachez que myItem est déclaré comme étant de type Object afin qu'il puisse représenter tout type d'élément Outlook, y compris les éléments de demande de réunion et de demande de tâche.

Sub MoveItems() 
 Dim myNameSpace As Outlook.NameSpace 
 Dim myInbox As Outlook.Folder 
 Dim myDestFolder As Outlook.Folder 
 Dim myItems As Outlook.Items 
 Dim myItem As Object 
 
 Set myNameSpace = Application.GetNamespace("MAPI") 
 Set myInbox = myNameSpace.GetDefaultFolder(olFolderInbox) 
 Set myItems = myInbox.Items 
 Set myDestFolder = myInbox.Folders("Personal Mail") 
 Set myItem = myItems.Find("[SenderName] = 'Dan Wilson'") 
 While TypeName(myItem) <> "Nothing" 
 myItem.Move myDestFolder 
 Set myItem = myItems.FindNext 
 Wend 
End Sub

Voir aussi

Objet MailItem

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.