Comment créer Script Outlook pour traiter des pièces jointes ?

[jeromeo73]

Bonjour à tous !
Novice en script, je cherche un moyen pour mon boulot, de trier avec des scripts ou macros les pièces jointes de mes mails dans Outlook(et pas Outlook Express)... Le but final est qu'outlook ouvre automatiquement les pièces jointes format .rtf, en copie le texte, le colle directement dans un mail, et le renvoie à une autre adresse.

(l'opération permet ainsi d'avoir le contenu directement dans le corps du mail, sans avoir à ouvrir la pièce jointe...)

Quelqu'un a-t-il une idée ?

PS : Je suis novice, je ne sais pas vraiment comment construire un script !

Merci d'avance pour votre aide !
Jérôme

[Heureux-oli]

Pour ce qui est de la sauvegarde des pièces jointes, tu trouveras ton bonheur dans la faq ou dans les posts.

Pour obtenir le texte des fichiers joints, il faut les ouvrir en Word.
Donc, il faut déclarer un objet et lui affecter une Objet Application Word.

La solution la plus facile est de référencer la bibliothèque Word dans ton projet.

Outils Référence Ajouter Word.

Code :

1
2
3
4
5
6
7
8
9
Dim wApp As Word.Application
Dim oDoc As Document
Dim stDoc As String
 
 
 
Set wApp = GetObject("Word.Application")
Set oDoc = wApp.Documents.Open("MonCheminDeDoc")
stDoc = oDoc.Range.WholeStory

Voila une partie du code, il ne te reste qu'à insérer les texte dans un message.