Ako želite način brisanja svih sličnih brojeva redaka u pokretu, onda je ovaj članak za vas.
U ovom ćemo članku naučiti kako se pomoću makronaredbi možemo riješiti istog retka na više radnih listova.
Pitanje): Želim izbrisati isti redak na više radnih listova pomoću VBA koda. Ono što želim je kôd za brisanje svih redaka u radnoj knjizi bez obzira na to koliko je listova prisutno u trenutnoj datoteci; Želim izbrisati odabrani broj retka sa svih 5 listova.
Prije svega, unesite slične podatke u sve radne listove na istom mjestu
Moramo slijediti korake u nastavku:
- Kliknite karticu Developer
- Iz grupe kodova odaberite Visual Basic
Unesite sljedeći kôd u standardni modul:-
Podizbriši redove ()
Dim shtArr, i As Long, xx As Long
shtArr = Polje ("List1", "List2", "List3", "List4", "List5")
xx = Izbor.Red
Za i = LBound (shtArr) Za UBound (shtArr)
Listovi (shtArr (i)). Redovi (xx) .EntireRow.Delete
Sljedeći i
Kraj podm
- Sada postavite kursor na bilo koju ćeliju A1 & na List1.
- Pritisnite ALT + F8 pokrenuti makro; pronaći ćete da se odabrani broj retka briše na svim listovima.
- Sljedeći snimak prikazuje podatke o listu 1 i listu 2 kao primjer; kada izvodite ovu vježbu, pronaći ćete slično rješenje u svim odgovarajućim listovima.
- Ako stavimo pokazivač na bilo koju ćeliju A2 & na List 2, tada bi i rezultat bio sličan.
U ovom slučaju možemo izbrisati sličan broj retka pomoću VBA koda.
Preuzimanje- Primjer datoteke- xlsm