vérifier si Outlook est lancé

vérifier si Outlook est lancé - VB/VBA/VBS - Programmation

Marsh Posté le 18-01-2011 à 01:26:18    

Bonjour,
J'ai une 'tite appli sous Excel qui tourne bien mais qui nécessite qu'Outlook soit lancé.
Comment vérifier si c'est le cas ou non avant de lancer un shell
Merci.

Reply

Marsh Posté le 18-01-2011 à 01:26:18   

Reply

Marsh Posté le 18-01-2011 à 02:29:07    

C'est bon j'ai trouvé...
 

Code :
  1. Function OutlookOuvert() As Boolean
  2. Dim oOL As Object
  3. On Error Resume Next
  4. Set oOL = GetObject(, "Outlook.Application" )
  5. On Error GoTo 0
  6. OutlookOuvert = Not (oOL Is Nothing)
  7. Set oOL = Nothing
  8. End Function


Source : Developpez.com
A+


Message édité par galopin01 le 18-01-2011 à 02:31:41
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed