Discussion :

[baselunaire]

Bonjour,

J'ai un petit pb que voici :

Une feuille excel contient le nom de fonctions à executer dans VBA.
Donc je tente très naturellement un z=Eval(NomFonction)...
mais j'ai l'impression que la fonction EVAL n'existe pas en VBA Excel...
Auriez vous une idée ou une autre méthode pour que je puisse executer mes fonctions directement par leur nom stocké dans une variable string ?

Merci de votre aide

[random]

evaluate

[baselunaire]

Merci Random, mais ça ne fonctionne pas pour appeler une fonction écrite en VBA dans le meme module.

[random]

mais si, mais si, si on sait s'en servir

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
Function ajout(x As Long) As Long
ajout = x + 1
End Function
 
Function testevaluate(z As Long) As Long
testevaluate = Evaluate("ajout(" & z & ")")
End Function