Calculer une expression simple

Contenu du snippet

Function CalcEx(ByVal Text As String)
'Emploi de la fonction existante (toutes expressions math valides)
CalcEx = Evaluate(Text)
End Function

Sub test()
MsgBox CalcEx("1 + 2 - 3")
End Sub



Compatibilité : VBA

Disponible dans d'autres langages :

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.