Excel VBA ji bo Hilbijartina Rêzeya Bikaranîn di Stûnê de (8 Nimûne)

  • Vê Parve Bikin
Hugh West

Ev tutorial dê 8 mînakên bikaranîna VBA ji bo hilbijartina Rêjeya Bikaranîn di stûneke excelê de nîşan bide. Bi gelemperî, taybetmendiya UsedRange di excel de beşek ji pelgeya xebatê ya ku daneyên li ser wê hene temsîl dike. Ji bo ku mînakan bi zelalî diyar bikin, em ê taybetmendiya UsedRange di danegehek taybetî de ji bo hemî mînakan bicîh bikin.

Pirtûka Xebatê ya Pratîkê dakêşin

Em dikarin pirtûka xebata pratîkê ji vir dakêşin. .

VBA ji bo Hilbijartina UsedRange di Column.xlsm de

8 Mînakên hêsan ên VBA ji bo Hilbijartina UsedRange di Stûnê de

Di wêneya jêrîn de , em dikarin databasa ku em ê ji bo hemî mînakan bikar bînin bibînin. Di danezanê de navên Firoşkaran , Cih , Herêm, û ' Hemîmî ' yên firotana wan dihewîne. Di vê danûstendinê de, rêza hatî bikar anîn dê tevî sernavê were hesibandin. Ji ber vê yekê, rêza ku di daneya jêrîn de hatî bikar anîn ev e ( B2:E15 ).

1. UsedRange di stûna bi VBA de di Excel de

Berî her tiştî, em ê hemî stûnan ji databasa xwe hilbijêrin. Ji bo vê yekê em ê di stûnan de taybetmendiya VBA hilbijêre UsedRange bikar bînin. Ka em gavên pêkanîna vê rêbazê bibînin.

GAVAN:

  • Ji bo destpêkê, li ser pelika çalak a bi navê rast-klîk bikin ' Stûnên_Hilbijêre '.
  • Herweha, vebijarka ' Kodê Binêre ' hilbijêre.

  • Piştre, çalakiya jorîn valahiyek vedike VBA pencereya kodê ji bo wê pelgeyê. Em dikarin vê pencereya kodê jî bi tikandina Alt + F11 bistînin.
  • Piştre, koda jêrîn di wê pencereya kodê de binivîsin:
2969
  • Piştî wê, li ser Run bikirtînin an jî bişkojka F5 bikin ku kodê bişopînin.

  • Di dawiyê de, em encamek mîna wêneya jêrîn bistînin. Em dikarin bibînin ku rêzika ku di stûnan de hatî bikar anîn ji databasa me nuha hatî hilbijartin.

2. Ji bo Kopîkirina Tevahiya UsedRange di Stûnê de VBA bikar bînin

Di mînaka duyemîn de, em ê VBA bikar bînin da ku tevahiya rêza hatî bikar anîn di stûnên ji databasa me de kopî bikin. Bi gelemperî, em vê rêbazê bikar tînin ku herêmek taybetî ji databasa xwe kopî bikin. Ji bo pêkanîna vê rêbazê divê em gavên jêrîn bişopînin.

GAV:

  • Pêşî, herin tabloya kargeha çalak a bi navê ' Copy '.
  • Piştre, li ser wê tabê bitikîne û vebijarka ' Kodê Binêre ' hilbijêre.

  • Ew ê ji bo pelgeya xebatê ya heyî pencereyek VBA vala veke. Rêyek din a bidestxistina vê paceyê ew e ku hûn ji klavyeyê pêl Alt + F11 bikin.
  • Piştre, koda jêrîn têxin wê pencereya kodê:
