Discussion :

[laurentabj]

Bonjour,

J'ai réalisé une application sous forme d'une macro complémenatire (xla).
Cette application génère automatiquement :
- une feuille excel contenant une trame de saisie,
- une barre de menu pour accéder aux fonctions de l'application.

Pour une des fonctions de l'appli, je souhaiterais procéder autrement que par la barre de menu. Je voudrais que la feuille générée contienne un bouton pour appeler la procédure correspondante.
Mon CommandButton est donc situé sur un fichier Excel, et il doit appeler l'une des procédures de mon appli xla (hébergée n'importe où, pas de chemin imposé).

Mon problème : comment appeler une procédure étrangère depuis un CommandButton.

J'espère que c'est suffisament clair et que ce sujet vous inspirera...

Merci d'avance

[Gorfael]

Salut
sous macro apprentissabe, tu crées un bouton et tu lui affectes ta macro
et tu regardes ce que fais le code
A+

[laurentabj]

Merci Gorfael pour ta prompte réponse, mais je ne sais pas si je peux affecter à mon bouton un sub() inclu dans une macro xla étrangère.

En tout cas, si j'utilise

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Call monSub

Cela ne fonctionne pas. Qu'en penses-tu ?

[ouskel'n'or]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Application.Run "'Classeur.xla'!Procédure"

Regarde dans l'aide à Run

[laurentabj]

Merci ouskel'n'or, je crois qu'on approche !

Voici le code que j'ai essayé :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub CommandButton1_Click()
Application.Run ("Gammes v4 alpha (allégé).xla!AppelSMB")
End Sub

AppelSMB étant bien sûr la procédure que je cible.

Pour le moment, j'ai un message d'erreur 1004,
"Impossible de trouver la macro 'Gammes v4 alpha (allégé).xla!AppelSMB' "

Est-ce que cette méthode ne suppose pas de connaître le chemin du xla ?

Je précise que mon xla est bien ouvert.

[tirex28]

Bonjour,

Les parentheses sont superflues, d'autre part si le nom du fichier comprend des espace il faut l'entourer d'apostrophes:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Application.Run "'Gammes v4 alpha (allégé).xla'!AppelSMB"

Cordialement,

Tirex28/

[laurentabj]

Trop fort tirex28 !
Merci à tous pour votre aide précieuse.