Вызов функции в цикле for не передает значения

Question

Я создаю подпрограмму, которая передает 2 значения в другую подпрограмму с именем "getAvgStockData (ticker, exchange)", которая извлекает данные из Интернета относительно исторических цен компаний и вычисляет скользящее среднее.

Подпункт Iрабочая операция читает данные из таблицы строка за строкой, чтобы передать 2 строки в getAvgStockData (тикер, символ), который извлекает данные и выполняет вычисления.

По какой-то причине не удалось передать 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

Код должен пройти по всему кругу компаний в таблице динамического диапазона.