Mail.ruПочтаМой МирОдноклассникиВКонтактеИгрыЗнакомстваНовостиКалендарьОблакоЗаметкиВсе проекты

VBA Excel

@ntykus Мыслитель (6723), закрыт 11 лет назад
Есть массив с данными. Он содержит в себе энное количество пустых элементов, подскажите каким образом удалить из массива пустые элементы
Лучший ответ
Alexey N Просветленный (34841) 11 лет назад
p = 1
for i = 1 to size
if (not a[ i ] пустое) then я тут хз как проверять на пустоту, вернее что вы имеете в виду
a[ p ] = a[ i ]
p = p+1
end if
next
Арсен АрутюнянГуру (4688) 11 лет назад
Еще поставьте счетчик, сколько пустих элементов - K
Ну и в конце изменить размер массива: ReDim a(size - K)
gruz Мыслитель (8310) redim preserve вообще-то
Остальные ответы
gruz Мыслитель (8310) 11 лет назад
создать новый при копировании пропускать вроде только так.

или в дополнительном цикле смещать все, что выше удаляемого элемента
Арсен АрутюнянГуру (4688) 11 лет назад
Ну так не интересно... дополнительный массив
gruz Мыслитель (8310) ну так я же написал, тогда смещением. в цикле просто смещаем i, i+1 на 1 ниже. удаление i-ого элемента for i=1 to maxi a(i)=a(i+1) next i redim preserve (maxi-1) как то так
Похожие вопросы