VBA vir elke sel in reeks in Excel (3 metodes)

  • Deel Dit
Hugh West

In groot databasisse het jy die meeste van jou tyd spandeer om met reekse en selle te handel. Soms moet jy dieselfde aksie herhaal in groot reekse of 'n groot aantal selle. Dit maak terselfdertyd jou tyd dood en verminder jou doeltreffendheid. Die slim oplossing vir hierdie probleem is om 'n VBA-programmeringskode te bou wat deur elke sel in die reeks sal loop en dieselfde aksie uitvoer wat deur jou gerig is. Vandag in hierdie artikel sal ons bespreek hoe om VBA vir elke sel in reeks in Excel te doen.

Laai Oefenwerkboek af

Laai hierdie oefenboek af om die taak uit te oefen terwyl jy hierdie artikel lees.

VBA-kode vir elke sel in 'n reeks in Excel.xlsx

3 gepaste maniere om VBA toe te pas vir elke sel in 'n reeks in Excel

Deur 'n VBA-kode te gebruik, kan jy dieselfde formule vir elke sel in 'n reeks of 'n kolom of 'n ry uitvoer. In hierdie afdeling gaan ons deur al die afdelings gaan.

1. Pas VBA toe vir elke sel in reeks

Oorweeg 'n situasie waar jy dieselfde VBA-kode vir elke sel in 'n sel moet toepas. gegewe reeks ( B3:F12 ). Om dit te doen, sal ons 'n VBA-kode bou. Die instruksies word hieronder gegee

Stap 1:

  • Eers sal ons 'n opdragknoppie invoeg om ons werk te vereenvoudig . Gaan na jou Ontwikkelaaroortjie , kies Voeg in en klik op die opdragknoppie om een ​​te kry.

  • Ons het ons bevel gekryknoppie.

  • Regskliek op die opdragknoppie om opsies oop te maak. Kies en klik op Eienskappe om sommige opsies te wysig.

  • Verander die onderskrif van die opdragknoppie. Hier verander ons die naam na, “ Klik hier ”.

Stap 2:

  • Dubbelklik nou op die opdragknoppie om die VBA Module oop te maak. Hier sal ons ons VBA-kode vir die taak neerskryf.

  • Eers sal ons twee veranderlikes verklaar. Ons noem die reeksobjekte CL en Rng . Jy kan hulle noem soos jy wil.
7456

  • Ken spesifieke reeks toe deur hierdie opdrag,

Stel Rng = Worksheets(“VBA1”).Range(“B3:F12”)

  • Hier is VBA1 ons werkbladnaam en B3:F12 is ons gedefinieerde reeks.

  • Nou sal ons die kode gebruik om deur elke sel in die reeks te presteer. Die kode is,
6776
  • Waarde = 100 verwys dat dit 100 vir elke sel in die gegewe reeks sal terugstuur.

  • So ons finale kode word,
9763
  • Gaan na jou hoofwerkblad en klik op die opdragknoppie om VBA uit te voer vir elke sel in die reeks.

Stap 3:

  • Soos numeriese waardes, kan ons ook plaas tekswaardes vir elke sel in die reeks. In daardie geval, gaan na die VBA-venster, en in plaas van 100, voeg die tekswaarde in wat jy wil deurloop. Die veranderdereël is
7851

  • Klik op die opdragknoppie en die VBA-kode sal hierdie tekswaarde vir elke sel in die reeks terugstuur.

Stap 4:

  • In hierdie stap gaan ons 'n bietjie dieper delf. Kom ons sê ons wil elke leë sel in ons reeks uitlig.

  • Voeg daarvoor 'n nuwe voorwaarde by jou bestaande kode. Die nuwe formule is,
5991
  • Hierdie nuwe kode sal die leë sel met rooi kleur uitlig. Die volledige kode is dus:
5225

  • Kry die resultaat deur op die opdragknoppie te klik.

Soortgelyke lesings:

  • Hoe om die reeksobjek van VBA in Excel (5 eienskappe) te gebruik
  • Gebruik VBA-reeksverskuiwing (11 maniere)
  • Hoe om teks in Excel te tel (7 maklike truuks)

2. Voeg VBA in Kode vir elke sel in 'n kolom van 'n reeks

Ons kan ook VBA-kode vir elke sel in 'n kolom laat loop. Gestel ons het 'n kolom wat getalle bevat en ons moet waardes inkleur wat laer as 10 is. Ons sal 'n VBA-kode bou om elke sel in die kolom te laat loop.

Stap 1:

  • Skep 'n opdragknoppie volgens die instruksies wat ons bespreek het.

Stap 2:

  • Dubbelklik op die opdragknoppie om die VBA-venster oop te maak.
  • Ons sal 'n veranderlike genaamd " c " van tipe verklaar lank. Ons gebruik die tipe Lang veranderlike hier omdat Langveranderlikes het 'n groter kapasiteit as Heelgetal veranderlikes.
8515

  • Voeg dan die kodelyn by wat die lettertipekleur van al die selle in ons kolom verander na swart.
1934

  • Voeg die lus vir hierdie kode in.
4041

  • In hierdie stap sal ons 'n voorwaarde invoer om die waardes wat laer is as die waarde van sel C4 (10) in te kleur. Voer hierdie kode in om dit te doen.
3490

  • So die finale kode is,
2094
  • Die VBA sal loop en resultate wys wanneer jy op die opdragknoppie klik.

3. Skryf 'n VBA-kode vir elke sel in 'n ry van 'n reeks

Ons kan ook 'n VBA-kode vir elke sel in 'n ry laat loop. In die gegewe ry moet ons dieselfde aksie op elke sel van die ry uitvoer.

Stap 1:

  • Voeg 'n opdragknoppie by en verander sy naam na “ Klik hier!

  • Dubbelklik op die knoppie om maak die VBA-venster oop. Skryf die VBA-kode hieronder neer.
5736
  • Die kode sal deur elke sel van die ry loop en 'n geel kleurvulling op elke sel toepas.

  • Klik op die knoppie en ons resultaat is hier.

Vinnige notas

👉 As jy het nie jou ontwikkelaaroortjie sigbaar nie, jy kan dit aktiveer deur hierdie instruksie te gebruik.

Gepasmaakte Vinnige Toegangnutsbalk → Meer opdragte → Pasmaak lint → Ontwikkelaar  → OK

Gevolgtrekking

Ons het deur drie verskillende benaderings gegaan om VBA vir elke sel in 'n reeks te laat loop. U is baie welkom om kommentaar te lewer indien u enige vrae of navrae het. Jy kan ook na ons ander artikels kyk wat met die Excel-take verband hou!

Hugh West is 'n hoogs ervare Excel-afrigter en ontleder met meer as 10 jaar ondervinding in die bedryf. Hy het 'n Baccalaureusgraad in Rekeningkunde en Finansies en 'n Meestersgraad in Besigheidsadministrasie. Hugh het 'n passie vir onderrig en het 'n unieke onderrigbenadering ontwikkel wat maklik is om te volg en te verstaan. Sy kundige kennis van Excel het duisende studente en professionele persone wêreldwyd gehelp om hul vaardighede te verbeter en uit te blink in hul loopbane. Deur sy blog deel Hugh sy kennis met die wêreld, en bied gratis Excel-tutoriale en aanlyn opleiding aan om individue en besighede te help om hul volle potensiaal te bereik.