VBA Rêza Dawî di Excel de bibîne (5 away)

Hugh West

16-10-2023 Makro & amp; Excel VBA
  • Vê Parve Bikin
Hugh West

Di VBA de hûn dikarin rêbazên cûda bikar bînin da ku rêza paşîn bibînin. Di vê gotarê de, ez ê rêbazên cihêreng ên VBA-ya rêza paşîn a di Excel de rave bikim.

Ji bo ku ev ravekirin xuya bibe, ez ê danehevek nimûne bikar bînim. Di danezanê de 4 stûn hene ku agahdariya firotanê temsîl dikin. Ev stûn Kesê Firotanê, Herêm, Hilber, û Biha in.

Daxistin Ji Bo Praktîkê

VBA Rêza Dawî Bibîne.xlsm

Rêyên VBA-yê Di Excel de Rêza Dawî Bibîne

1. Bikaranîna Cellên Taybet ji bo dîtina Rêza Dawî

Hûn dikarin rêbaza SpecialCells bikar bînin da ku rêza paşîn bi karanîna VBA bibînin.

Pêşî, Pêşdebir veke tab >> paşê Visual Basic hilbijêre

Pencereke nû ya Microsoft Visual Basic ji bo Sepanan dê derkeve.

Niha, ji Têxe >> hilbijêre Modul

A Modul dê vebe.

Piştre koda jêrîn di nav <2 de binivîsîne>Module . 

9440

Li vir, min pêvajoyek binavkirî bi navê LastRow_SpecialCells afirand, li wir cureyek Drêj ji guhêrbar LastRow hat ragihandin.

Piştre guherbar bi rêbaza Range.SpecialCells diyar kir. Li vir, min stûna A ( A:A ) wekî rêzê bikar aniye. xlCellTypeLastCell wekî pîvana celebê Celên Taybet tê peyda kirin, ev ê şaneya paşîn a rêzê vegerîne (ji bo vê rewşê, ji stûnê A ).

Min qutiyeke peyamê bikar anî da ku encamê nîşan bidim.

Piştî wê, Kodê tomar bike û vegere ser pelgeya xebatê.

Dîsa, tabloya Dîtin >> ji Makroyan >> Hilbijêre Makroyan Binêre

Piştre, qutiya diyalogê dê derkeve holê.

Niha, ji navê makroyê LastRow_SpecialCells di nav Makroyên di de jî pirtûka xebatê hilbijêrin.

Di dawiyê de, Makro -ya hilbijartî bixebitîne.

Ji ber vê yekê, ew ê qutiyek peyamê derkeve ku hejmara rêza dawî nîşan dide.

2. Ji bo şaneyên nevala Rêz.Hejmar bi kar tînin

Hûn dikarin rêbaza Rêz.Hejmar bikar bînin da ku rêza dawî bi VBA bibînin. .

Niha, tabloya Pêşdebir >> paşê Visual Basic hilbijêre

Pencereke nû ya Microsoft Visual Basic ji bo Sepanan dê derkeve.

Niha, ji Têxe >> hilbijêre Modul

A Modul dê vebe.

Piştre koda jêrîn di nav <2 de binivîsîne>Modul . 

7035

Li vir, min jêrpêvajoyek bi navê LastRow_NonEmpty afirand, ku tê de cureyek Drêj guherbarek Rojiya Dawî hate ragihandin.

Niha, CELLS(Rêz.Hejmar, 1) dê bijmêre çend rêz di stûna yekem de hene. Dûv re End(xlUp) hat bikaranîn. Rêz niha ev ê rêza herî dawî ya hatî bikar anîn di nav rêzek Excel de bibîne.

Di dawiyê de, min qutiyek peyamê bikar anî ku nîşan bideencam.

Piştre, Kodê tomar bike û vegere pelgeya xebatê.

Li vir, tabloya Dîtin >> ji Makroyan >> hilbijêre Makroyan Binêre

Niha, qutiyeke diyalogê dê derkeve.

Piştre, ji Navê makroyê LastRow_NonEmpty ji Makroyên di de jî pirtûka xebatê hilbijêrin.

Di dawiyê de, Makro -ya hilbijartî bixebitîne.

Bi vî awayî, ew ê qutiyek peyamê derkeve ku hejmara rêza dawî nîşan dide.

3. Ji bo Stûna Hilbijartî Rêz Bikaranîne

Bi bikaranîna her stûneke hilbijartî di VBA de, hûn dikarin rêza dawîn bibînin.

Yekemîn. , tabloya Pêşdebir veke >> paşê Visual Basic hilbijêre

Pencereke nû ya Microsoft Visual Basic ji bo Sepanan dê derkeve.

Niha, ji Têxe >> hilbijêre Modul

A Modul dê vebe.

Piştre koda jêrîn di nav <2 de binivîsîne>Modul . 

6756

Li vir, min pêvajoyek binavûdeng a bi navê LastRow_AnyColumn afirand, ku tê de celebek Drêj Rojiya Dawî hate ragihandin.

Piştre, di Rengê de stûna B wekî parametre û her weha Rêz.Hejmar , ev dê bijmêre çend rêz di stûneke diyarkirî de hene B . Piştre, Dawî (xlup) tê bikaranîn. Rêz ya ku dê rêza herî dawî ya hatî bikar anîn di nav rêzek Excel de bibîne.

Dawiya dawî, min qutiyek peyamê bikar anî da ku nîşan bideencam.

Piştre, Kodê tomar bike û vegere pelgeya xebatê.

Piştre, tabloya Dîtin >> ji Makroyan >> hilbijêre Makroyan Binêre

Li vir, qutiyeke diyalogê dê derkeve.

Niha, ji navê makroyê LastRow_AnyColumn di nav Makroyên di de jî pirtûka xebatê hilbijêre.

Di dawiyê de, Makro -ya hilbijartî bixebitîne.

Bi vî awayî, ew ê qutiyek peyamê derkeve ku hejmara rêza dawî nîşan dide.

Xwendinên Bi vî rengî:

  • VBA Di Stûna Excel de (7 Nêzîktêdayîn) Bibînin
  • Bi Bikaranîna VBA Bibînin û Biguherînin (11 Rêbaz)
  • Bi VBA-yê di Excel-ê de Lihevhatina Rastî Bibînin (5 Rêbaz)
  • Meriv çawa String bi VBA-yê li Excel-ê bibîne (8 Nimûne)

4. Ji bo dîtina rêza dawîn UsedRange bikar bînin

Hûn dikarin taybetmendiya UsedRange ya pelxebatê bikar bînin da ku rêza paşîn bibînin. rêza VBA bi kar tîne.

Niha, tabloya Pêşdebir >> paşê Visual Basic hilbijêre

Piştre, pencereyek nû ya Microsoft Visual Basic ji bo Serlêdan dê derkeve.

Niha, ji Têxe >> Hilbijêre Modul

A Modul dê were vekirin.

Piştre, koda jêrîn li Modul . 

5116

Li vir, min pêvajoyek binavkirî bi navê LastRow_UsedRange afirand, ku tê de celebek Drêj LastRow hate ragihandin.

Piştre, diyar kirguherbar bi rêbaza ActiveSheet.UsedRange.Rows jî ActiveSheet.UsedRange.Rows.Count wekî pîvana ActiveSheet.UsedRange.Rows peyda dike, ev ê vegere rêza dawîn.

Min qutiyeke peyamê ji bo nîşana encamê bikar aniye.

Niha, Kodê tomar bike û vegere pelika xebatê.

>Piştre, tabloya Dîtin >> ji Makroyan >> hilbijêre Makroyan Binêre

Piştre, qutiya diyalogê dê derkeve holê.

Piştre, ji Makroyê nav LastRow_UsedRange hilbijêre di nav Makroyên di de jî pirtûka xebatê hilbijêre.

