It was not clear for me that you were working with a string.

Surely that the scripting can help you. This is copied from a previous message (original poster JCF):

Dim oSC As ScriptControl
Dim iVal As Integer
Set oSC = New ScriptControl
oSC.Language = "VBScript"

Dim toexe As String
toexe = "4*5"
iVal = oSC.Eval(toexe)

MsgBox iVal, vbOKOnly, "Value of iVal"

>hi eric,
>dear, the equation which i showed will be a string and form that i want to calculate the amount
>
>
>amol