Traitement Mails sous Outlook et Excel

Bonjour,
J'ai une macro à développer qui doit faire la chose suivante :
1 _ Je dois parcourir un dossier précis sour Outlook 2003 : 'NonTraites'
2 _ Pour chaque mail je récupère 2 infos se trouvant dans l'objet du message formaté de la manière suivante : 'APPS - NomPersonne - Date : JJ/MM/AAAA'
3 _ Je remplis une feuille Excel avec 2 colonnes : NomPersonne et Date
4 _ Je déplace le mail dans un répertoire 'Traites'

Habituellement j'arrive à me débrouiller sous Excel mais je ne connais pas bien les macros sous Outlook 2003.

Si quelqu'un a une idée je suis preneur (je ne cacherai pas que c'est assez urgent ;) )
Merci d'avance.

tiens pour débuter sour Outlook VBA , voilà un code qui parcours tous tes mails du sous dossier de la boite de réception : 'Nontraites'

Code:

---

1 2 3 4 5 6 7 8 9

Sub TraiteNonTraite() Const NomDossier = "Nontraites" Dim MonMail As MailItem For Each MonMail In GetNamespace("MAPI").GetDefaultFolder(olFolderInbox).Folders(NomDossier).Items Debug.Print MonMail.Subject   Next End Sub

---

Merci, le morceau de code que tu m'as fourni m'aide bien. Avec ça je pense arriver à faire ce que je veux.
Par contre le dossier "NonTraites" Doit-il obligatoirement se trouver dans "Boite de Réception" ou peut-on réussir à le localiser ailleurs ? ;)

Après je repensais à deux choses. Comment arrive-t-on à exporter la macro pour l'installer sur n'importe quel poste Outlook ? Et peut-on créer une barre de menu sous outlook pour l'éxecuter ensuite ? (je sais j'ai beaucop de questions et peut-être que certains ont déjà demandé avant ... :? )

tiens voir cela [VBA-O] Addon outlook challenge .. cela te donneras peu-être des idées..;)