activesheet.cells(1,1).select
activecell.value
就能返回a1里的值啊
不能直接写到sql代码里啊.你的sql应该是在程序里拼合生成的.
比如:
dim abc as string
dim mySql as string
abc=activesheet.cells(1,1).value
mySql="select * from 某表 where 发货单=" & "'" & abc & "'"
这样就行啦
--------------------------------------
补充说明:
一般来说,sql语句里,字符串是用单引号提示的,所以,你要表达的发货单号,如果是字符串的话,必须用单引号括起来,否则sql语句会出错的.
反正,mySql变量里最后出现的内容应该是:
select * from list_table where 发货单='DO-2008-1001'
这样才是完整正确的查询.你要做的就是拼接出这个句子.