Salut il faut changer
Set objFolder = objNS.PickFolder
par
l'emplacement de ton dossier
Si c'est un sous dossier de la boite de reception par defaut
= GetDefaultFolder(olFolderInbox).folders("toto")
Dossier au même niveau
= GetDefaultFolder(olFolderInbox).parent.folders("toto")
Partager