Evaluate error?

[adulador]

Hi,

I'm running the evaluate vba function.

Sub Test1()
Dim dbValue As Double
dbValue = 3.1415
MsgBox Evaluate("SIN(" & dbValue & ")")
End Sub

Sub Test2()
Dim dbValue As Double
dbValue = 3
MsgBox Evaluate("SIN(" & dbValue & ")")
End Sub

The first does not work, but the second does. It's not because of Pi, it's because of floating point. If dbValue, instead of 3.1415, has a value of 1, it works, but 1.1 is not working, neither 1.2, nor 1.2345678,... only integers.

Any idea?

Kind Regards

 

[adulador]

That is because your System/Excel/VBA language configuration are "syncronised" to what it should be.
In other PC default configurations (Spanish, and I suppose all latinamerican), I "predict" it would crash, because VBA does not change the decimal separator between (but System and Excel do).

In order to not get an error with the eval function any spanish/whatever should change the decimal configuration to English default. As soon as I did it, worked flawlessly, so, the problem was there.