我使用下面的过程来运行一个sql过程 dbo.CalcItemCost .

Private Sub cmdApplyFilter_Click()
    Dim ItemCode As Variant
    Dim VariantCode As Variant
    ItemCode = Sheets("1-GetItemCost").Range("B3").Value 'Pass value from cell B3 to SellStartDate variable
    VariantCode = Sheets("1-GetItemCost").Range("B4").Value
    With ActiveWorkbook.Connections("CalcItemCostConnection").OLEDBConnection
        .CommandText = "EXEC dbo.CalcItemCost '" & ItemCode & "','" & VariantCode & "'"
        ActiveWorkbook.Connections("CalcItemCostConnection").Refresh
    End With
End Sub

这个过程运行得非常好，从单元格开始在excel表格“1-getitemcost”中显示结果 A7 . 参数 ItemCode & VariantCode 需要传递给程序 dbo.CalcItemCost 分别在单元格b3和b4中指定。
现在，我需要运行另一个sql过程 dbo.CalcItemCost_Detailed 其中我希望传递相同的参数，即。 ItemCode 以及 VariantCode 从细胞中提取 B3 以及 B4 并显示从单元格开始的记录集 A15 如下图所示的我的excel表。

有人能帮我完成上述任务吗？提前谢谢你的帮助。