Вопрос по VBA

компьютеры VBA

Хочу реализовать следующее: проверка определенной колонки в Excel, если значение в ней удовлетворяет заданному, то сносить строку целиком.
В делфи алгоритм я бы выбрал следующий: вводил бы некую переменную i, присваивал бы ей значение 1 а потом бы запустил цикл
for i:=1 to 5000 do begin
if "значение в ячейке с адресом [А(ряд), i(колонка)]"=25 (условная цифра) then "удалить строку";
i:=i+1; end;

C VBA же я знаком целый день уже. Вот те функции, которые (ИМХО) могут мне понадобиться
удалить строку:
Rows("2:2").Select
Selection.Delete Shift:=xlUp
Вот и подскажите знающие люди, пожалуйста, как осуществить цикл проверки и добавить вместо Rows("2:2") номера тех рядов, которые мне нужны. Спасибо.
Ответы:
Function test()
   For i = ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Row To 1 Step -1
       If ActiveSheet.Cells(i, 1).Value = 3 Then
           ActiveSheet.Rows(i).Select
           Selection.Delete Shift:=xlUp
       End If
   Next
End Function


14 лет назад

RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.

Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.

Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.