With ScriptCtrl
...
.AddObject "Feuille", Me ' Passage d'un objet
...
ret = .Run ("Main") ' Appel d'une function
...
End With
Pour récupérer la valeur retournée par une fonction on peut utiliser la méthode Run() qui retourne un variant
Il est également possible de passer une instance, et d'y coller des propriétés qui seront accessible dans le script et dans vb, donc d'échanger des valeurs
taobang
Messages postés7Date d'inscriptionmardi 26 août 2003StatutMembreDernière intervention 3 septembre 2004 3 sept. 2004 à 14:58
salut ..
bon alors là je dois avouer que je suis dépassé ...
je n'arrive pas à faire fonctionner le retour.
Je n'ai pas de problème et ca depuis le début pour appeler une procédure.. mais par contre, je n' arrive pas à appeler une fonction et utiliser son retour.
J'aimerais bien que tu confirmes ou infirmes le bon fonctionement du code que tu m'as passé pour les fonctions :
With ScriptCtrl
...
.AddObject "Feuille", Me ' Passage d'un objet
...
ret = .Run ("Main") ' Appel d'une function
...
End With
et que Main soit du type :
function Main () as string
end function
ou mieux qu'elle soit du type :
function Main (byval arg1, byval arg2) as string
end function