Ecriture d'une fonction

[yaka]

Bonjour

Je suis en train de m'écrire une fonction.
Par exemple la suivante

Function gain(pa, pv) As Double
gain = Round(pa, 0) * pv - Application.WorksheetFunction.Max(pa * pv * comP, ComE) - (Round(pa, 0) * pa + Application.WorksheetFunction.Max(pa * pa * comP, ComE))

End Function

...où

Const ComE = 7.78
Const comP = 0.0048


Pour la fonction Max suis-je obligé d'écrire à chaque fois Application.WorksheetFunction.??

merci

 

[AV]

Ave,

Le mieux serait que tu nous dises ce que tu cherches à faire avec la fonction perso

''...Pour la fonction Max suis-je obligé d'écrire à chaque fois Application.WorksheetFunction.??...''
Tu peux te contenter de ''Application.Max(...)''

AV [aaa]

 

[yaka]

cette fonction perso fonctionne...
... Mon seul souci est de savoir si je peux raccourcir les lignes de codes?

mais je peux l'expliquer si c'est vraiment nécessaire.

 

[AV]

''...cette fonction perso fonctionne...''

On n'a jamais dit le contraire..
Quoique...la fonction vba ''Round'' étant bien connue comme étant de la deaube, il se pourrait bien que..

Bon... allez...
AV [aaa]

 

[yaka]

AV écrit:

Ave,

Le mieux serait que tu nous dises ce que tu cherches à faire avec la fonction perso

''...Pour la fonction Max suis-je obligé d'écrire à chaque fois Application.WorksheetFunction.??...''
Tu peux te contenter de ''Application.Max(...)''

AV [aaa]

j'avais pas tout lu... je vais donc me contenter de Application.Max()


Merci