不能这样用,字符串不能当代码来用的,如果你要获取值,你就必须动态编译。
Functions.remove("函数")Dim Code As StringCode = "return tables(""表A"").current(""第一列"")"Functions.Add("函数",Code)Functions.Complie()Dim str = Functions.Execute("函数")msgbox(str)