Переразметка массива в VBA

[filat]

Столкнулся с тем что в пределах кода VBA ружно изменить размер массива, но код:

Код - Visual Basic [Выбрать]

1. ReDim Arr (100)

вызывает сообщение об ошибке. Вчем может быть причина?

[mikazakov]

вызывает сообщение об ошибке

Филат а ты как массив то объявил? Поди сразу размер указал при декларации? Типа

Код - Visual Basic [Выбрать]

1. Dim sngArray(10) As Single

?

Попробуй объявить его динамическим, типа:

Код - Visual Basic [Выбрать]

1. Dim sngArray() As Single

[filat]

Я указывал

Код - Visual Basic [Выбрать]

1. Dim Arr(100) As Double

Попробуй объявить его динамическим, типа:

Код - Visual Basic [Выбрать]

1. Dim sngArray() As Single

В таком варианте код выдает ошибку при попытке добавления нового элемента.
P.S. ошибка появляется при попытке записи по новому адресу через знак =

[Алексей Кулик]

Насколько я помню, должно сработать нечто типа

Код - Visual Basic [Выбрать]

1. Dim aSingle() As Single
2. ' ...
3. ReDim aSingle (100)
4. ' ...
5. ReDim Preserve aSingle(200)