[求助]请教SQL Server 和Excel的 连接，工作薄和工作薄的连接

sigridl

大家好！

我想问一下，不用建数据源，如何写程序？SQL Server 和Excel的 连接，工作表和工作表的连接，工作薄和工作薄的连接。

我想进行SQL Server 2000 和Excel 之间的数据导入、导出。还有我想用其它工作薄的数据，或其它工作表的数据。我该怎么写程序？

我是一个生手，不怎么懂，希望能说详细点。

先在这谢谢了。

Dim cn As Object   '数据库连接
    Set cn = CreateObject("ADODB.Connection")
    cn.Open = "provider=SQLOLEDB; Data Source =" & ipdzq & ";Initial Catalog =xiwang;uid=sa;pwd=sa; "       ' ipdzq 是数据库所在IP地址
    
    Dim adocomm As Object  '调用存储过程
    Set adocomm = CreateObject("ADODB.Command")
    Set adocomm.ActiveConnection = cn
    adocomm.CommandText = " exec huizong @dwm = '" & dwmq & "',@rq = '" & rq & "'"
    adocomm.Execute

    Dim rs1 As Object     '从表中取值
    Dim sql1 As String, strsql As String
    Set rs1 = CreateObject("ADODB.Recordset")

这是在 VBA 中查询 SQL Server 2000 的数据并显示在 Excel 中的部分程序

顺便还问下这里的 Command 是什么意思。谢谢

sigridl

有没有哪位能告诉我答案啊？我非常需要，急啊！谢谢