请问：使用EXCEL宏读取SQL SERVER的数据，然后把数据填充到EXCEL中
请教：使用EXCEL宏读取SQL SERVER的数据，然后把数据填充到EXCEL中
如题，通过EXCEL宏编程来，使用数据对象ADO访问SQL数据库，从而进行数据查询，并将查询的数据返回到EXCEL中。
谁有代码给一下，谢谢啦，急用。
------解决方案--------------------
没弄过SQL数据库的，下面的代码是查询Excel表的，差不多的代码
如题，通过EXCEL宏编程来，使用数据对象ADO访问SQL数据库，从而进行数据查询，并将查询的数据返回到EXCEL中。
谁有代码给一下，谢谢啦，急用。
------解决方案--------------------
没弄过SQL数据库的，下面的代码是查询Excel表的，差不多的代码
- VBScript code
Sub test()
Dim Sql$
Set conn = CreateObject("adodb.connection")
conn.Open "provider=microsoft.jet.oledb.4.0;extended properties=excel 8.0;data source=" & ThisWorkbook.FullName
Sql = "Select * from [Sheet1$] where 字段='a'"
Sheets(2).Range("a2").CopyFromRecordset conn.Execute(Sql)
conn.Close
Set conn = Nothing
End Sub
------解决方案--------------------
看出哪边有明显的错误呀
运行后报什么错误？