Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

création de fonction

L

laurent J

Guest
bonsoir

j'ai essayé de créer une fonction complémentaire mais lorsque je l'utilise elle s'arrête sur le 2ème Max et j'ai le message suivant "erreur de compilation, sub ou function non définie"

voici cette fonction
----------------------------------
Function pvm(qte, pa)

pvm = Max((qte) * (pa) + Max((qte) * (pa) * 0.0048, 7.78) / ((qte) - (qte) * 0.0048), (qte) * (pa) + Max((qte) * (pa) * 0.0048, 7.78) + 7.78) / (qte)

End Function


merci pour votre aide
 
W

wally

Guest
Bonjour Laurent J et le forum,

Essaye ceci :

Function pvm(qte, pa) As Double

pvm = Application.WorksheetFunction.Max((qte) * (pa) + Application.WorksheetFunction.Max((qte) * (pa) * 0.0048, 7.78) / ((qte) - (qte) * 0.0048), (qte) * (pa) + Application.WorksheetFunction.Max((qte) * (pa) * 0.0048, 7.78) + 7.78) / (qte)

End Function


Slts

wally
 

Discussions similaires

Réponses
1
Affichages
251
Réponses
18
Affichages
1 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…