Edukien taula
VBA erabiliz errenkadak ezabatzeko modurik errazenetako batzuk bilatzen ari bazara, leku egokian zaude.
Murgil gaitezen artikulu nagusian.
Deskargatu Lan-koadernoa
VBA Ezabatu Row.xlsm
VBA erabiliz errenkadak ezabatzeko 14 modu
Hemen, hiru datuak ditut VBA erabiliz errenkadak ezabatzeko moduak erakusteko taulak. Lehenengo taulan enpresa baten Produktu batzuk eta haien Tamainak , Prezioak daude.
Bigarrena. batek Produktuen Kode eta dagozkion Produktuen Tamainak eta Prezioak
Eta azkenak ditu. Proiektuen izenak eta dagozkien Hasiera datak eta Kostuak .
Artikulua sortzeko, nik Microsoft Excel 365 bertsioa erabili baduzu, beste edozein bertsio erabil dezakezu zure erosotasunaren arabera.
1-metodoa: ezabatu errenkada bakarra VBA erabiliz
Demagun, zuk Produktua Oinetakoa 1, duen errenkada ezabatu nahi duzu eta errenkada bakarra ezabatzeko metodo hau jarraitu dezakezu.
Urratsa-01 :
➤Joan Garatzailea Fitxa>> Visual Basic Aukera
Ondoren, Visual Basic Editor irekiko da.
➤Joan Txertatu Fitxa>> Modulua Aukera
ra.
Ondoren, Modulua sortuko da.
Urrats-02 >:
➤Idatzi fol kodea
3530
Hemen, “Single” da 2021/11/12 data duten gelaxken batuketa anitzen barrutiak, eta azkenik, barrutiak ezabatuko dira.
➤Sakatu F5
Emaitza :
Ondoren, 2021/11/12 data jakin bat duten errenkadak ezabatu egingo dituzu. .
Lotutako edukia: Excel VBA datu zehatzak dituzten errenkadak ezabatzeko (9 adibide)
Praktika
Zuk praktikak egiteko Praktika atala eman dugu behean bezala Praktika izeneko fitxa batean. Mesedez, egin ezazu zuk zeuk.
Ondorioa
Artikulu honetan, VBA eraginkor erabiltzeko modurik errazenak azaltzen saiatu naiz. errenkadak ezabatuz. Espero dut erabilgarria izango zaizula. Iradokizun edo galderarik baduzu, partekatu lasai iruzkinen atalean.
lan-orriaren izena, eta Rankadak(7)errenkada-zenbakia hautatuko du..EntireRow.Delete 7. errenkada osoa ezabatuko du.
➤Sakatu F5
Emaitza :
Horrela, <1 duen errenkada ezabatuko duzu>Produktua izena Oinetakoa 1 .
Irakurri gehiago: Nola ezabatu errenkadak Excel-en: 7 Metodoak
Metodo-2: Ezabatu hainbat errenkada VBA erabiliz
Anitz errenkada ezabatu nahi badituzu Produktu izenak Shoe1
Urratsa-01 :
➤Jarraitu Pausoa-01 ren Metodoa-1
6303
Hemen, 13, 10 errenkada-zenbakiak , eta 7 ezabatu egingo dira eta seriean idatziz azken errenkada-zenbakitik lehen lerroko zenbakira idatzi behar dituzu kode hau bezala.
Bestela, 7. errenkada bezala lehen errenkada ezabatu ondoren gainerakoak. errenkada honen azpiko errenkadak errenkada bat gora mugituko dira eta, beraz, 10. errenkada 9. errenkada izango da eta 13. errenkada 12. errenkada izango da. Hala ere, ezin izango dituzu errenkada zuzenak ezabatu.
➤Sakatu F5
Emaitza :
Ondoren, Produktu izenak Oinetakoak , Oinetakoak2, eta Oinetakoak3 dituzten errenkadak ezabatuko dituzu.
Irakurri gehiago: Nola ezabatu hainbat errenkada Excel-en (3 metodo)
Metodo-3 : Errenkada bat ezabatzea
Hautatuz hemen, errenkada bat ezabatzeko modua erakutsiko duterrenkada horretako gelaxka aktibo bati dagokionez.
Urratsa-01 :
➤Jarraitu Urratsa-01 (e)ko Metodoa-1
2769
Zelula aktiboa duen errenkada ezabatuko du.
➤Gorde kodea.
Step-02 :
➤Hautatu ezabatu nahi duzun errenkada bateko edozein gelaxka (Hemen B7 gelaxka hautatu dut)
➤Joan Garatzailea Fitxa>> Makroak Aukera
Ondoren, Makroa Morroia irekiko da.
➤Hautatu Makro izena dltrow3 eta sakatu Exekutatu
Emaitza :
Ondoren, Produktu izena Oinetako 1 duen errenkada ezabatuko duzu.
4. metodoa: hautapeneko errenkada guztiak ezabatzea
Hautapen bateko errenkada guztiak ezabatzeko metodo hau jarraitu dezakezu.
Urratsa-01 :
➤Jarraitu Pausoa-01 Metodoa-1
2944
Hori hautapeneko errenkada guztiak ezabatuko ditu.
➤Gorde kodea.
Urratsa-02 :
➤Hautatu ezabatu nahi dituzun errenkaden barrutia (Hemen, B7:D9 barrutia hautatu dut)
➤Joan Garatzailea Fitxa>> Makroak Aukera
Ondoren, Makroa morroia irekiko da.
➤Hautatu Makroaren izena dltrow4 eta sakatu Exekutatu
Emaitza :
Ondoren, duten errenkadak ezabatuko dituzu. Produktuen izenak Oinetakoak 1 , Jaka1, eta Jacket2 .
Irakurri gehiago: Nola ezabatu hautatutako errenkadak Excel-en (8 planteamendu)
5. Metodoa: Errenkada bat ezabatzea Gelaxka bat hutsik badago
Hemen, B9 den gelaxka huts bat daukat (zelula honetatik balioa kendu dut horretarako metodoa), eta VBA kode bat erabiliz B9 gelaxka duen errenkada ezabatuko dut.
Urratsa-01. :
➤Jarraitu Pausoa-01 ren Metodoa-1
4239
Barrutiko errenkada guztiak ezabatuko ditu “B5:D13” edozein gelaxka hutsik edukitzea.
➤Sakatu F5
Emaitza :
Ondoren, gelaxka hutsa duen errenkada ezabatu ahal izango duzu.
Irakurri gehiago: Nola kendu errenkada hutsak Excel-en (11 metodoak)
6. metodoa: errenkada bat ezabatzea errenkada osoa hutsik badago
Hemen, gelaxka huts bat daukat <1 dena>B9 (metodo honen balioak kendu ditut), eta 12. errenkada den errenkada huts bat (metodo honen balioak kendu ditut), eta VBA kode bat eta <1 erabiliz>COUNTA funtzioa Hutsik dagoen errenkada ezabatu egingo dut.
Urratsa-01 :
➤Jarraitu Urratsa-01 de Metodoa-1
5014
"B5:D13" datuen barrutia da eta FOR begizta funtzionatuko du gelaxka guztietan. barruti hau.
CountA(cell.EntireRow) hutsik ez diren gelaxken kopurua itzuliko du eta 0 bihurtzen denean errenkada ezabatu egingo da.
➤Sakatu F5
Emaitza :
Ondoren, errenkada hutsa ezabatu ahal izango duzu baina ez du ezabatuko errenkada guztiak ez dituena. errenkada honetako gelaxkak hutsik.
Irakurri gehiago: Nola erabili VBA Excel-en errenkada hutsak ezabatzeko
7. metodoa: ngarren errenkada guztiak ezabatzea
Enegarren errenkada guztiak ezaba ditzakezu (kasu honetan 3. errenkada behin) metodo hau jarraituz.
Urratsa-01 :
➤Jarraitu Urratsa-01 -ko Metodoa
8464
“B5 :D13” datu-barrutia da eta rc -k barruti honen errenkada-zenbaki osoa itzuliko du, hau da, 9 .
Hemen, FOR begizta kasu honetan rc edo 9 den azken errenkadatik hasiko da eta lehen errenkadan amaitzen da.
-3 urratsa barruti honetako 3. errenkada guztiak ezabatzen lagunduko du.
➤Sakatu F5
Emaitza :
Ondoren, Produktu izenak dituzten errenkadak ezabatuko dituzu Oinetakoa 1 , Oinetakoa2, eta >Shoe3 .
Irakurri Gehiago: Nola ezabatu engarren R behin ow Excel-en (6 modu errazenak)
Antzeko irakurketak:
- Nola ezabatu hautatutako errenkadak Excel VBA-rekin (Urrats bat- urratsez urrats)
- Ezabatu Excel-en erabili gabeko errenkadak (8 modu erraz)
- Nola ezabatu Excel-en ezkutuko errenkadak (3 metodo)
- Ezabatu errenkada infinituak Excel-en (5 modu errazak)
- Nola ezabatu betirako dauden Excel-en errenkadak (4 erraz)Moduak)
8. metodoa: gelaxka-balioan oinarritutako errenkada ezabatzea
Metodo honetan, balio zehatza duen errenkada ezabatuko dut Kamiseta 2 .
Urratsa-01 :
➤Jarraitu Pausoa-01 Metodoa- 1
5358
“B5:D13” datuen barrutia da eta FOR begiztak barruti honetako gelaxka guztietan funtzionatuko du.
Errenkada bateko edozein gelaxkak “Kamiseta 2” balioa badu, errenkada ezabatuko da.
➤Sakatu F5
Emaitza :
Horrela, Produktu izena Kamiseta 2 duen errenkada ezabatuko duzu.
Irakurri gehiago: VBA makroa errenkada ezabatzeko gelaxkak balioa badu Excel-en (2 metodo)
9-metodoa: Errenkada bikoiztuak ezabatzea
Hemen, bi errenkada dauzkat Produktu-kodea 97375 duten eta, beraz, markatutako errenkada hauetako bat ezabatu nahi dut. behean lauki gorri bat.
Urratsa-01 :
➤Jarraitu Urratsa-01 otik Metodo-1
5421
Hemen, “B5:D13” datuen barrutia da eta Zutabeak:=1 ni eta balio bikoiztuak soilik bilatuko ditu zutabe batean, hau da, hasierako zutabea B zutabea , baina beste zutabe batzuetan ere bilatu nahi baduzu, zenbaki hau zure beharren arabera erabil dezakezu.
➤Sakatu F5
Emaitza :
Ondoren, dagoen errenkada ezabatu ahal izango duzu. beste errenkada baten antzekoa.
Irakurri gehiago: Nola ezabatu bikoiztutako errenkadak hemenExcel VBA-rekin (8 modu eraginkorrak)
10. metodoa: taula bateko errenkadak ezabatzea
Demagun, izena Taula1 eta izena duen taula hau duzula. orain ezabatu nahi duzu taula honetako 6. errenkada. Horretarako metodo hau jarraitu dezakezu.
Step-01 :
➤Jarraitu Step-01 Metodoa-1
3548
Hemen, “Taula” orriaren izena da, “Taula1” taularen izena da eta 6 ezabatu nahi duzun taula honen errenkada-zenbakia da.
➤Sakatu F5
Emaitza :
Horrela, nahi duzun taulako errenkada ezabatuko duzu.
Irakurri gehiago: Nola kendu bikoiztutako errenkadak zutabe batean oinarrituta Excel VBA erabiliz
11. metodoa: iragazi ondoren ikusgai dauden errenkadak ezabatzea
Hemen, iragazitako datu-taula bat daukat $1.500,00 baino gehiagoko balioetarako Prezioa zutabea eta iragazi ondoren ikusgai dauden errenkada guztiak ezabatu nahi ditut.
Step-01 :
➤Jarraitu step-01 -ko Metodoa
1750
Hemen, “B5: D13” datu-barrutia da.
➤Sakatu F5
Orain, iragazi ondoren ikusgai dauden errenkada guztiak izango dira. ezabatu izan. Orain ezkutuko errenkadak itzul ditzakezu Iragazkia ikurra hautatuta Prezioa zutabean.
➤Sakatu Hautatu Guztia aukera
➤Sakatu Ados
Emaitza :
Azkenik, ezkutuko errenkadak berriro sartuko dituzudatuen taula.
Irakurri gehiago: Nola iragazi eta ezabatu errenkadak VBArekin Excel-en (2 metodo)
12. Metodoa: azken gelaxka aktiboan oinarritutako errenkada ezabatzea
Hemen, nire azken gelaxka aktiboa B13 da eta hau ezabatu nahi dut hurrengoko azken gelaxka aktiboa duela. datu-taula.
Urratsa-01 :
➤Jarraitu Pausoa-01 Metodoa -1
2078
Hemen, 2 esan nahi du B zutabea n nire gelaxka aktiboa dudan, zenbakia alda dezakezu zure beharren arabera.
➤Sakatu F5
Emaitza :
Horrela, ezabatu egingo duzu azken errenkada aktiboa.
Irakurri gehiago: Excel VBA kodea gelaxka anitzeko balioan oinarritutako errenkadak ezabatzeko (3 irizpide)
13. metodoa: edozein kate duten errenkadak ezabatzea
Demagun, edozein kate duten errenkadak ezabatu nahi dituzula, eta horretarako metodo hau jarraitu dezakezu.
Urratsa-01 :
➤Jarraitu Pausoa-01 ko Metodo-1
1589
Hemen, “katea” orriaren izena da, datu-barruti honen lehen errenkadako zenbakia 5 da eta hasierako zutabe zenbakia 2
With adierazpenak objektu bat zehazten uzten dizu edo erabiltzaileak definitutako mota behin adierazpen-serie oso baterako.
On Error Resume Next adierazpenak zehazten du, exekuzio-denborako errore bat gertatzen denean, kontrola adierazpenaren ondorengo instrukziora doala. errorea gertatzen da.
LastRow eta LastColumn datuen barrutiaren azken errenkada eta zutabea itzultzen dute.
SpecialCells(xlCellTypeConstants, xlTextValues) ek edozein testu-balio duten errenkadak hautatuko ditu. barrutia.
➤Sakatu F5
Emaitza :
Ondoren, ezabatu edozein testu-kate duten errenkadak.
Gehiago irakurri: Errenkadak ezabatzeko Excel lasterbidea (Teknik Bonusekin)
14. metodoa: datetan oinarritutako errenkadak ezabatzea
Hemen, data berezia duten errenkadak ezabatuko ditut 2021/11/12 (mm/dd/aaaa) honetan metodoa DATEVALUE funtzioa erabiliz.
Step-01 :
➤Jarraitu Pausoa- 01 (e)ko Metodoa-1
3751
Hemen, “Data” orriaren izena da, datu-barruti honen lehen lerroko zenbakia da. 5 eta irizpideen zutabea (zutabeak datak dituena) zenbakia 3 da.
With adierazpenak erabiltzaileak zehaztutako objektu edo mota bat behin zehazten uzten dizu. adierazpen-serie oso baterako.
On Error Resume Next adierazpenak hori zehazten du, exekuzio-denboran errore bat gertatzen denean, kontrola errorea gertatzen den adierazpenaren ondorengo instrukziora doa.
LastRow datuen barrutiaren azken errenkada itzultzen du eta hemen, FOR. begizta kasu honetan LastRow edo 6 den azken errenkadatik hasiko da, eta lehen errenkadan amaituko da.
DATEVALUE testua data balio bihurtuko du.
Hemen, Union k itzuliko du