mettre les argument de la fonction dans la formule de la cellule

Bonjour a tous
ca m'a complètement sorti de la tète
je suis en train d'adapter ma fonction nBlettre_methode_globale et lui ajouter la gestion des monnaies

en vba c'est OK mais dans une formule les arguments comment se placent -ils

voila le titre de la fonction

Code:

---

Function nBlettre_methode_globale(nombres As String, Optional sstr As String = "virgule", Optional finance As Boolean = False)

---

la formule sans argument ajoute "virgule"

Code:

---

=SI(A13=0;" ";nBlettre_methode_globale(A13))

---

en VBA on peut choisir la monnaie
exemple

Code:

---

MsgBox nBlettre_methode_globale(10000000.2153, "euro", True)

---

qui nous donne

Citation:

---

Dix millions d' euros et vingt-Deux centimes

---

si quelqu'un veut bien se donner la peine de me filer le tuyaux afin que je puisse fermer ce projet ca me ferait bien plaisir
ps: merci pascal de m'avoir poser la colle

Bonjour,

tu vois de la difficulté là où il n'y en a pas :

Code:

---

=SI(A13=0;" ";nBlettre_methode_globale(A13;"euro";True))

---

eric

Bonjour,

Ce ne serait pas

Code:

---

=SI(A13=0;" ";nBlettre_methode_globale(A13),"euro",true)

---

?
Non testé :oops:

hello patrick,
si tu veux passer une constante à ta fonction dans ta formule. Dans la déclaration de ta fonction, tu peux essayer de mettre ByVal :

Code:

---

Function nBlettre_methode_globale(nombres As String, Optional ByVal sstr As String = "virgule", Optional finance As Boolean = False)

---

Ami calmant, J.P

Bonjour le travailleur jurassien

et ben non!! ca moache poas!!!
quand je les met dans la formule il me dit "nombres d'arguments trop important pour cette fonction "

Code:

---

=SI(A13=0;" ";nBlettre_methode_globale((A13),"euro",1))

---

ou

Code:

---

=SI(A13=0;" ";nBlettre_methode_globale(A13);"euro";true)

---

:koi:

Bonjour,

Code:

---

=SI(A13=0;" ";nBlettre_methode_globale(A13;"euro";VRAI))

---

Et comme ça ?

et sans le dernier argument ?

re
oui Joe c'est exact j'avais trouvé chez Silkyroad et son tuto sur les fonctions persos

Code:

---

=SI(A13=0;" ";nBlettre_methode_globale((A13);"euro";1))

---

nickel j'ai mes deux fonctions chiffre en lettres qui marchent impec je vais les mettre dans les contribs
merci a tous les deux
;)

appercu
Pièce jointe 215617