Basculer vers un programme dans macro excel

Signaler
Messages postés
7
Date d'inscription
vendredi 20 février 2004
Statut
Membre
Dernière intervention
5 octobre 2006
-
Messages postés
16114
Date d'inscription
mardi 11 mars 2003
Statut
Contributeur
Dernière intervention
26 juillet 2021
-
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

5 réponses

Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
57
Salut,
Essaie ceci.

Call AppActivate("Outlook")

@+,   Ju£i?n
Messages postés
7
Date d'inscription
vendredi 20 février 2004
Statut
Membre
Dernière intervention
5 octobre 2006

merci,

mais voilà le message d'erreur :

Erreur d'exécution '5' : argument ou appel de procédure incorrect

Pipouche
Messages postés
7
Date d'inscription
vendredi 20 février 2004
Statut
Membre
Dernière intervention
5 octobre 2006

finalement j'ai trouvé :

Dim ReturnValue


ReturnValue = Shell("c:\Program Files\Microsoft Office\OFFICE11\OUTLOOK.EXE", 1)


Encore merci

Pipouche
Messages postés
7
Date d'inscription
vendredi 20 février 2004
Statut
Membre
Dernière intervention
5 octobre 2006

Bé non je suis bête je reviens au départ , ca ouvre une nouvelle fois outlook ça ne bascule pas.
Désolée !
Je ne comprends pas pourquoi ca bug avec AppActivate ?

Pipouche
Bonjour,

Essaie sans Call !
AppActivate("Outlook")


;°)
Messages postés
16114
Date d'inscription
mardi 11 mars 2003
Statut
Contributeur
Dernière intervention
26 juillet 2021
555 > Nassim
Bonjour Nassim
J'espère pour pipouche qu'il n'attends pas ta réponse depuis 15 ans...
Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
57
Re,


Je ne sais pas non plus car chez moi cela fonctionne (Si Outlook est déjà lancé)






@+,   Ju£i?n