Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

appeler un programme par un bouton

16 réponses
Avatar
Lionel
Salut à vous tous

Je cherche un peu d'aide...
Je voudrais ouvrir la calculette de windows en cliquant sur un bouton. J'ai
bien essayé le lien hypertexte mais une demande d'autorisation se fait et je
n'arrive pas à la desactiver. y-aurait-il un moyen similaire d'ouvrir un
programme par macro?
Merci de votre aide
Lionel

10 réponses

1 2
Avatar
RGI
Bonjour

Comme ceci sur xp

Sub autre()
A = Shell("C:WINDOWSsystem32calc.exe", 1)
End Sub

salutations

RGI

Salut à vous tous

Je cherche un peu d'aide...
Je voudrais ouvrir la calculette de windows en cliquant sur un bouton. J'ai
bien essayé le lien hypertexte mais une demande d'autorisation se fait et je
n'arrive pas à la desactiver. y-aurait-il un moyen similaire d'ouvrir un
programme par macro?
Merci de votre aide
Lionel





Avatar
Youky
RetVal = Shell("C:WINDOWSCALC.EXE", 1)
c'est ok
Youky
"Lionel" a écrit dans le message de news:
44b66f4b$0$7770$
Salut à vous tous

Je cherche un peu d'aide...
Je voudrais ouvrir la calculette de windows en cliquant sur un bouton.
J'ai

bien essayé le lien hypertexte mais une demande d'autorisation se fait et
je

n'arrive pas à la desactiver. y-aurait-il un moyen similaire d'ouvrir un
programme par macro?
Merci de votre aide
Lionel




Avatar
AV
Ou encore...

Application.ActivateMicrosoftApp 0

AV
Avatar
Lionel
Merci de votre réponse si rapide. J'essaie...
A+

"RGI" a écrit dans le message de
news:
Bonjour

Comme ceci sur xp

Sub autre()
A = Shell("C:WINDOWSsystem32calc.exe", 1)
End Sub

salutations

RGI

Salut à vous tous

Je cherche un peu d'aide...
Je voudrais ouvrir la calculette de windows en cliquant sur un bouton.
J'ai


bien essayé le lien hypertexte mais une demande d'autorisation se fait
et je


n'arrive pas à la desactiver. y-aurait-il un moyen similaire d'ouvrir un
programme par macro?
Merci de votre aide
Lionel







Avatar
jps
ou plus simplement :
Shell "C:WINDOWSsystem32calc.exe", 1
jps


"RGI" a écrit dans le message de
news:
Bonjour

Comme ceci sur xp

Sub autre()
A = Shell("C:WINDOWSsystem32calc.exe", 1)
End Sub

salutations

RGI

Salut à vous tous

Je cherche un peu d'aide...
Je voudrais ouvrir la calculette de windows en cliquant sur un bouton.
J'ai
bien essayé le lien hypertexte mais une demande d'autorisation se fait et
je
n'arrive pas à la desactiver. y-aurait-il un moyen similaire d'ouvrir un
programme par macro?
Merci de votre aide
Lionel







Avatar
Youky
et pour ouvrir Word remplacer 0 par 1
je viens de tester ...ça marche
me reste plus qu'a tester tous les numéros
Du tonnerre, mais ou pioches-tu donc cela pour pondre des trucs comme ca...
Encore.... chapeau
Le Zizou d'Excel nous a mis un bon coup de tête.
Youky


"AV" a écrit dans le message de news:
#
Ou encore...

Application.ActivateMicrosoftApp 0

AV




Avatar
jps
allons, youky, tu apprendras vite comme nous l'apprîmes au fil des ans que
les Zizous MVP n'empruntent pas les mêmes portes (de vestiaires) que la
valetaille
jps

"Youky" a écrit dans le message de news:
44b69401$0$1002$
et pour ouvrir Word remplacer 0 par 1
je viens de tester ...ça marche
me reste plus qu'a tester tous les numéros
Du tonnerre, mais ou pioches-tu donc cela pour pondre des trucs comme
ca...
Encore.... chapeau
Le Zizou d'Excel nous a mis un bon coup de tête.
Youky


"AV" a écrit dans le message de news:
#
Ou encore...

Application.ActivateMicrosoftApp 0

AV








Avatar
isabelle
bonjour Youky,

pas besoin de faire des tests, place ton curseur sur le mot "ActivateMicrosoftApp" et appuis sur la touche F1
et tu verra :

1 xlMicrosoftWord
2 xlMicrosoftPowerPoint
3 xlMicrosoftMail
4 xlMicrosoftAccess
5 xlMicrosoftFoxPro
6 xlMicrosoftProject
7 xlMicrosoftSchedulePlus

isabelle

et pour ouvrir Word remplacer 0 par 1
je viens de tester ...ça marche
me reste plus qu'a tester tous les numéros
Du tonnerre, mais ou pioches-tu donc cela pour pondre des trucs comme ca...
Encore.... chapeau
Le Zizou d'Excel nous a mis un bon coup de tête.
Youky


"AV" a écrit dans le message de news:
#

Ou encore...

Application.ActivateMicrosoftApp 0

AV









Avatar
jps
bonjour mon ange
pas d index dans l'aide de XL2003 : seulement le nom développé des
applications tel que tu les donnes, encore que Word ne soit pas à la même
place
bouh....ce Gates, un vrai Materazzi, je vous dis
jps

"isabelle" a écrit dans le message de news:
e5Ff$
bonjour Youky,

pas besoin de faire des tests, place ton curseur sur le mot
"ActivateMicrosoftApp" et appuis sur la touche F1
et tu verra :

1 xlMicrosoftWord
2 xlMicrosoftPowerPoint
3 xlMicrosoftMail
4 xlMicrosoftAccess
5 xlMicrosoftFoxPro
6 xlMicrosoftProject
7 xlMicrosoftSchedulePlus

isabelle

et pour ouvrir Word remplacer 0 par 1
je viens de tester ...ça marche
me reste plus qu'a tester tous les numéros
Du tonnerre, mais ou pioches-tu donc cela pour pondre des trucs comme
ca...
Encore.... chapeau
Le Zizou d'Excel nous a mis un bon coup de tête.
Youky


"AV" a écrit dans le message de news:
#

Ou encore...

Application.ActivateMicrosoftApp 0

AV










Avatar
Excel...lent
Salut Lionel,

Tu copies le code suivant dans un module.
Tu associes cette macro avec ton bouton.

Sub Calculette()
Application.ActivateMicrosoftApp xlMicrosoftcalc
End Sub

Amicordialement.

Marc
1 2