есть функция refiner
- Код: Выделить всё
Function refiner(R As Range, ByRef arr() As Double) As Long
которая должна изменить состояние передаваемого ей массива.
при попытке вызвать ее из процедуры test():
- Код: Выделить всё
Sub test()
Dim R As Range
Set R = Worksheets("bmx").Range("A1:B100")
Dim size As Long
size = R.Count
Dim arr() As Double
ReDim arr(size)
Worksheets("tmp").Range.Cells(1, 1) = refiner(R, arr)
End Sub
компилятор сообщает, что я неправильно передаю второй аргумент.
по всей видимости я не понимаю, как использовать аргументы, передаваемые как ссылка.
Помогите, плиз
