tbbuim1
Messages postés940Date d'inscriptionjeudi 20 février 2003StatutMembreDernière intervention 3 février 2011
-
18 avril 2005 à 14:46
odalyan
Messages postés1Date d'inscriptionjeudi 24 novembre 2005StatutMembreDernière intervention24 novembre 2005
-
24 nov. 2005 à 11:24
Bonjour à tous,
J'ai une question simple, mais dont je n'arrive pas à trouver la réponse malgré toutes les sources
dispo sur vbfrance... J'aimerais pouvoir sélectionner tous les mails d'un dossier.
Par exemple, je suis sur le dossier réception, je voudrais savoir ce
qu'il faut écrire dans une macro pour que tous les mails soit surlignés.
odalyan
Messages postés1Date d'inscriptionjeudi 24 novembre 2005StatutMembreDernière intervention24 novembre 2005 24 nov. 2005 à 11:24
Dim MyRapport As MailItem
Set myOlApp = CreateObject("Outlook.Application")
Set myNamespace = myOlApp.GetNamespace("MAPI")
Set myFolder = myOlApp.ActiveExplorer.CurrentFolder
For ifold = 1 To myFolder.Items.Count
Set MyRapport = myFolder.Items.Item(ifold)
MyRapport.Delete
'... test avant suppression
Next