basculer vers programme dans macro excel

pipouche · 5 Octobre 2006

Bonjour,

Dans une feuille Excel j'ai un bouton derrière lequel j'ai affecté une macro.
Cette macro est censée déclencher le basculement vers outlook et non pas son ouverture car outlook est ouvert en permanence.
Voilà ce que j'ai écrit pour l'instant, mais bien sûr ça ouvre une seconde fois outlook.

'Sub BasculeProgramme()
ValRetour = Shell("C:\Program Files\Microsoft Office\OFFICE11\OUTLOOK.EXE", 1)
Application.Wait Now + TimeValue("00:00:04")

Merci de votre aide.
Pipouche

MichelXld · 5 Octobre 2006

Re : basculer vers programme dans macro excel

bonjour

si Outlook est ouvert, tu peux tester

Code:

Dim Appli As Object
On Error Resume Next
Set Appli = GetObject(, "Outlook.Application")
If Appli Is Nothing Then
    MsgBox "Outlook est fermé"
Else
    Appli.ActiveExplorer.Activate
End If

bon apres midi
MichelXld

basculer vers programme dans macro excel

pipouche

XLDnaute Nouveau

MichelXld

XLDnaute Barbatruc

Discussions similaires

basculer vers programme dans macro excel

pipouche

XLDnaute Nouveau

MichelXld

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency