Переменные в циклах VBA

Question

Я пытаюсь запустить приложение VBA, используя цикл и используя переменные, имена которых зависят от того, где я в цикле. В частности, что-то вроде

Dim i As Integer 
i = 1 
Dim varname() As String 
while i < 50 
varname(i) = asdasd 
i = i + 1 
Wend 

Как-то он не может прочитать varname (i) или что-то еще. Он сообщает об индексе вне диапазона.
Я понятия не имею, в чем проблема, может кто-нибудь может мне помочь?

Answer 1

Необходимо сначала указать свой массив.

Sub max() 

Dim i As Integer 
i = 1 

Dim varname() As String 
ReDim varname(49) '<---- There 

While i < 50 
varname(i) = asdasd 
i = i + 1 
Wend 


End Sub 

Это хороший ресурс для VBA массивов: http://msdn.microsoft.com/en-us/library/office/aa164778(v=office.10).aspx