OVH Cloud OVH Cloud

Appel de procédure

5 réponses
Avatar
MP
Bonjour,

Pourquoi ce code ne marche pas ?

With monbouton
.OnAction = "AppelAide(" & Nom$ & ")"
End With

Sub AppelAide(Nom$)

Ce qui me donne le message suivant :

Impossible de trouver la macro 'AppelAide(monTexte)'.

Merci

Marc

5 réponses

Avatar
Ardus Petus
Bonjour,

Essaie de déclarer
Public Sub AppelAide(Nom$)
voir si ça marche mieux.

--
AP

"MP" a écrit dans le message de
news:du6lj3$r5r$
Bonjour,

Pourquoi ce code ne marche pas ?

With monbouton
.OnAction = "AppelAide(" & Nom$ & ")"
End With

Sub AppelAide(Nom$)

Ce qui me donne le message suivant :

Impossible de trouver la macro 'AppelAide(monTexte)'.

Merci

Marc




Avatar
MP
C'est pas mieux

MP

"Ardus Petus" a écrit dans le message de
news:
Bonjour,

Essaie de déclarer
Public Sub AppelAide(Nom$)
voir si ça marche mieux.

--
AP

"MP" a écrit dans le message de
news:du6lj3$r5r$
Bonjour,

Pourquoi ce code ne marche pas ?

With monbouton
.OnAction = "AppelAide(" & Nom$ & ")"
End With

Sub AppelAide(Nom$)

Ce qui me donne le message suivant :

Impossible de trouver la macro 'AppelAide(monTexte)'.

Merci

Marc








Avatar
Ardus Petus
Envoie-moi ton classeur sur http://cjoint.com
--
AP

"MP" a écrit dans le message de
news:du6n4u$7ti$
C'est pas mieux

MP

"Ardus Petus" a écrit dans le message de
news:
Bonjour,

Essaie de déclarer
Public Sub AppelAide(Nom$)
voir si ça marche mieux.

--
AP

"MP" a écrit dans le message de
news:du6lj3$r5r$
Bonjour,

Pourquoi ce code ne marche pas ?

With monbouton
.OnAction = "AppelAide(" & Nom$ & ")"
End With

Sub AppelAide(Nom$)

Ce qui me donne le message suivant :

Impossible de trouver la macro 'AppelAide(monTexte)'.

Merci

Marc












Avatar
Yvan
Bonjour MP et AP.

Il n'est pas possible (sauf astuce éventuelle que j'ignore) de passer d'argument
à la procédure définie dans .OnAction
Par conséquent:

.OnAction = "AppelAide"

et

Sub AppelAide

devrait fonctionner. Si il y a des paramètres à passer quand même, il faudra
recourir à des variables dont la portée sera suffisante (au niveau Module par
exemple.

@ +

Yvan

"MP" a écrit dans le message de news:
du6lj3$r5r$
Bonjour,

Pourquoi ce code ne marche pas ?

With monbouton
.OnAction = "AppelAide(" & Nom$ & ")"
End With

Sub AppelAide(Nom$)

Ce qui me donne le message suivant :

Impossible de trouver la macro 'AppelAide(monTexte)'.

Merci

Marc




Avatar
MP
Merci, je pense que c'est la bonne réponse.

Marc

"Yvan" <yvan.echanges(enlever ceci)@free.fr> a écrit dans le message de
news:%
Bonjour MP et AP.

Il n'est pas possible (sauf astuce éventuelle que j'ignore) de passer
d'argument

à la procédure définie dans .OnAction
Par conséquent:

.OnAction = "AppelAide"

et

Sub AppelAide

devrait fonctionner. Si il y a des paramètres à passer quand même, il
faudra

recourir à des variables dont la portée sera suffisante (au niveau Module
par

exemple.

@ +

Yvan

"MP" a écrit dans le message de news:
du6lj3$r5r$
Bonjour,

Pourquoi ce code ne marche pas ?

With monbouton
.OnAction = "AppelAide(" & Nom$ & ")"
End With

Sub AppelAide(Nom$)

Ce qui me donne le message suivant :

Impossible de trouver la macro 'AppelAide(monTexte)'.

Merci

Marc