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 29/02/2008, 11h57   #1
Candidat au titre de Membre du Club
 
Inscription : février 2006
Messages : 25
Détails du profil
Informations forums :
Inscription : février 2006
Messages : 25
Points : 12
Points : 12
Par défaut lancer internet explorer lors de l'envoi d'un mail

Bonjour,

J'ai essayer de programme une macro, qui a pour role de lancer internet explorer lorsque j'envoi un mail.

En d'autre terme, detecter l'evenement "envoyer" et placer le code suivant:
Shell "explorer.exe http://www.developpez.com"

Merci pour votre aide.
zidosni est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 29/02/2008, 12h38   #2
Candidat au titre de Membre du Club
 
Inscription : février 2006
Messages : 25
Détails du profil
Informations forums :
Inscription : février 2006
Messages : 25
Points : 12
Points : 12
J'ai trouve la solution, l'evenement "envoyer un mail" est Application_ItemSend.
donc le code doit etre dans ThisOutlookSession :

Code :
1
2
3
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Shell "explorer.exe http://www.developpez.com"
End Sub

Je suis un debutant, mais un combattant!
Merci.
zidosni est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 08h21.


 
 
 
 
Partenaires

Hébergement Web