for循环中的调用函数未传递值

Question

我正在创建一个子项，该子项将2个值传递到另一个名为“ getAvgStockData（ticker，exchange）”的子项，该子项从网络中获取有关公司历史价格的数据并计算移动平均值。

正在处理的子项逐行从表中读取数据，以将2个字符串传递给getAvgStockData（ticker，symbol），后者将提取数据并进行计算。

由于某些原因，无法使用下面的代码传递2个字符串，有什么想法吗？预先谢谢你！

Sub getAllAvgStockData()

 On Error Resume Next
    Application.ScreenUpdating = False

    Dim companySymbols As Range

    Set companySymbols = Worksheets("ALL Public Companies").Range("companyRange")

    For Each Row In companySymbols.Rows
       Call getAvgStockData(companySymbols.Rows(tickerSymbol.cellvalue), 
         companySymbols.Rows(exchangeSymbol.cellvalue))         
    Next Row

    Application.ScreenUpdating = True

End Sub

代码应在动态范围表中遍历整个公司范围。