Excel 2003 如何将参数传递给 SQL 存储过程（基于外部源的透视）？

Question

我创建了 Excel 2003 数据透视表，它使用外部源和 SQL 2008。

我在查询中写道：

exec mysproc '20110726', '20110727'

并且它工作正常。但是我需要能够传递从 Excel 单元格获取的日期。

最干净/最短的解决方案是什么？

Answer 1

找到了答案。添加了附加到以下子项的按钮：

Sub RefreshPivotQuery()

    Dim d1 As String
    Dim d2 As String

    d1 = Format(Sheets("Main").Range("Date1"), "yyyymmdd")
    d2 = Format(Sheets("Main").Range("Date2"), "yyyymmdd")

    Dim ws As Worksheet
    Set ws = Sheets("Pivot")

    ws.PivotTables(1).PivotCache.CommandText = "exec mysproc '" + d2 + "', '" + d1 + "'"

End Sub