Evaluate, une fonction originale

Les programmeurs ignorent souvent la fonction Evaluate, une fonction originale du VBA. Prenons l’exemple ci-dessous, dans lequel cinq valeurs aléatoires sont tirées et où l’on affiche leur moyenne :


La moyenne est calculée directement en B7 grâce à la formule =moyenne(B1:B5). Mais on l’obtient aussi dans une fenêtre de message grâce à la macro suivante :

Sub Moyenne()
MsgBox "Moyenne : " & Evaluate("average(B1:B5)")
End Sub

Certes, nous aurions pu remplacer :
Evaluate("average(B1:B5)")
par :
Application.average(B1:B5)
mais n’est-ce pas tellement plus original avec la fonction Evaluate ?