3089
    >
    • Di dawiyê de, em dikarin encamê wekî jêrîn bibînin. Di heman demê de, em dikarin li dora rêza hatî bikar anîn sînorek bibînin. Ew destnîşan dike ku kodê daneya kopî kiriyedi hundurê vî sînorî de.

    Zêdetir Bixwîne: Excel VBA: Rêzeya Dînamîk li Pirtûka Xebatê Din Bişopîne

    3. Hejmara Bijmarê Stûnên di nav UsedRange de Bi Bikaranîna VBA

    Di mînaka sêyemîn de, em ê hejmara stûnên di daneya xwe de bi karanîna excelê bijmêrin VBA hilbijêre Rêjeya Bikaranîn rêbaza di stûnê de . Ev mînak dê di qutiyek peyamê de hejmara stûnên di hundurê rêza hatî bikar anîn de vegerîne. Ji bo pêkanîna vê rêbazê gavên jêrîn bişopînin.

    GAV:

    • Pêşî, pelika çalak a bi navê ' Count_Columns ' hilbijêre.
    • Ya duyemîn, li ser navê pelê çalak rast-klîk bikin û li ser vebijarka ' Kodê Binêre ' bikirtînin.

    • Fermana jorîn ji bo pelgeya xebatê ya çalak pencereyek VBA vala vedike. Em dikarin pencereya kodê jî bi tikandina Alt + F11 ji klavyeyê bistînin.
    • Ya sêyemîn, koda jêrîn têxe wê pencereya koda vala:
    8432
      3>
      • Di dawiyê de, em encam di qutiyek peyamê de digirin. Hejmara stûnên di nav rêza hatî bikar anîn de 4 e.

      Zêdetir Bixwîne: Meriv çawa VBA-yê bikar tîne da ku rêzên di nav rêzê de bihejmêre bi Daneyên di Excel de (5 Macro)

      4. Excel VBA Ji bo Hejmara Stûna Dawî ya Di Rêjeya Bikaranîn de Bijmêre

      Di rêbaza berê de, me hejmara stûna paşîn di nav de derxist. range bikaranîn.Lêbelê, di vê nimûneyê de, em ê bi taybetmendiya VBA hilbijartina UsedRange , hejmara stûna paşîn a di rêza hatî bikar anîn de li seranserê kargerê diyar bikin. Ka em gavên ku divê em bişopînin ji bo pêkanîna vê çalakiyê bibînin.

      GAV:

      • Ji bo destpêkê, rast-klîk bikin li ser pela çalak a bi navê ' Stûna Dawî '.
      • Piştre, vebijarka ' Kodê Binêre ' hilbijêre.

      • Ji ber vê yekê, emrê jorîn ji bo wê pelgeya xebatê pencereyek koda VBA vala vedike. Rêyek alternatîf a vekirina wê pencereya kodê ev e ku hûn pêl Alt + F11 bikin.
      • Piştî wê, koda jêrîn têxin wê pencereya kodê:
      4811
      • Niha, li ser Run bikirtînin an jî bişkojka F5 bikin da ku kodê bixebitînin.

      • Di dawiyê de, em encama xwe di qutiyek peyamê de digirin. Stûna paşîn a di rêza hatî bikar anîn de 5emîn stûna pelê xebatê ye.

      Xwendinên Wekhev

      • Meriv çawa VBA-yê ji bo her rêzek di nav rêzek li Excel-ê de bikar tîne
      • VBA-ê bikar tîne da ku Rêzeya ji hucreya çalak a di Excel de hilbijêrin (3 Rêbaz)
      • Excel Macro: Pir Stûnan Bi Rêzeya Dînamîk Birêve Bike (4 Rêbaz)

      5. Xaneya Dawî ya Stûna Dawî ji UsedRange bi VBA hilbijêrin

      Di mînaka pêncemîn de, em ê taybetmendiya VBA hilbijêre Rêza Bikaranîn bikar bînin da ku şaneya paşîn a stûna paşîn a di pelek excel de hilbijêrin. Ji bo ronîkirina vê nimûneyê, emdê bi databasa meya berê berdewam bike. Niha, li gavên pêkanîna vê rêbazê binêre.

      GAV:

      • Pêşî, pelika çalak a bi navê ' Last_Cell<2 hilbijêre>'.
      • Piştre, li ser navê pelê rast-klîk bikin . Vebijarka ' Kodê Binêre ' hilbijêre.

      • Piştre, em pencereyek VBA kodê vala distînin. . Her weha, em dikarin pêl Alt + F11 bikin ku wê pencereya kodê veke.
      • Piştî wê, koda jêrîn di wê pencereya kodê de binivîsin:
      6378
      • Niha, ji bo ku kodê bimeşîne, li ser Run bikirtînin an jî pêl F5 bikin.

      • Di dawiyê de, em dikarin encamê di wêneya jêrîn de bibînin. Hucreya dawîn a hilbijartî ya stûna dawîn şaneya E15 e.

      6. Bi Excel VBA Rêjeya Hilbijartî ya UsedRange bibînin

      Di vê nimûneyê de, em ê VBA bicîh bikin da ku rêzika hucreyê ya rêza hilbijartî ya hatî bikar anîn di pelgeya xebatê ya excel de bibînin. Em ê koda VBA ji bo hemî stûnên di nav rêza xweya bikar anîne de bikar bînin. Kod dê rêza hucreyê û her weha navnîşana stûna di nav rêza hatî bikar anîn de vegerîne. Ji bo pêkanîna vê kiryarê gavên jêrîn bişopînin.

      GAV:

      • Di destpêkê de, rast-klîk bikin li ser tabloya pelê çalak bi navê ' Rêzika Hucreyê Bibîne '.
      • Ya duyemîn, vebijarka ' Kodê Binêre ' hilbijêre.

      • Ew ê paceya koda VBA vala veke. Rêbazek din a vekirina vê pencereya kodê ev e ku hûn pêl Alt bikin + F11 .
      • Sêyemîn, di wê pencereya kodê de koda jêrîn têkevin:
      9783
      • Piştre, ji bo ku kodê bimeşîne, li ser bitikîne. Rêveke an bişkojka F5 bitikîne.

      • Di dawiyê de qutiyeke peyamê ya mîna wêneya jêrîn encamê nîşan dide.

      Xwendinên Wekhev

      • VBA ji Rêzan û Di Excel VBA de Stûnên Di Rêjeyekê de (5 Nimûne)
      • Meriv Çawa Di Excel VBA de Rêzeyê Veguherîne Array (3 Rê)

      7. Têxe Taybetmendiya VBA UsedRange ji bo hejmartina şaneyên vala

      Di vê nimûneyê de, em ê taybetmendiya VBA hilbijêre UsedRange bikar bînin da ku şaneyên vala di pelek excel de bijmêrin. Carinan dibe ku di nav rêza daneya me ya hatî bikar anîn de şaneyên me vala hebin. Em dikarin bi hêsanî hejmarên wan şaneyên vala bi karanîna taybetmendiya UsedRange bijmêrin. Ka em gavên pêkanîna vê nimûneyê bibînin.

      GAVAN:

      • Pêşî, rast-klîk bikin li ser tabloya pelê çalak a bi navê ' Celiyên_Val '.
      • Piştre, vebijarka ' Kodê Binêre ' hilbijêre.

      • Çalakiya jorîn pencereyek koda VBA vala vedike. Rêyek alternatîf a vekirina wê pencereya kodê ev e ku hûn pêl Alt + F11 bikin.
      • Piştre, koda jêrîn têxin wê pencereya kodê:
      5984
      • Piştî wê, li ser Run bikirtînin an jî bişkojka F5 bikin ku kodê bişopînin.

      • Di dawiyê de, em ê di qutiya peyamê de encam bigirin. Ewqutiya peyamê dê hejmara şaneyên tevayî û şaneyên vala yên di nav rêza me ya bi kar anîn de nîşan bide.

      8. VBA UsedRange Ji bo Cihkirina Xaneya Yekem Vala Di Stûna Excel de

      Di mînaka paşîn de, em ê excelê VBA bikar bînin da ku di stûnê de taybetmendiya Rêjeya Bikaranîn hilbijêrin da ku yekem şaneya vala ya di pelgeya xebatê ya excelê de bibîne. Ev rêbaz dê yekem şaneya vala ya stûnek taybetî bibîne. Hucreya vala dê her gav li derveyî rêzika hatî bikar anîn ya daneyê be. Ji ber vê yekê, heke di rêza hatî bikar anîn de şaneyek vala an vala be ew ê di vê rêbazê de neyê hesibandin. Niha, gavên jêrîn bişopînin da ku vê rêbazê pêk bînin.

      GAVAN:

      • Ji bo destpêkê, li ser çalakê rast-klîk bikin tabloya pelê bi navê ' Yek_Empty '.
      • Herwiha, vebijarka ' Kodê Binêre ' hilbijêre.

      • Ew ê paceyek VBA kodê vala veke. Her weha em dikarin pêl Alt + F11 bikin ku wê pencereya kodê veke.
      • Herweha, koda jêrîn di paceya vala VBA kodê de binivîsin:
      2293
      • Piştre, ji bo ku kodê bimeşîne, li ser Run bikirtînin an jî bişkojka F5 bikin.

      • Di dawiyê de, koda jorîn dê nirxa ' FirstEmptyCell ' têxe hucreya E16 . Ew yekem şaneya vala ya stûna E ye piştî rêza daneheva hatî bikar anîn.

      Zêdetir Bixwîne: Excel VBA to Di Rêzeyê de bigerin heta Xaneya Vala (4 Mînak)

      Encam

      Bi kurtî, ev tutorial 8 mînakan nîşan dide ku hûn taybetmendiya VBA hilbijêre UsedRange di pelek excel de bikar bînin. Ji bo ku hûn jêhatîbûnên xwe bidin ceribandin, pelgeya xebatê ya ku ji bo vê gotarê hatî bikar anîn dakêşin. Ji kerema xwe heke pirsên we hebin di qutiya jêrîn de şîrove bikin. Tîma me dê hewl bide ku di zûtirîn dem de bertek nîşanî peyama we bide. Di pêşerojê de li ser çareseriyên Microsoft Excel yên nûjentir bisekinin.

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î.