VBA "массив в массиве"

[Naadir]

доброго всем времени !

С VBA я не долго просьба сильно не ругаться коли что не так

Вот какой вопрос.
Есть потребность хранить имена массивов в массиве, а потом к ним обращаться в коде...

dim NameMas(0 To 2) As String

NameMas(0) = "mas1"
NameMas(1) = "mas2"
NameMas(2) = "mas3"

и пытаюсь :

Erase NameMas(0) ( тоесть хочу очистить mas1) он ругаеться....

Подскажите есть ли возможность реализовать ??
Вопрос собственно можноли хранить имена массивов в массиве, а потом к ним обращаться в коде...через массив...

Спасибо !!

[Djeki]

NameMas(0)=""

[Watcher_1]

Сообщение от Djeki

NameMas(0)=""

И что это такое.... Вы просто присвоили пустое значение строковой переменной.
В массиве ведь были не массивы а строки!

[EducatedFool]

VBA не поддерживает обращение к массивам по имени.
Зная имя переменной, ссылающейся на массив, вы не сможете получить доступ к массиву.

Если так уж надо то, чего вы пытаетесь добиться (хотя я очень сомневаюсь в необходимости этого - ибо несколько лет пишу макросы, а с такой необходимостью не сталкивался) - то храните в массиве NameMas не имена массивов, а сами массивы.

[Naadir]

EducatedFool спасибо за четкий ответ.

нельзя получить ссылку про описание храненеия массива в массиве...
смысле как с этоим работать...

и еще может подскажите..

задача примерно в следуещем собрать с 10 листов информацию
с кучей разных условий и в зависимости от условий собирать
разные ячейки
перенести в 1 таблицу

я пытался написать одну процедуру и в одном цикле делать проверку каждого листа по очереди и складывая данные в разные массивы... стопарнулся на том что надо менять имя массива в цикле и немогу додумать как...

может подкинете идейку..

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

Пытаюсь чегото писать можна сказать 2 раз ...такчто сильно не ругайте если пытаюсь изобрести велосипед....

[Hugo121]

Массив в массиве тоже не делал, а вот массив в словаре - приходилось.
Вот:

        If Not oDict.Exists(temp) Then
            ReDim b(1 To 2)
            b(1) = a(i, 3): b(2) = a(i, 7)
            oDict.Add temp, b
        Else
            b = oDict.Item(temp)
            b(1) = b(1) + a(i, 3): b(2) = b(2) + a(i, 7)
            oDict.Item(temp) = b
        End If

Возможно, можно не извлекать массив в переменную перед изменением, но не проверял.

[EducatedFool]

стопарнулся на том что надо менять имя массива в цикле и немогу додумать как...

зачем менять имя???
вы же листы по очереди перебираете...

Используйте один и тот же массив - к примеру, с именем arr
И, к примеру, когда в цикле вы будете обрабатывать 5-й лист (а в массиве будут данные с 4-го листа), просто заносите новые данные в этот же массив (можете предварительно его очистить - Erase arr, хотя это не обязательно, ибо при чтении диапазона методом типа arr = [a1:b10].value исходный массив затирается)
Ведь в момент обработки 5 листа данные с 4 листа уже будут не нужны.

[Naadir]

Сообщение от EducatedFool

зачем менять имя???
вы же листы по очереди перебираете...
Ведь в момент обработки 5 листа данные с 4 листа уже будут не нужны.

Во блин !!! Свежий взгляд !!!

точно ведь !!! я просто хотел сначала все собрать потом выложить разом !
а ведь можно сразу выкладывать полученное !!
и пользоваться по новой..... короче понял !!!

можна наверно еще было увеличить размеры массива и все спихать в 1 как вариант...

но ваш спосуб помойму проще !!!

З.Ы. откуда с Урала кстати ???