Ако желите начин да избришете све сличне бројеве редова у покрету, онда је овај чланак за вас.
У овом ћемо чланку научити како се помоћу макроа можемо ријешити истог реда на више радних листова.
Питање): Желим да избришем исти ред на више радних листова помоћу ВБА кода. Оно што желим је код за брисање свих редова у радној свесци без обзира на то колико листова је присутно у тренутној датотеци; Желим да избришем изабрани број реда са свих 5 листова.
Прије свега, унесите сличне податке у све радне листове на истој локацији
Морамо да следимо следеће кораке:
- Кликните на картицу Девелопер
- Из групе кодова изаберите Висуал Басиц
Унесите следећи код у стандардни модул:-
Суб ДелетеРовс ()
Дим схтАрр, и Ас Лонг, кк Ас Лонг
схтАрр = Поље ("Лист1", "Лист2", "Лист3", "Лист4", "Лист5")
кк = Избор.Ред
За и = ЛБоунд (схтАрр) За УБоунд (схтАрр)
Табеле (схтАрр (и)). Редови (кк) .ЕнтиреРов.Делете
Затим сам
Енд Суб
- Сада поставите курсор на било коју ћелију А1 и на Лист1.
- Притисните АЛТ + Ф8 да покренете макро; наћи ћете да се изабрани број реда брише на свим листовима.
- Следећи снимак приказује податке о листу 1 и листу 2 као пример; када изводите ову вежбу, наћи ћете слично решење у свим одговарајућим листовима.
- Ако ставимо курсор на било коју ћелију А2 и на Лист 2, резултат би такође био сличан.
У овом случају можемо избрисати сличан број реда користећи ВБА код.
Преузимање- Пример датотеке- клсм