Array or user-defined type expected - VB

Формулировка задачи:

Всем доброго утра.
Сегодня столкнулся со следующей проблемой. Есть процедурка, которая начиная с указанного элемента в массиве увеличивает его и все последующие элементы на указанную величину:

Sub shiftArray(ByRef shiftingArray() As Integer, row As Integer, col As Integer, shift As Integer)

For j = col To UBound(shiftingArray, 2)
    shiftingArray(row, j) = shiftingArray(row, j) + shift
Next

For i = row + 1 To UBound(shiftingArray, 1)
    For j = 0 To UBound(shiftingArray, 2)
        shiftingArray(i, j) = shiftingArray(i, j) + shift
    Next
Next

End Sub

В другой процедуре имеется массив, сначала объявленный, его размеры были определены в самой процедуре:

Dim hBounds() As Integer
...
ReDim hBounds(maxLvl - 1, 2)

В дальнейшем я вызываю свою процедуру:

Call shiftArray(hBounds, lvl - 1, 1, 1)

Вот тут компилятор сразу выдает ошибку :"Array or user-defined type expected"
Вот тут мне и непонятно, вроде в процедуре в качестве параметра указан массив Integer, при вызове передаю параметр такого же типа, а ошибка вылетает.
Подскажите, пожалуйста, в чем тут косяк?

Решение задачи: «Array or user-defined type expected»

textual
                            Листинг программы 
                        
                            Private Sub Command1_Click()

Dim k() As Integer
Call r(k)
ReDim k(5, 5)
Call r(k)

End Sub
Sub r(ByRef w() As Integer)

End Sub