Имеется пользовательская функция, аргумент которой ссылается на диапазон ячеек. Как значения ячеек этого диапазона присвоит массиву?
Сокращенный код:[vba]Код
Function HighLevACC(DistMapKey)
Dim vX As Integer
Dim Array_DistMapKey() As Variant
vX = DistMapKey.Count
ReDim Array_DistMapKey(1 To vX)
Array_DistMapKey = DistMapKey.Value
MsgBox Array_DistMapKey(1)
End Function
[/vba]
Выдает ошибку когда код обращается к элементу массива: Subscrip out of range (предпоследняя строка кода)
При этом после присвоения массиву диапазона (3-я снизу строка кода), происходит изменение размера массива. Проверял через Lbound и Ubound.