EXCEL读取sql server存储过程结果

Question

EXCEL 读取sql server存储过程结果
存储过程带参数
请教如何实现，通过vba也行

Answer 1

Function Procedure(procNam As String) As Recordset
   If Trim(procNam) = "" Then End
   Dim svr$
   Dim user$
   Dim pwd$
   Dim db$
   Dim conn As New ADODB.Connection
   Dim arg As Variant
   Dim procNam_$
   
      svr = "pcxx\sql05"
      user = "sa"
      pwd = "psw"
      db = "OthersPurchaseOrder"
      procNam_ = procNam
      conn.CursorLocation = adUseClient
      conn.Open "driver={SQL Server};" & _
         "server=" & svr & _
         ";uid=sa; " & _
         "pwd=" & pwd & _
         ";database=" & db
         
      Debug.Print procNam_
      Set Procedure = conn.Execute(procNam_)
End Function我自己打包的一個方法,反回結果為記錄集如下調用:sub call_
    dim rs as adodb.recordSet
        set rs = procedure("procedureName")
end sub 

Answer 2

http://topic.csdn.net/u/20100330/12/9a467eab-311b-4cbd-8331-cc47d6c10739.html
将连接方式换成SQL Server的,查询换成存储过程就可以了