有关dlookup获取表内存储的公式问题

pascal331

我将lookup公式存放于表内，在vba中用dlookup提取相应公式，但是提取出来的公式加上了引号不会自行计算了，请问诸位，是哪里出问题了？
即表内存放公式：lookup(k,{0.4,0.03;0.5,0.04;0.6;0.05})
vba中获取： a=dlookup（……
结果变成： a = “lookup(k,{0.4,0.03;0.5,0.04;0.6;0.05})”，不会运算了，请问如何解决？

huangli0356

果然精彩...谢谢指导^

pascal331

roych 发表于 2013-1-9 22:44
我想，这里需要更正两个问题。
1、Excel表里的Lookup函数不适用于Access。同样地，Access里的Dlookup函数跟 ...

谢谢了，受益匪浅。
但是为什么改成这样就会报错？

rst.Open "select 成绩 from 成绩表 where 姓名=[forms]![主窗体]![姓名]", CurrentProject.Connection, adOpenKeyset, adLockOptimistic

应该怎么修改？

roych

我想，这里需要更正两个问题。
1、Excel表里的Lookup函数不适用于Access。同样地，Access里的Dlookup函数跟Excel里的Lookup函数也不是一回事（Excel里倒是有Dlookup函数，但也是用于标准Excel数据表中的）
2、如果执行VBA的话，可以通过Excel本身中写宏来完成，又或者在Access里对Excel宏（这一点在论坛里已有版友进行了回答，请自行搜索）或者Excel函数进行调用。

解释完这两个问题之后，现在可以把两年前的一个旧帖发给你，希望你能够从中学会如何在Access中调用Excel函数：
http://www.office-cn.net/thread-96740-1-1.html

pascal331

求解啊，用过字符串截取函数之后赋值给a有变成a = “lookup(k,{0.4,0.03;0.5,0.04;0.6;0.05})”，问题没有解决啊