fonction Run dans un Userform

Bonjour,

je galère avec la fonction run dans une sub dans un userform.

voici le code :

Code:

---

1 2 3 4 5 6 7 8 9 10

Private Sub Calculate_Button_Click() Dim MyVal As String   Call GetValues ' une sub qui recupere des données pour completer le dico MyDicoParam   'Le nom de la sub selon le valeur qui est choisi dans le combobox MyVal = Application.WorksheetFunction.Substitute(Me.Pricing_Name.Value, " ", "") & "PO" T = 90 ' MyDicoParam("StrikeDate") - Date 'jour ouvré? Call ThisWorkbook.Application.Run("NewDatas." & MyVal, 1, MyDicoParam("UnderPrice"), MyDicoParam("Strike"), MyDicoParam("FreeRate") / 100, MyDicoParam("Vol") / 100, T)

---

Le nom de mon userform c'est NewDatas

Il n'arrive pas executer la sub que je veux utiliser avec le run, je sais le faire pour utiliser une sub dans un module mais il semble que dans un userform ca ne fonctionne pas .

Merci

Bonjour à toi,

Pourrais tu être plus précis quand tu dit qu'il n'arrive pas à exécuter la sub.
Tu as un message d'erreur ?
Que se passe t'il exactement ?

Pour info sur MSDN à propos de la fonction Run il est indiqué :

Citation:

---

Les objets qui sont transmis à la macro en tant qu’arguments sont convertis en valeurs (en appliquant la propriété Value à l’objet). Cela signifie que vous ne pouvez pas passer d’objets aux macros à l’aide de la méthode Run.

---

Hors tu passe quasiment que des objets....

Bonsoir,
Je ne comprends pas, si tu veux utiliser un userform et si il s'appel NewDatas olors NewDatas.show.

Si tu veux utiliser un méthode avec passage de paramètres il faut déclarer une sub en public.

Code:

---

1 2 3 4 5 6 7 8

Pubic sub Test(param as string) Msgbox param Me.show   Sub Main() NewDatas.test "Toto" End sub

---

D'accord donc je ne peux pas le faire à priori. J'ai mis ma sub dans un module du coup

Code:

---

Call ThisWorkbook.Application.Run("Sub_Pricing." & MyVal, OptionType, MyDicoParam("UnderPrice"), MyDicoParam("Strike"), MyDicoParam("FreeRate") / 100, MyDicoParam("Vol") / 100, T / 365)

---

Tempis donc on ne peux effectivement pas le faire

Merci en tout cas.

Un userform c'est une classe, pour accéder à un sub de la classe en dehors de la classe il faut déclarer cet sub en public.mais il faut appeler cette sub via une déclinaison de la classe.

MyUserForm.MYSubPublicJe ne vois pas le problème je pense que tu peux faire un run si tu décline bien la classe!

Salut
Pourquoi utilises tu Run et pas un call ?
Par défaut dans un userform une macro est précédée de private, pour la lancer d ailleur il faut qu elle soit PUBLIC.
On ne peut pas lancer directement un userform d un autre classeur, il faut avoir une macro dans un module du classeur contenant l userform

Bonjour,

Je reviens avec du retard mais vos deux derniers messages m'ont aidé a resoudre le problème et en plus j'ai appris bcp de chose en me documentant plus precisement sur les caracteristiques des userforms . Merci bcp , je suis un peu plus au clair sur la structure et la theorie derriere :)