Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Outlook > VBA Outlook
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 30/05/2007, 17h45   #1
Invité de passage
 
Inscription : mai 2007
Messages : 2
Détails du profil
Informations forums :
Inscription : mai 2007
Messages : 2
Points : 0
Points : 0
Par défaut Macro dans Outlook

Bonjour,
J'aimerais avoir un peu d'aide pour créer une macro qui ferait la chose suivante:
rappel (par exemple au bout de 2 semaines) des e-mails non répondus (et pour compliquer: les e-mails avec une action (eg: à faire, etc).
Vous me suivez?
Ce sont bien les e-mails envoyés dont il s'agit: donc si j'envoie un e-mail avec une demande d'action à quelqu'un et que la personne ne m'a pas répondu sous 2 semaine, avoir un rappel pour que je la relance.

Si c'est infaisable (y'a toujours moyen non?), y'a t-il un logiciel qui "convertit" tout cela en macro (je pense à l'aide très pratique sous word qui aide à coder la macro), car je ne vais jamais réussir, ne connaissant pas le code adéquat!

Merci pour vos lumières...bonne soirée
beginner2007 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 30/05/2007, 18h06   #2
Responsable Word

 
Avatar de Heureux-oli
 
Homme Olivier Lebeau
Contrôleur d'industrie
Inscription : février 2006
Messages : 17 351
Détails du profil
Informations personnelles :
Nom : Homme Olivier Lebeau
Âge : 47
Localisation : Belgique

Informations professionnelles :
Activité : Contrôleur d'industrie
Secteur : Aéronautique - Marine - Espace - Armement

Informations forums :
Inscription : février 2006
Messages : 17 351
Points : 29 264
Points : 29 264
C'est possible, mais inutile !

Il va falloir lancer la macro et répondre à des questions, il est tout aussi facile de mettre le rappel en manuel sur le message.

Tout ce que je peux te proposer, c'est un code qui lors de l'envoi va stocker le message dans un répertoire de ton choix.

Code :
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As _
Boolean)
If Not Item.Class = olMail Then Exit Sub
 
    Dim oNS As NameSpace
    Dim oFolder As MAPIFolder
 
 
 
 
            Set oNS = Application.GetNamespace("MAPI")
            Set oFolder = oNS.PickFolder
            If TypeName(oFolder) = "Nothing" Then
                Set oNS = Application.GetNamespace("MAPI")
 
                Set oFolder = oNS.GetDefaultFolder(olFolderDeletedItems)
            End If
        Set Item.SaveSentMessageFolder = oFolder
 
End Sub
__________________
J'ai pas encore de décodeur, alors, postez en clair ! Comment mettre une balise de code ?
Débutez en VBA

Mes articles


Dans un MP, vous pouvez me dire que je suis beau, ... mais si c'est une question technique je ne la lis pas ! Vous êtes prévenus !
Heureux-oli est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 31/05/2007, 16h21   #3
Invité de passage
 
Inscription : mai 2007
Messages : 2
Détails du profil
Informations forums :
Inscription : mai 2007
Messages : 2
Points : 0
Points : 0
Par défaut Merci pour la réponse!

Merci bpc pour la rapidité!
Bon je ne comprends rien au code, en tout cas c'est joli. Juste une question: pourquoi est-ce inutile?
C'est vrai que l'on peut mettre le rappel en manuel sur le message, mais cela suscite qu'il lance un rappel même si la personne a effectivement répondu. Là, la personne souhaiterait uniquement les gens qui n'ont pas répondu (pour les harceller).
De plus, le problème du répertoire c'est que cela isole les messages et qu'il faut les reclasser ensuite non?
beginner2007 est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 11h03.


 
 
 
 
Partenaires

Hébergement Web