Syntaxe .On Action

Bonjour le forum,

J'ai cette ligne de code que j'aimerais personnaliser:

Code:

---

1 2	WsMod.Shapes("Button 2").OnAction = "Macro1"

---

J'aimerais écrire une ligne de ce type:

Code:

---

1 2	WsMod.Shapes("Button 2").OnAction = ClasseurX.Module1.Macro1

---

mais je ne trouve pas la bonne syntaxe. L'aide Excel n'est pas très explicite sur ce cas.

Merci d'avance.

Bonjour,

Code:

---

1 2	WsMod.Shapes("Button 2").OnAction = "ClasseurX.xls!Macro1" 'Nb : la syntaxe ressemble a celle de application.run

---

Bonjour et merci...

J'ai une question qui va sembler bête, mais si le nom de mon classeur est défini par une variable?

Re,

Tu renseignes ta variable dans un string et ensuite tu fais (a tester) :

Code:

---

WsMod.Shapes("Button 2").OnAction = Mavariable ' par exemple mavariable contient "ClasseurX.xls!Macro1"

---

J'ai tenté un:

Code:

---

1 2 3

MacroAExecuter = NomDeSauvegarde & "!Sauvegarde" WsMod.Shapes("Button 2").OnAction = MacroAExecuter

---

Avec une variable NomDeSauvegarde définie une fois en tant que nom du classeur, l'autre en tant que filename du classeur (je ne savais pas lequel choisir). Et les deux fois, j'ai eu droit à un beau "impossible de trouver la macro", qui est pourtant bien là.

:(

Oups, ça va mieux en faisant:

Code:

---

1 2	MacroAExecuter = "'" & NomDeSauvegarde & "'!Sauvegarde"

---

Piégeux ce VBA. Merci!