Als u een manier wilt om alle vergelijkbare rijnummers in een keer te verwijderen, dan is dit artikel iets voor u.
In dit artikel zullen we leren hoe we dezelfde rij in meerdere werkbladen kunnen verwijderen via macro's.
Vraag): Ik wil dezelfde rij in meerdere werkbladen verwijderen met VBA-code. Wat ik wil is code om alle rijen in de werkmap te verwijderen, ongeacht hoeveel bladen er in het huidige bestand aanwezig zijn; Ik wil het geselecteerde rijnummer van alle 5 bladen verwijderen.
Laten we eerst de vergelijkbare gegevens in alle werkbladen op dezelfde locatie invoeren
We moeten de onderstaande stappen volgen:
- Klik op het tabblad Ontwikkelaar
- Selecteer in de codegroep Visual Basic
Voer de volgende code in de standaardmodule in:-
Sub Verwijder Rijen()
Dim shtArr, i As Long, xx As Long
shtArr = Array ("Blad1", "Blad2", "Blad3", "Blad4", "Blad5")
xx = Selectie.Rij
Voor i = LBound(shtArr) Naar UBound(shtArr)
Bladen(shtArr(i)).Rijen(xx).VolledigeRij.Verwijderen
volgende i
Einde sub
- Plaats nu de cursor op een willekeurige cel A1 & op Blad1.
- druk op ALT + F8 om de macro uit te voeren; u zult zien dat het geselecteerde rijnummer in alle bladen wordt verwijderd.
- De volgende momentopname toont blad 1 & blad 2 gegevens als voorbeeld; wanneer u deze oefening uitvoert, vindt u een vergelijkbare oplossing in alle respectieve bladen.
- Als we de cursor op een cel A2 & op Blad2 plaatsen, zou ook het resultaat vergelijkbaar zijn.
In dit geval kunnen we een vergelijkbaar rijnummer verwijderen met behulp van VBA-code.
Download- Voorbeeldbestand- xlsm