Lancer un programme à partir d'une feuille

MJ13

XLDnaute Barbatruc

• 13 Juin 2010

• #2

Re : Lancer un programme à partir d'une feuille

Bonjour MD

Clique-droit sur le bouton, affecter une macro.

 

Vote positif 0 Vote négatif

Magic_Doctor

XLDnaute Barbatruc

Supporter XLD

• 13 Juin 2010

• #3

Re : Lancer un programme à partir d'une feuille

Bonjour MJ13

Pas très bien compris...
Je pense qu'il faut quand même spécifier quelque chose dans la macro, à savoir :
"lancer tel programme qui se trouve à tel endroit"

 

Vote positif 0 Vote négatif

MJ13

XLDnaute Barbatruc

• 13 Juin 2010

• #4

Re : Lancer un programme à partir d'une feuille

Re

Il vaut mieux avoir tes fichiers ouverts.

Ensuite des tests pourront te fournir la solution, à savoir si cela fonctionne.

Avec Excel, il vaut mieux tester pour être sur du résultat. Ensuite on voit où le bas blesse 🙂.

 

Vote positif 0 Vote négatif

Magic_Doctor

XLDnaute Barbatruc

Supporter XLD

• 14 Juin 2010

• #5

Re : Lancer un programme à partir d'une feuille

Bonjour,

Je relance le fil, au cas où...

Il s'agit tout simplement de lancer un petit programme en cliquant sur un bouton de la feuille.

Merci pour toute proposition.

 

Vote positif 0 Vote négatif

H

Habitude

XLDnaute Accro

• 14 Juin 2010

• #6

Re : Lancer un programme à partir d'une feuille

cmdLine = "D:\program files\ProgrammeALancer.exe"

Shell cmdLIne, choixouverture

La commande devrait te permettre de choisir l'ouverture désirée

 

Vote positif 0 Vote négatif

Magic_Doctor

XLDnaute Barbatruc

Supporter XLD

• 14 Juin 2010

• #7

Re : Lancer un programme à partir d'une feuille

Bonjour Habitude,

J'ai essayé ainsi et ça a marché :

Sub ouvrir()

Dim x

x = Shell("G:\ZZZZZ\AAA_Perso\ZZZZZZZZ_OK\Tampon Xylo\MoleCalc.EXE", 1)

End Sub

J'ai attribué cette macro au bouton qui doit appeler le programme "MoleCalc.EXE". Quand on clique sur ledit bouton, le programme s'ouvre bien.

Mais voilà, j'ai mis le dossier "Tampon Xylo" contenant le programme et le classeur dans "G:\ZZZZZ\AAA_Perso\ZZZZZZZZ_OK", adresse en effet des plus folkloriques... Si je veux envoyer le classeur à quelqu'un, je doute fort que dans la dichotomie de son disque dur il y ait une adresse semblable. Aussi, serait-il possible de lancer le programme à partir de la feuille, quel que soit l'endroit où l'on a mis le dossier "Tampon Xylo" ?

 

Vote positif 0 Vote négatif

C

Compte Supprimé 979

Guest

• 14 Juin 2010

• #8

Re : Lancer un programme à partir d'une feuille

Buenos Dias Magic_doctor 😉

Si le lecteur "G:" correspond à un dossier sur serveur
normalement, il suffit de faire

Code:

x = Shell("\\NomServeur\ZZZZZ\AAA_Perso\ZZZZZZZZ_OK\Tampon Xylo\MoleCalc.EXE", 1)

A tester 😉

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 14 Juin 2010

• #9

Re : Lancer un programme à partir d'une feuille

Bonjour Magic Doctor, le fil,

Et à la limite, il n'y aura peut-être même pas le fichier MoleCalc.EXE chez le correspondant 🙂

Alors pourquoi ne pas lui faire parvenir un dossier contenant ce fichier et le classeur avec cette macro :

Code:

Sub ouvrir()

Dim x

x = Shell([COLOR="Red"]ThisWorkbook.Path[/COLOR] & "\MoleCalc.EXE", 1)

End Sub

A+

 

Vote positif 0 Vote négatif

MJ13

XLDnaute Barbatruc

• 14 Juin 2010

• #10

Re : Lancer un programme à partir d'une feuille

Bonjour à tous

lancer un programme

Cliquez pour agrandir...

Ah mais j'avais pas tout compris, je pensais que c'était pour lancer une macro.

Je comprend mieux maintenant.

Désolé MD. C'est vrai qu'on a tellement l'habitude d'avoir un mot pour un autre sur XLD 😱.

 

Vote positif 0 Vote négatif

Magic_Doctor

XLDnaute Barbatruc

Supporter XLD

• 14 Juin 2010

• #11

Re : Lancer un programme à partir d'une feuille

Hola job75,

BINGO ! C'était exactement cela qu'il me fallait. Ça marche au poil !

No pasa nada MJ13, il est vrai que souvent on lit en diagonale. C'est pourquoi je ne comprenais pas ta solution.

Bonne fin de journée à tous.

 

Vote positif 0 Vote négatif