INHOUDSOPGAWE
As jy op soek is na 'n paar van die maklikste maniere om rye uit te vee met VBA , dan is jy op die regte plek.
Kom ons duik in die hoofartikel.
Laai werkboek af
VBA Delete Row.xlsm
14 maniere om ry te verwyder deur VBA te gebruik
Hier, ek het die drie data tabelle om die maniere te wys om rye uit te vee met VBA . Die eerste tabel bevat 'n paar Produkte van 'n maatskappy en hul Groottes , Pryse .
Die tweede een het 'n paar Produkkodes en hul ooreenstemmende Produkgroottes en Pryse
En die laaste een bevat sommige Projekname en hul onderskeie Begindatums en Kostes .
Vir die skep van die artikel het ek Microsoft Excel 365 -weergawe gebruik het, kan jy enige ander weergawes volgens jou gerief gebruik.
Metode-1: Vee 'n enkele ry uit deur VBA te gebruik
Kom ons sê, jy wil jy die ry wat Produk Skoen 1, bevat uitvee en om hierdie enkele ry uit te vee kan jy hierdie metode volg.
Stap-01 :
➤Gaan na Ontwikkelaar Tab>> Visual Basic Opsie
Dan sal die Visual Basic Editor oopmaak.
➤Gaan na Voeg in Tab>> Module Opsie
Daarna sal 'n Module geskep word.
Stap-02 :
➤Skryf die fol verlagingskode
6353
Hier, “Single” is dievereniging van veelvuldige reekse wat ooreenstem met die selle met die datum 11/12/2021 , en uiteindelik sal die reekse uitgevee word.
➤Druk F5
Resultaat :
Daarna sal jy die rye met 'n sekere datum van 11/12/2021 uitvee .
Verwante inhoud: Excel VBA om rye met spesifieke data uit te vee (9 voorbeelde)
Oefen Afdeling
Om self te oefen, het ons 'n Oefening -afdeling soos hieronder in 'n blad met die naam Oefening voorsien. Doen dit asseblief self.
Slot
In hierdie artikel het ek probeer om die maklikste maniere om VBA effektief te gebruik vir rye uitvee. Hoop jy sal dit nuttig vind. As jy enige voorstelle of vrae het, deel dit gerus in die kommentaarafdeling.
werkbladnaam, en Ry(7)sal die rynommer kies..EntireRow.Delete sal die hele ry 7 uitvee.
➤Druk F5
Resultaat :
Op hierdie manier sal jy die ry wat die <1 bevat, uitvee>Produk naam Skoen 1 .
Lees meer: Hoe om rye in Excel uit te vee: 7 Metodes
Metode-2: Verwyder veelvuldige rye deur gebruik te maak van VBA
As jy veelvuldige rye wil uitvee soos die rye wat die Produk name Skoen1
Stap-01 :
➤Volg Stap-01 van Metode-1
3004
Hier, ry nommers 13, 10 , en 7 sal uitgevee word en skriftelik die rynommers wat jy moet skryf vanaf die laaste rynommer na die eerste rynommer soos hierdie kode.
Anders, nadat jy die eerste ry soos Ry 7 uitgevee het, die oorblywende rye onder hierdie ry sal een ry opskuif en dus sal die ry 10 ry 9 wees, en ry 13 sal ry 12 wees. ason, sal jy nie die korrekte rye kan uitvee nie.
➤Druk F5
Resultaat :
Dan sal jy die rye uitvee wat die Produk name Skoen 1 , Skoen2, en Skoen3 bevat.
Lees meer: Hoe om veelvuldige rye in Excel uit te vee (3 metodes)
Metode-3 : Vee 'n ry uit deur
te kies Hier sal ek die manier wys om 'n ry uit te veemet betrekking tot 'n aktiewe sel van daardie ry.
Stap-01 :
➤Volg Stap-01 van Metode-1
2846
Dit sal die ry met 'n aktiewe sel uitvee.
➤Stoor die kode.
Stap-02 :
➤Kies enige sel van 'n ry wat jy wil uitvee (Hier het ek sel B7 gekies)
➤Gaan na Ontwikkelaar Tab>> Makro's Opsie
Daarna, die Makro Wizard sal oopmaak.
➤Kies die Makronaam dltrow3 en druk Run
Resultaat :
Daarna sal jy die ry wat die Produk -naam Skoen 1 bevat, uitvee.
Metode-4: Skrap alle rye in die seleksie
Vir die verwydering van al die rye van 'n seleksie kan jy hierdie metode volg.
Stap-01 :
➤Volg Stap-01 van Metode-1
2237
Dit sal al die rye van die keuse uitvee.
➤Stoor die kode.
Stap-02 :
➤ Kies die reeks rye wat jy wil uitvee (Hier het ek reeks B7:D9 gekies)
➤Gaan na Ontwikkelaar Tab>> Makro's Opsie
Daarna sal die Makro Wizard oopmaak.
➤Kies die Makronaam dltrow4 en druk Run
Resultaat :
Dan sal jy die rye wat die bevat, uitvee Produk name Skoen 1 , Jacket1, en Jacket2 .
Lees meer: Hoe om geselekteerde rye in Excel uit te vee (8 benaderings)
Metode-5: Skrap 'n ry as enige sel leeg is
Hier het ek 'n leë sel wat B9 is (Ek het die waarde uit hierdie sel verwyder vir hierdie metode), en met 'n VBA -kode sal ek die ry met B9 sel uitvee.
Stap-01 :
➤Volg Stap-01 van Metode-1
2473
Dit sal al die rye in die reeks uitvee “B5:D13” met enige leë sel.
➤Druk F5
Resultaat :
Dan sal jy die ry wat die leë sel bevat kan uitvee.
Lees Meer: Hoe om leë rye in Excel te verwyder (11 metodes)
Metode-6: Vee 'n ry uit as die hele ry leeg is
Hier het ek 'n leë sel wat <1 is>B9 (Ek het die waardes vir hierdie metode verwyder), en 'n leë ry wat Ry 12 is (Ek het die waardes vir hierdie metode verwyder), en met 'n VBA kode en die COUNTA-funksie Ek sal die ry wat leeg is uitvee.
Stap-01 :
➤Volg Stap-01 van Metode-1
2608
“B5:D13” is die datareeks en VIR lus sal vir elke sel in hierdie reeks.
CountA(cell.EntireRow) sal die aantal nie-leë selle terugstuur en wanneer dit 0 word, sal die ry uitgevee word.
➤ Druk F5
Resultaat :
Daarna sal jy die leë ry kan uitvee, maar dit sal nie enige ry uitvee wat nie al die die selle van hierdie ry leeg.
Lees meer: Hoe om VBA te gebruik om leë rye in Excel te verwyder
Metode-7: Vee elke n-de ry uit
Jy kan elke n-de ry (in hierdie geval elke 3de ry) uitvee deur hierdie metode te volg.
Stap-01 :
➤Volg Stap-01 van Metode-1
3779
“B5 :D13” is die datareeks en rc sal die totale rynommer van hierdie reeks terugstuur wat 9 is.
Hier, die VIR lus sal begin vanaf die laaste ry wat rc of 9 is in hierdie geval en eindig met die eerste ry.
Stap -3 sal help om elke 3de ry in hierdie reeks uit te vee.
➤Druk F5
Resultaat :
Dan sal jy die rye uitvee wat die Produk name Skoen 1 , Skoen2, en <8 bevat>Skoen3 .
Lees meer: Hoe om elke nth R uit te vee ow in Excel (maklikste 6 maniere)
Soortgelyke lesings:
- Hoe om geselekteerde rye met Excel VBA uit te vee ('n stap- per-stap-riglyn)
- Vee ongebruikte rye in Excel uit (8 maklike maniere)
- Hoe om versteekte rye in Excel uit te vee (3 metodes)
- Vee oneindige rye in Excel uit (5 maklike maniere)
- Hoe om rye in Excel uit te vee wat vir ewig aanhou (4 maklike)Maniere)
Metode-8: Skrap ry gebaseer op selwaarde
In hierdie metode sal ek die ry met 'n spesifieke waarde Hemp 2<9 uitvee>.
Stap-01 :
➤Volg Stap-01 van Metode- 1
9393
“B5:D13” is die datareeks en die VIR lus sal vir elke sel in hierdie reeks werk.
As enige sel van 'n ry die waarde “Hemp 2” bevat, sal die ry uitgevee word.
➤Druk F5
Resultaat :
Op hierdie manier sal jy die ry wat die Produk naam Hemp 2 bevat, uitvee.
Lees meer: VBA-makro om ry uit te vee as sel waarde in Excel bevat (2 metodes)
Metode-9: Skrap duplikaatrye
Hier het ek twee rye met 'n Produkkode 97375 en daarom wil ek een van hierdie rye uitvee wat gemerk is deur 'n rooi blokkie hieronder.
Stap-01 :
➤Volg Stap-01 van Metode-1
5732
Hier, “B5:D13” is die datareeks en Kolomme:=1 ek en dit sal net vir duplikaatwaardes soek in een kolom wat die beginkolom Kolom B is, maar as jy ook in ander kolomme wil soek kan jy hierdie nommer volgens jou behoeftes gebruik.
➤Druk F5
Resultaat :
Daarna sal jy die ry kan uitvee wat soortgelyk aan 'n ander ry.
Lees meer: Hoe om duplikaatrye in te verwyderExcel met VBA (8 effektiewe maniere)
Metode-10: Vee rye in 'n tabel uit
Gestel jy het die volgende tabel met die naam Tabel1 en nou wil jy ry nommer 6 van hierdie tabel uitvee. Om dit te doen kan jy hierdie metode volg.
Stap-01 :
➤Volg Stap-01 van Metode-1
6663
Hier is “Tabel” die bladnaam, “Tabel1” is die tabelnaam en 6 is die rynommer van hierdie tabel wat jy wil uitvee.
➤Druk F5
Resultaat :
Op hierdie manier sal jy jou verlangde ry van hierdie tabel uitvee.
Lees Meer: Hoe om duplikaatrye op grond van een kolom te verwyder met behulp van Excel VBA
Metode-11: Skrap sigbare rye na filtering
Hier het ek 'n datatabel wat gefiltreer word deur die Prys -kolom vir waardes meer as $1,500.00 en ek wil al die sigbare rye uitvee nadat dit gefiltreer is.
Stap-01 :
➤Volg Stap-01 van Metode-1
2401
Hier, “B5: D13” is die datareeks.
➤Druk F5
Nou, al die sigbare rye na filtering sal uitgevee word. Jy kan nou die versteekte rye terugbring deur die Filter -teken in die Prys -kolom te kies.
➤Klik op die Kies Alles opsie
➤Druk OK
Resultaat :
Uiteindelik sal u die verborge rye terugkrydie datatabel.
Lees meer: Hoe om rye met VBA in Excel te filter en uit te vee (2 metodes)
Metode-12: Vee ry uit op grond van laaste aktiewe sel
Hier is my laaste aktiewe sel sel B13 en ek wil dit uitvee met die laaste aktiewe sel van die volgende datatabel.
Stap-01 :
➤Volg Stap-01 van metode -1
5528
Hier beteken 2 Kol B waarop ek my aktiewe sel het, jy kan die nommer verander volgens jou behoeftes.
➤Druk F5
Resultaat :
Op hierdie manier sal jy jou laaste aktiewe ry.
Lees meer: Excel VBA-kode om rye te skrap gebaseer op veelvuldige selwaarde (3 kriteria)
Metode-13: Verwyder rye met enige stringe
Veronderstel, jy wil die rye met enige string uitvee, en om dit te doen kan jy hierdie metode volg.
Stap-01 :
➤Volg Stap-01 van Metode-1
8618
Hier, “string” is die bladnaam, die eerste rynommer van hierdie datareeks is 5 en die beginkolomnommer is 2
Die With -stelling laat jou 'n objek spesifiseer of gebruikergedefinieerde tipe een keer vir 'n hele reeks stellings.
Op Fout Hervat Volgende -stelling spesifiseer dat, wanneer 'n looptydfout voorkom, beheer gaan na die stelling wat volg op die stelling waar die fout kom voor.
LastRow en LastColumn gee die laaste ry en kolom van die datareeks terug.
SpecialCells(xlCellTypeConstants, xlTextValues) sal die rye met enige tekswaardes in die reeks.
➤Druk F5
Resultaat :
Daarna sal jy verwyder die rye met enige teksstring.
Lees meer: Excel-kortpad om rye uit te vee (met bonustegnieke)
Metode-14: Vee ry uit gegrond op datums
Hier sal ek die rye met 'n spesiale datum 11/12/2021 (mm/dd/jjjj) in hierdie uitvee metode wat die DATEVALUE-funksie gebruik.
Stap-01 :
➤Volg Stap- 01 van Metode-1
6605
Hier, “Datum” is die bladnaam, die eerste rynommer van hierdie datareeks is 5 en die kriteriakolom (watter kolom datums het) nommer is 3 .
Die With -stelling laat jou een keer 'n objek of gebruikergedefinieerde tipe spesifiseer vir 'n hele reeks stellings.
Op Fout Hervat Volgende -stelling spesifiseer dat, wanneer 'n looptydfout voorkom, gaan beheer na die stelling wat volg op die stelling waar die fout voorkom.
LastRow stuur die laaste ry van die datareeks terug en hier, die FOR lus sal begin vanaf die laaste ry wat LastRow of 6 is in hierdie geval, en eindig met die eerste ry.
DATEVALUE sal teksdatum in waarde omskakel.
Hier sal Unie die