Axir, Rêveke ya hilbijartî Makro .

Bi vî awayî, ew ê qutiyeke peyamê derkeve holê ku hejmara rêza dawî nîşan dide.

5. Bikaranîna Range.Find bo Find Last Rêz

Hûn dikarin rêbaza Range.Find bikar bînin da ku rêza dawîn bi VBA bibînin.

Niha, Pêşdebir tab >> paşê Visual Basic hilbijêre

Li vir, pencereyek nû ya Microsoft Visual Basic ji bo Sepanan dê derkeve holê.

Niha, ji Têxe >> Hilbijêre Modul

A Modul dê were vekirin.

Piştre koda jêrîn di Modûl de binivîse. 

7263

Li vir, min pêvajoyek binavê bi navê Range_Find_Method afirand, ku tê de cureyek Drêj ya guhêrbar Rêza Dawî hate ragihandin. .

Piştre guherbar bi rêbaza Cells.Find diyar kir. Li vir, 7 hate ragihandinparametreyên. Di Çi parametreyê de min bi kar anî (“*”) ku dê yekem şaneya ne vala bibîne. Di parametreya Piştî de ji bo destpêkirinê A1 wekî rêze tê dayîn. Di parametreya LookAt de xlPart ji bo ku li her beşek nivîsê di hundirê şaneyê de binêre.

Parametra LookIn:=xlFormulas tê peyda kirin. formulas heke hebin. SearchOrder:=xlByRows Parametre dê ji rastê ber bi çepê ve biçe û her weha di her rêzê de bigere heya ku şaneyek ne vala bibîne.

MatchCase:=False parametre dê ji Find re bêje ku tîpên mezin an piçûk nehesibîne. Dema ku valahiyek ne vala tê dîtin, ew disekine û jimara rêzê vedigerîne.

Min qutiya peyamê bikar aniye ku encamê nîşan bide.

Niha, Kodê tomar bike û vegere pelgeya xebatê.

Li vir, tabloya Dîtin >> ji Makroyan >> hilbijêre Makroyan Binêre

Niha, qutiyeke diyalogê dê derkeve.

Niha, ji navê makro Range_Find_Method herweha di nav Makroyên di de pelê xebatê hilbijêrin.

Di dawiyê de, Makro -ya hilbijartî bixebitîne.

Bi vî awayî, ew ê qutiyek peyamê derkeve ku hejmara rêza dawî nîşan dide.

Encam

Di vê gotarê de, min 5 awayên VBA dîtina rêza paşîn a Excel-ê rave kir. Hûn dikarin yek ji rêbazan bişopînin da ku rêza paşîn bibînin. Ger di derbarê van rêbazan de tevlihevî an pirsek we hebe hûn dikarinli jêr şîrove bike.

Posta berê Meriv çawa di Excel de her rêzek din hilbijêre (6 Rê)
Posta paşîn Hesabkarê Baca Xwe Karkirinê di Spreadsheet Excel de (Bi Gavên Hêsan Biafirîne)

Hugh West perwerdekar û analîstek Excel-ê pir bi tecrûbe ye ku di pîşesaziyê de zêdetirî 10 salan ezmûn heye. Di warê Hesabgiranî û Darayî de bawernameya Bachelorê û di Rêveberiya Karsaziyê de jî Master e. Hugh ji hînkirinê re dilşewat e û rêgezek hînkirinê ya bêhempa pêşxistiye ku hêsan tê şopandin û têgihiştin. Zanîna wî ya pispor a Excel alîkariya bi hezaran xwendekar û pisporan li çaraliyê cîhanê kiriye ku jêhatîbûnên xwe baştir bikin û di kariyera xwe de pêşde bibin. Bi bloga xwe, Hugh zanîna xwe bi cîhanê re parve dike, dersên belaş Excel û perwerdehiya serhêl pêşkêşî dike da ku alîkariya kes û karsaziyan bike ku bigihîjin potansiyela xwe ya tevahî.