Brisanje vrstic v različnih listih prek VBA

Če želite naenkrat izbrisati vse podobne številke vrstic, je ta članek za vas.

V tem članku se bomo naučili, kako se lahko z makri znebimo iste vrstice na več delovnih listih.

Vprašanje): Želim izbrisati isto vrstico na več delovnih listih s kodo VBA. Kar želim, je koda za brisanje vseh vrstic v delovnem zvezku, ne glede na to, koliko listov je v trenutni datoteki; Želim izbrisati izbrano številko vrstice z vseh 5 listov.

Najprej vnesite podobne podatke v vse delovne liste na istem mestu

Slediti moramo naslednjim korakom:

Kliknite zavihek Razvijalec
V skupini Koda izberite Visual Basic

V standardni modul vnesite naslednjo kodo:-

Sub DeleteRows ()

Dim shtArr, i As Long, xx As Long

shtArr = Polje ("List1", "List2", "List3", "List4", "List5")

xx = Izbor. Vrstica

Za i = LBound (shtArr) Za UBound (shtArr)

Listi (shtArr (i)). Vrstice (xx) .EntireRow.Delete

Naprej i

End Sub

Zdaj postavite kazalec na katero koli celico A1 & na List1.
Pritisnite ALT + F8 za zagon makra; našli boste, da se izbrana številka vrstice izbriše na vseh listih.
Naslednji posnetek prikazuje podatke o listu 1 in listu 2 kot primer; ko boste izvajali to vajo, boste našli podobno rešitev na vseh ustreznih listih.