OVH Cloud OVH Cloud

Deplacer un message vers un folder

3 réponses
Avatar
dopamind
petit probleme: je n'arrive pas a deplacer en vba 1 mail d'un folder a un
autre sur un dossier public
une piste...

merci d'avance.

3 réponses

Avatar
Anor
Bonjour aussi...

dopamind a sous-entendu :
| petit probleme: je n'arrive pas a deplacer en vba 1 mail d'un folder
| a un autre sur un dossier public
| une piste...
|
| merci d'avance.

Je suis garagiste, et j'aimerais bien pouvoir ouvrir le capot de ta voiture
pour comprendre pourquoi même en mettant les clignotants, le volant ne tourne pas
:-))

En clair, pour corriger ton code VBA qui ne fonctionne pas, il faudrait
peut-être que tu le communiques, car pour moi, la différence entre
un "folder" et un "dossier public" n'est pas limpide...

--
à+
Arnaud
----------------------------------------------
Access Memorandum - www.anor.fr.st
----------------------------------------------
Avatar
dopamind
bon j'ai trouvé l'erreur dans mon code, comme quoi
Merci quand meme & bonne continuation pour ton site ;)

"dopamind" a écrit dans le message de news:
3f2f5eb7$0$27812$
Désolé si je n'ai pas été clair...

voici le code

Dim Foldersource, Folderfinal As String

Foldersource = "source"
Folderfinal = "Traités"

Set myOlApp = CreateObject("Outlook.Application")

Dim myItem As outlook.MailItem
Dim myFolder, final As outlook.MAPIFolder
Dim myFolders As outlook.Folders

Set myFolder = myOlApp.GetNamespace("MAPI").Folders("Dossiers
Publics")

Set myFolder = myFolder.Folders("Tous les dossiers publics")
Set myFolder = myFolder.Folders.Item(Foldersource)
Set final = myFolder.Folders.Item(1)

Set myItem = myFolder.Items(1)
chorus = myItem.Body
myItem.Move (final)

Set myFolder = Nothing
Set final = Nothing
Set myOlApp = Nothing

______________________

le but de la manoueuvre est de pouvoir deplacer un message d'un dossier
public vers un autre dossier public,ce dernier etant un sous dossier du


premier
-->Tous les dosiiers publics
-- >Source
-->Final



"Anor" <http://minilien.com/?8RfQLiXHOe> a écrit dans le message de news:
3f2e912f$0$9556$
Bonjour aussi...

dopamind a sous-entendu :
| petit probleme: je n'arrive pas a deplacer en vba 1 mail d'un folder
| a un autre sur un dossier public
| une piste...
|
| merci d'avance.

Je suis garagiste, et j'aimerais bien pouvoir ouvrir le capot de ta
voiture

pour comprendre pourquoi même en mettant les clignotants, le volant ne
tourne pas

:-))

En clair, pour corriger ton code VBA qui ne fonctionne pas, il faudrait
peut-être que tu le communiques, car pour moi, la différence entre
un "folder" et un "dossier public" n'est pas limpide...

--
à+
Arnaud
----------------------------------------------
Access Memorandum - www.anor.fr.st
----------------------------------------------









Avatar
Anor
Bonjour dopamind

dopamind a élucidé :

| bon j'ai trouvé l'erreur dans mon code, comme quoi
| Merci quand meme & bonne continuation pour ton site ;)

J'en déduis que tu as trouvé la réponse ici :
http://anor.fr.st/mail.htm

Un de ces jours, je renommerai la page en outlook.htm,
ça sera finalement plus proche de la réalité ;-)

--
à+
Arnaud
----------------------------------------------
Access Memorandum - www.anor.fr.st
----------------------------------------------