Faire appel à une fonction sous VB Excel

Fermé
-
 zdios -
Bonjour,

j'ai une fonction qui calcul un coût en fonction de deux paramètres: n et j. J'aimerai faire appelle à cette fonction dans un sub mais il ne comprend pas mon code que je vous donne si dessous:

Function coutstock(j As Integer, n As Integer)
j+n (par exemple)
end function


sub test
module1.coutstock(2,4)
end sub


il ne comprend pas: coutstock(2,4); pourriez vous m'aider

merci

3 réponses

Messages postés
18321
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
27 janvier 2022
1 003
et en mettant call devant l'appel à la fonction ?
Messages postés
249
Date d'inscription
samedi 8 mars 2008
Statut
Membre
Dernière intervention
2 août 2012
335
bonjour

essaye :
Function coutstock(j As Integer, n As Integer)
    coutstock = j + n '(par exemple)
End Function


Sub test()
    x = coutstock(2, 4)
    MsgBox ("Cout= " & x)
End Sub

à plus
merci beaucoup les gars!

les deux solutions marchent!! comme quoi c'était pas si dur que ca faut croire.

A bientot peut être.