Использую Split для разбиения строки (адреса, реквизитов). Но количество значений неодинаково. И когда проходишь циклом через значения, то если значения нет, выдает ошибку. Как посчитать количество значений, полученных через эту функцию? .Count не получается, в справке по этому оператору тоже нет такого.  
aaa = Cells(1, 1).Value  
qqq = Split(aaa, ",")  
Cells(1, 2).Value = qqq(0)  
Cells(1, 3).Value = qqq(1)  
Cells(1, 4).Value = qqq(2)    
Если значений в ячейке (1, 1) больше двух то на Cells(1, 4).Value = qqq(2) выдаст ошибку.  
Если ставить на цикл  
for i = 0 to - то нельзя опереться на конечное число.  
Как быть?