Hello !
Alors vraiment simplement :
Function EURO_ERIC(Vmontant As Double)
EURO_ERIC = Vmontant / 6.55957
End Function
Si dans Excel, en A1 tu tapes 100
En A2 tu tapes =EURO_ERIC(A1) tu obtiendras 15,24...
Si tu enregistres ton classeur en fichier xla et que le coches dans les macros complémentaires, ta fonction sera toujours disponible.
On peut imaginer aussi :
Function EURO_ERIC(Vmontant As Double, Sens as Boolean)
If Sens = True then
EURO_ERIC = Vmontant / 6.55957
Else
EURO_ERIC = Vmontant * 6.55957
End If
End Function
En A2 : =EURO_ERIC(A1, VRAI) donnera 15.24....
et =EURO_ERIC(A1, FAUX) donnera 655,957
La synthaxe en fait est : Function NOM_DE_LA_FONCTION(Variable1, Variable2...)
NOM_DE_LA_FONCTION = Variable1 + Variable2....
End Function
Bon courage
Baroude