Edukien taula
Gure Excel lan-koadernoan datu-multzo handi bat dugunean, batzuetan komenigarria da errenkadetan zehar begiztatu ahal izatea lortu nahi ditugun emaitza zehatzak ateratzeko. VBA ezartzea Excel-en edozein eragiketa exekutatzeko metodorik eraginkorrena, azkarrena eta seguruena da. Artikulu honetan, 11 metodo ezberdin erakutsiko dizkizugu taula bateko errenkadak nola egin begizta Excel-en VBA makroa rekin.
Deskargatu Lan-koadernoa.
Doako praktika Excel lan-koadernoa deskargatu dezakezu hemendik.
Begiztatu taulako errenkadak VBA.xlsm-rekin
VBA-rekin 11 metodo Excel-en taulako errenkadak begizta egiteko
Atal hau jarraituz, taula bateko errenkadak nola errepasatu ikasiko duzu 11 metodo ezberdinekin, hala nola, errenkadak begiztatu gelaxka huts batera arte, errenkadak begiztatu balio zehatz bat aurkitu arte, errenkadak begiztatu eta gelaxka zehatz bat margotu eta abar VBA Excel-en makroarekin.
Goian artikulu honek metodoak deskribatzeko jarraituko duen adibide-datu multzoa dago.
1. Txertatu VBA taula bateko errenkada bakoitzean gelaxka bakoitzean gelaxka-erreferentzia-zenbakiaren arabera begizta egiteko
Taula bateko errenkada bakoitzean gelaxka bakoitzean begizta egin nahi baduzu zure Excel lan-orrian eta lortu gelaxka-erreferentzia-zenbakia itzultzeko balio gisa , eta jarraitu behean azaldutako urratsak.
Urratsak:
- Hasieran , sakatu Alt + F11 teklatuan edo joanaldagaia.
1164
Kode-zati hau 1etik 15era bitarteko errenkadetan begizta egiteko dago. " Ertza " hitz zehatza aurkitzen badu, orduan hitza daukan gelaxka koloreztatzen du. Horretan jarraitzen du hitza bilatzeko 1etik 15era bitarteko datu guztiak eskaneatzen amaitu arte.
Gehiago irakurri: Nola erabili VLOOKUP taula-matrizean oinarrituta. Gelaxka-balioa Excel-en
Irakurketa antzekoak
- Taula funtzioa existitzen al da Excel-en?
- Nola bihurtu taula Excel-en zerrendara (3 modu azkar)
- Bihurtu barrutia Excel-en taulara (5 metodo errazak)
- Erabili formula Excel taula batean eraginkortasunez (4 adibiderekin)
- Excel taularen izena: jakin behar duzun guztia
7. Inplementatu VBA errenkada bakoitzean begizta eta margotu Excel-en errenkada bakoitiak
Aurreko atalean, balio zehatz bat duen gelaxka bat nola margotu ikasi dugu. Atal honetan, Excel-en VBA makroarekin taula bateko errenkada bakoitzean begizta eta errenkada bakoitiak nola margotu ikasiko dugu.
Prozesua exekutatzeko urratsak behean deskribatzen dira.
Urratsak:
- Lehen erakutsi bezala, ireki Visual Basic Editor Garatzailea tik. fitxa eta Txertatu Modulua kodearen leihoan.
- Ondoren, kopiatu hurrengo kodea eta itsatsi kodearen leihoa.
3683
Zure kodea exekutatzeko prest dago orain.
- Orain, Exekutatu makroa eta begiratu hurrengo irudia irteera ikusteko.
Zenbaki bakoitietako errenkada guztiak koloreztatuta daude lan-orriko taulan dauden errenkada guztiak begiztatu ondoren.
VBA kodearen azalpena
5040
Definitu aldagaia.
8819
Zehaztu lan egingo dugun barrutia.
7655
Kodearen zati honek errenkada guztien iterazioari egiten dio erreferentzia, uneko errenkadaren hurrengo errenkadatik hasita, B4 . Errenkada-zenbakiak 2z zatitzeko modua zenbaki oso batean gordetako itzulitako errenkada-zenbakiaren berdina bada, kode honek kalkuluaren bidez ateratzen diren errenkada guztiak koloreztatzen ditu kodean emandako Kolore Indizearekin. Errenkada guztietan mugitzen jarraitzen du barrutiaren amaierara iritsi arte.
8. Inplementatu VBA errenkaden bidez begiztatu eta margotu Excel-en errenkada bikoitiak
Aurreko atalean, taula bateko errenkada bakoitiak margotzen ikasi dugu. Atal honetan, Excel-eko VBA makroarekin taula bateko errenkada bakoitzean begizta eta errenkada bikoitiak margotu nola egin ikasiko dugu.
Prozesua exekutatzeko urratsak jarraian azaltzen dira.
Urratsak:
- Lehenik eta behin, ireki Visual Basic Editor Garatzailea fitxatik eta Txertatu Modulua kodearen leihoan.
- Ondoren, kopiatu hurrengo kodea eta itsatsi kodearen leihoan.
8574
Zure kodea prest dago orainexekutatu.
- Ondoren, Exekutatu makroa eta begiratu hurrengo irudia emaitza ikusteko.
Zenbaki bikoitidun errenkada guztiak koloreztatuak dira , lan-orriko taulan dauden errenkada guztiak begiztatu ondoren.
VBA kodearen azalpena
1189
Definitu aldagaia.
2963
Definitu lan egingo dugun barrutia.
2119
Kode zati hau errepikatzen hasten da ondoren. uneko errenkadaren hiru errenkadak, B4 . Margotzen du lehenik eta gero errenkada kopurua 2z handitzen du eta margotzen jarraitzen du datu-multzoaren azken ilarara iritsi arte.
9. Aplikatu makroa errenkadetan zehar errepikatzeko Excel-eko gelaxka hutsa arte
Zure kodeak funtzionatzea nahi baduzu taularen errenkada guztietan zehar ibiliko da eta gelaxka huts batera iristen denean geldituko da , orduan atal hau zuretzat da. Ataza hori exekutatu dezakezu bai FOR Loop eta Do-Until Loop Excel-en VBA .
9.1. FOR Loop-arekin
Taula bateko errenkadak begizta egiteko urratsak VBA Excel-en FOR Loop duen gelaxka huts bat eman arte.
Urratsak:
- Hasieran, ireki Visual Basic Editor Garatzailea fitxatik eta Txertatu Modulua kodearen leihoan.
- Ondoren, kopiatu hurrengo kodea eta itsatsi kodearen leihoan.
3505
Zure kodea exekutatzeko prest dago.
- Ondoren, Exekutatu makroa eta emaitza beheko gif-ean ageri da.
Makroa exekutatu ondoren, taularen errenkada guztietan begiztatzen hasi zen. eta behin gelaxka hutsera, B8 gelaxkara iritsita, iterazioa gelditu zuen .
VBA kodearen azalpena
1546
Definitu aldagaia.
4768
Desaktibatu pantaila eguneratzeko gertaera.
6125
Gordetu errenkada guztiak B4 gelaxka tik azkenera arte.
With Range("B4").CurrentRegion
Hautatu B4 gelaxka .
4511
Kode zati hau errenkada guztietan zehar hasten da. Errenkadan hutsik dagoen gelaxka bat aurkitzen duenean, hautatzen du eta errenkadak eskaneatzen jarraitzen du amaierara iritsi arte.
3892
Aktibatu pantaila eguneratzeko gertaera.
9.2. Do-Until Loop-arekin
Errenkadetan zehar begizta egiteko urratsak behean Do-Until begizta duen gelaxka huts bat eman arte VBA n.
Urratsak:
- Lehenik eta behin, ireki Visual Basic Editor Garatzailea fitxatik eta Txertatu a Modulua kodearen leihoan.
- Ondoren, kopiatu hurrengo kodea eta itsatsi kodearen leihoan.
5346
Zure kodea exekutatzeko prest dago.
- Geroago, Exekutatu makroa. Emaitza hurrengo gif-ean ageri da.
Makroa exekutatu ondoren, taularen errenkada guztietan begiztatzen hasi zen eta behin gelaxka hutsera iritsi zen, B8 gelaxkara , iterazioa gelditu zuen .
VBA kodeaAzalpena
4786
Hautatu lan egingo dugun gelaxka.
4150
Zalula huts bat aurkitu arte hasi eta begizta jarraitzen du.
1111
Gelula huts bat dagoenean errenkadan aurkitu ondoren, hautatu eta gelditu iterazioa.
10. VBA makroa errenkadetan zehar iragartzeko Excel-en gelaxka huts anitz arte
Aurreko atalean, begizta nola gelditzen ikasi duzu gelaxka huts bat aurkitzen denean. Baina zer gertatzen da ez baduzu iterazioa gelditu nahi gelaxka huts bat baino gehiago aurkitu arte.
errenkadetan zehar errenkadak itzultzeko urratsak gelaxka huts bat baino gehiago taula batean aurkitu arte. VBA Excel-ekin behean agertzen dira.
Urratsak:
- Lehenik eta behin, ireki Visual Basic Editor hemendik. Garatzailea fitxa eta Txertatu Modulua kodearen leihoan.
- Ondoren, kopiatu hurrengo kodea eta itsatsi kodearen leihoan.
9421
Zure kodea exekutatzeko prest dago orain.
- Orain, Exekutatu makroa eta ikusi irteerarako gif hau.
Makroa exekutatu ondoren, ez da gelditu. lehen gelaxka hutsa, B8 gelaxka . B16 gelaxkan ondoz ondoko bi gelaxka huts aurkitu zituenean gelditu zen.
VBA kodearen azalpena
8109
Hautatu gelaxka bertatik lan egingo dugun.
3405
Bi gelaxka huts jarraian ondoz ondoko bi aurkitu arte begiztan hasten da eta jarraitzen du.
9224
Bi gelaxka huts jarraian aurkitzen direnean, orduanhautatu eta gelditu iterazioa.
11. Txertatu VBA errenkadak begizta egiteko, zutabe guztiak Excel-en hutsik arte kateatzen jarriz
Atal honek taula bateko errenkada guztiak begiztatu eta zutabe guztiak kateatzen dituen gelaxka huts bat arte nola errazten erakutsiko dizu. VBA Excel-ekin aurkitzen da.
Ikas dezagun hori nola egin VBA Excel-en makroarekin.
Urratsak:
- Hasieran, ireki Visual Basic Editor Garatzailea fitxatik eta Txertatu Modulua kodearen leihoan.
- Ondoren, kopiatu hurrengo kodea eta itsatsi kodearen leihoan.
9792
Zure kodea exekutatzeko prest dago orain.
- Geroago, Exekutatu makroa eta ikusi emaitzarako gif hau.
Goiko gif-ean ikus dezakezun bezala, MsgBox pop-up bat dagoela, bakoitzean bizi diren zutabe guztien balio kateatua erakusten dizu. errenkada zure Excel lan-orriaren taulatik. Baina gelditu zen behin gelaxka hutsera iristean.
VBA kodearen azalpena
5409
Definitu aldagaiak.
8731
Ezarri lan egingo dugun orri-izena (“ ConcatenatingAllColUntilBlank ” lan-koadernoko orri-izena da).
7238
Zehaztu lan egingo dugun barrutia.
3123
Kode zati honek begizta hasten du matrizearekin. Begizta egiten jarraitzen du matrizearen azpiindize handiena eta beheko muga itzultzen dituen artelehen dimentsioa. Ondoren, bigarren dimentsioaren beheko muga ateratzeko iterazioan sartzen da. Horren ostean, ateratako balio guztiak iResult aldagaian pasatzen ditu kateatu eta emaitza MsgBox-era botaz. Horretan jarraitzen du gelaxka huts bat aurkitu arte.
Ondorioa
Ondorioz, artikulu honek 11 metodo eraginkor erakutsi dizkizu errenkadak nola pasatzeko. Excel-eko taula baten VBA makroa . Artikulu hau zuretzat oso onuragarria izan dela espero dut. Anima zaitez gaiari buruzko edozein galdera egin.
fitxara Garatzailea -> Visual Basic Visual Basic Editorirekitzeko.
- Ondoren, pop-up kodearen leihoan, menu-barran, egin klik Txertatu -> Modulua .
- Ondoren, kopiatu hurrengo kodea eta itsatsi kodean leihoa.
4563
Zure kodea exekutatzeko prest dago.
- Orain, sakatu F5 zure gailuan. teklatuan edo menu-barran hautatu Exekutatu -> Exekutatu Azpi/UserForm . Azpi-menu-barran dagoen Play ikono txikia ere egin dezakezu klik makroa exekutatzeko.
- Edo ikusiz ikusi eta datu-multzoa eta emaitza alderatu, gorde dezakezu kodea eta itzuli interesgarri zaizun lan-orrira .
- Hortik, <1 klik egin dezakezu>Makroak Garatzailea fitxatik, hautatu makroaren izena eta, ondoren, sakatu Exekutatu .
Kodea arrakastaz exekutatu ondoren, begiratu goiko gif-a emaitza ikusteko. MsgBox pop-up bat agertuko da, zure Excel orriko taulako errenkada bakoitzeko gelaxka bakoitzaren erreferentzia bakoitzeko zelula-erreferentzia-zenbakia erakusten duena.
VBA kodearen azalpena
3032
Taularen azken errenkada-zenbakia lortzeko B zutabea bilatuz.
3125
Ezarri 4. errenkada zenbakia, nondik hasten diren gure datuak.
1666
Lehenengo errenkadatik begizta egiteko.
1265
Ezarri 2. zutabearen zenbakia, gure datuak nondik hasten diren.
7297
Hasi errenkadak errenkadak errepasatzen azkena lortzeko.zutabe-zenbakia uneko errenkada azken errenkadara arte ebaluatuz.
5967
Incrementatu zutabea lehenengo errenkadatik azken errenkadara arte.
6684
Kode zati honek prozesatzen du, gehitzen da bakoitzaren ondoren. iterazioa eta bistaratu kodearen emaitza.
Gehiago irakurri: Nola gehitu errenkada berria automatikoki Excel taula batean
2 . Inplementatu VBA errenkada bakoitzeko gelaxka bakoitzean balioaren arabera errepasatzeko
Taula bateko errenkada bakoitzeko gelaxka bakoitzean erregikatu nahi baduzu eta gelaxketan bizi den balioa itzultzeko balio gisa bota , orduan atal honek VBA Excel-ekin nola egin asmatzen lagunduko dizu.
Hori egin dezakezu ListObject -rekin eta <1-rekin. VBA -ren>DataBodyRange propietatea. Makro kodea erakutsiko dizugu objektuarekin zein propietatearekin.
2.1. ListObject-ekin
VBA Excel-en VBA Excel-en VBA -ko gelaxka-balioaren arabera taula bateko errenkada bakoitzean gelaxka bakoitzean zehar ibiltzeko urratsak ematen dira.
Urratsak:
- Lehen bezala, ireki Visual Basic Editor Garatzailea fitxatik eta Txertatu Modulu bat kodearen leihoan.
- Ondoren, kodearen leihoan, kopiatu hurrengo kodea eta itsatsi
3425
Zure kodea exekutatzeko prest dago.
- Ondoren, Exekutatu makroa. goiko atalean erakutsi dizugun bezala. Emaitza gif-ean agertzen dabehean.
Leipiko bat agertuko da MsgBox , errenkada bakoitzeko gelaxka bakoitzak daraman balioa erakusten duena > zure Excel orriko taulatik.
VBA kodearen azalpena
1236
Definitu aldagaiak.
9462
Pieza hau kodea lehenik eta behin taulako errenkaden bidez begiztatzen hasten da (" TblStudents " da gure taularen izena). Ondoren, zutabeak sartzen ditu errenkada bakoitzeko. Horren ondoren, pasatu gelaxkaren balioa MsgBox-en. Ondoren, joan hurrengo zutabera. Errenkada bateko zutabe guztiak errepikatzen amaitu ondoren, hurrengo errenkadara joaten da eta iterazio-prozesuarekin jarraitzen du azken errenkadara arte.
2.2. DataBodyRange propietatearekin
Taulatik ateratako datuekin zehatzago izateko, ListObject ren DataBodyRange propietatea erabil dezakezu. DataBodyRange propietateak goiburuko errenkadaren eta txertatzeko errenkadaren arteko zerrendako barrutia duen emaitza emango dizu.
Errenkada bakoitzeko gelaxka bakoitzean begizta dezakezun jakiteko urratsak. VBA Excel-eko DataBodyRange taula baten gelaxka-balioaren arabera behean ematen dira.
Urratsak:
- Ageri den bezala aurretik, ireki Visual Basic Editor Garatzailea fitxatik eta Txertatu Modulua kodearen leihoan.
- Ondoren. , kopiatu hurrengo kodea eta itsatsi kodearen leihoan.
9732
Zure kodea exekutatzeko prest dago.
- Geroago, Exekutatu makroa eta begiratu hurrengo gif-a irteera ikusteko.
Leipiko bat agertuko da MsgBox zure Excel-orriko taulako errenkada bakoitzeko gelaxka bakoitzak daraman balioa erakusten dizu.
VBA kodearen azalpena
7280
Definitu aldagaia.
3343
Kode zati hau lehenik eta behin taulako errenkadetan begiztatzen hasten da (" TblStdnt " da gure taularen izena) eta balio sorta bat itzultzen du kanpoan taularen goiburuko errenkada. Ondoren, pasa barrutiaren balioa MsgBox-en. Ondoren, hurrengo errenkadara joaten da barrutia ateratzeko eta iterazio-prozesuarekin jarraitzen du azken errenkadara arte.
3. Aplikatu VBA makroa errenkadetan zehar errepikatzeko Excel-en zutabeak kateatuz
Atal honek taula bateko errenkadak nola errenkadak begiztatu behar diren erakutsiko du zure datu-multzoko lehen zutabearekin zutabeak kateatuz. Excel-en.
Adibidez, gure datu-multzorako, lehenik eta behin, John B5 gelaxkan eta 101 C5 gelaxkan errepikatuko ditugu horiek kateatu eta gero errepikatuko dugu. John B5 gelaxkan eta 89 D5 gelaxkan kateatuz, 5 errenkada tik.
Utzi nola egin dezakezun erakutsiko dizugu. VBA makroa Excel-en.
Urratsak:
- Hasieran, ireki Visual Basic Editor . 1>Garatzailea fitxa eta Txertatu Modulua kodearen leihoan.
- Bigarrenik, kodearen leihoan, kopiatu honako hau kodeaeta itsatsi .
5173
Zure kodea exekutatzeko prest dago orain.
- Hirugarrenik, Exekutatu makroa. Begiratu beheko gif-ari emaitza ikusteko.
Leipiko bat agertuko da MsgBox , balio kateatua erakutsiz. lehenengo eta bigarren zutabeko gelaxken ( John B5 gelaxkan B zutabeko eta 101 gelaxkako C5 zutabeko C ) eta gero balio kateatua lehenengo eta hirugarren zutabeko gelaxken ( John B5 zutabeko gelaxkan eta 89 gelaxkako D5 zutabeko ) errenkadako 5. zenbakia zure datu multzotik. Eta kateatze-eragiketa honek aurrera jarraituko du taularen azken errenkatara iritsi arte.
VBA kodearen azalpena
5394
Definitu aldagaia.
2727
Ondoren, kodeak orri aktibotik taula hautatzen du (" TblConcatenate " gure taularen izenan).
3487
Ondoren, errenkada bakoitza errepikatzen hasten da, goiburua kenduta. zutabea. Iterazioak bat-etortze bat aurkitzen badu zutabe-goiburuaren eta errenkaden arteko tartean, orduan balioa iValue aldagaian gordetzen du.
7544
Goiko baldintza ez bada betetzen, orduan kodeak MsgBox-en balioa botatzen du eta baldintza amaitzen du. Horren ostean, beste barruti batean begizta egitera pasatzen da eta errepikatzen jarraitzen du amaierako errenkadara arte. Behin amaierako errenkadara iristen denean, makroak kodearen exekuzioari amaiera ematen dio.
4. Kapsulatu makroa errepikatzekoErrenkadak bidez Excel-en taula bateko zutabe guztiak kateatzeaz
Atal honetan, errenkada bakoitzak dituen zutabe guztiak nola lotu datu-multzoan ikasiko dugu. VBA makroa Excel-en.
Behean agertzen diren exekutatzeko urratsak.
Urratsak:
- Lehenik eta behin, ireki Visual Basic Editor Garatzailea fitxatik eta Txertatu Modulua kodearen leihoan.
- Ondoren, kopiatu hurrengo kodea eta itsatsi kodearen leihoan.
1879
Zure kodea exekutatzeko prest dago orain.
- Ondoren, Exekutatu makro-kodea.
Goiko gif-an ikusten denez, badago pop-up MsgBox zure Excel-eko lan-orriko taulako errenkada guztietan bizi diren zutabe guztien balio kateatua erakusten dizu.
VBA kodearen azalpena
6642
Definitu aldagaiak.
5524
Ezarri lan egingo dugun orri-izena (" ConcatenatingAllCol " da orriaren izena. lan-koadernoan).
1864
De ondo landuko dugun taularen izena (" TblConcatenateAll " da gure datu multzoko taularen izena).
2080
Taularen errenkada bakoitzean iterazioa hasten da.
7733
Taularen errenkada bakoitzeko zutabe bakoitzean iterazioa hasten du.
7764
Gorde emaitza errenkada bakoitzeko zutabe bakoitzak dituen balioak ebakiz. Errenkada bakoitzean bizi diren zutabe guztiak eskaneatu ondoren, gainditu zuenemaitza MsgBox-en. Ondoren, berriro hasten da begizta hurrengo errenkadan eta begiztatzen jarraitzen du taularen azken errenkatara iritsi arte.
Gehiago irakurri: Nola ordenatu taula bateko hainbat zutabe Excel VBArekin (2 Metodo)
5. Gelditu iterazioa VBA makroa duen taula bateko errenkadetan zehar begiztaz aurkitzen bada balioa
Demagun zure taulako errenkadetan zehar begizta egin nahi duzula eta balio zehatz bat aurkitzen duenean begizta gelditu nahi duzula . Makro-kode soil batekin egin dezakezu hori.
Ikas dezagun VBA Excel-en nola egiten den.
Urratsak:
- Hasieran, ireki Visual Basic Editor Garatzailea fitxatik eta Txertatu Modulua kodearen leihoan.
- Ondoren, kodearen leihoan, kopiatu hurrengo kodea eta itsatsi .
1368
Zure kodea exekutatzeko prest dago orain .
- Geroago, Exekutatu makroa.
- Begizta hasi eta geldituko du denean. balio espezifikoa (" Ertza ") aurkitzen du barrutian eta emaitza MsgBox -ra botatzen du.
Goiko irudian ikus dezakezun bezala, pop-up MsgBox bat dago gelaxka-helbidea, $B$10 , non aurkitu duguna erakusten dizuna. zehaztutako balioa, “ Ertza ” .
VBA kodearen azalpena
4777
Definitu aldagaia.
2777
Kode zati hau 1etik 15era bitarteko errenkadetan begizta egiteko dago. Hitz zehatza aurkitzen badu." Ertza " ondoren, emaitza hitza gordetzen duen gelaxka-helbidearekin pasatzen du. Horretan jarraitzen du hitza bilatzeko 1etik 15era bitarteko datu guztiak eskaneatzen amaitu arte.
Irakurri gehiago: Nola txertatu edo ezabatu errenkadak eta zutabeak Excel taulatik
6. VBA errenkada bakoitzean begiztatu eta balio espezifiko bat margotu Excel-en
Zer gertatzen da zehaztutako balioaren gelaxka-helbidea MsgBox-en bota nahi ez baduzu? Baliteke bilatzen ari zaren balioa duen gelaxka marreztatu nahi izatea.
Ikas dezagun nola egiten den VBA makroarekin.
Urratsak:
- Lehen bezala, ireki Visual Basic Editor Garatzailea fitxatik eta Txertatu Modulua kodearen leihoan.
- Ondoren, kopiatu hurrengo kodea eta itsatsi kodearen leihoan.
8993
Zure kodea exekutatzeko prest dago.
- Ondoren, Exekutatu makroa.
- Begizta hasi eta geldituko du balio zehatza aurkitzen duenean (" Ertza ") barrutian eta gelaxka margotu ColourIndexarekin. kodean eman duzun.
Goiko irudian ikus dezakezun bezala, C ell B10 , non zehaztutako balioa aurkitu dugun, " Ertza " kolorez kodea exekutatu ondoren.
VBA kodearen azalpena
6465
Definitu