评估大于x但小于x的VBA

我正在构build一个应用程序,它必须解释由用户设置的一组指令,这些指令在运行时才会知道。

我通过使用Evaluate函数来实现这一点,如下所示:

Evaluate("5>4") 

如预期的那样返回True。 我的问题是如何评估以下声明:

5大于4,但小于10

当然,我将用variables代替数字。

我意识到我可以将string拆分成两个部分的数组,并单独testing,但是必须有一种方法来传递一个参数来testing。

AND(5>A4,5<10)(5>A4)*(5<10) (结果为0或1)

另一种select可能是ScriptControl Eval ,但它不能访问像Evaluate这样的Excel地址

 With CreateObject("ScriptControl") .Language = "VBScript" ' either VBScript or JScript Debug.Print .Eval("5>4 and 5<10") End With