EXCEL(VBA)~SQL 经典写法范本汇集.doc

EXCEL(VBA)SQL 经典写法范本汇集（转）2008-11-27 10:41需引用 microsoft activeX Data Objects 2.8 library1.sql = select 构件名称,构件代号,横长度,横数量,竖长度,竖数量,比重,相应工艺 from 参数$B2:K1916where (大样代码= & DYDH & ) and (内外框=WKXC)2.sql = select 构件名称,构件代号,横长度,横数量,竖长度,竖数量,比重,相应工艺 from 参数$B2:K & CSMaxrow & where (大样代码= & DYDH & ) and (内外框=WKXC)*A、根据本工作簿的1个表查询求和写法范本Sub 查询方法一()Set CONN = CreateObject(ADODB.Connection)CONN.Open provid