Tabloya naverokê
Heke hûn li hin awayên herî hêsan digerin ku hûn rêzê bi karanîna VBA jêbirin, wê hingê hûn li cîhê rast in.
Werin em têkevin gotara sereke.
4> Pirtûka Xebatê Dakêşîne VBA Jê Bike Row.xlsm
14 Awayên Jêbirina Rêzê Bi Bikaranîna VBA
Li vir, sê daneyên min hene tabloyên ku awayên jêbirina rêzan bi karanîna VBA nîşan bidin. Di tabloya yekem de hin Berhemên şîrket û Mezinahiyên wan , Biha hene.
Ya duyemîn yekî hin Kodên Berheman hene û yên têkildar Mezinahiyên Berheman û Bihayan
Û ya dawî dihewîne hin Navên Projeyê û Dîrokên Destpêkê û Lêçûn .
Ji bo afirandina gotarê, ez guhertoya Microsoft Excel 365 bikar aniye, hûn dikarin li gorî rehetiya xwe guhertoyên din bikar bînin.
Rêbaz-1: Rêzek Yekane Bi Bikaranîna VBA jêbirin
Em bibêjin, hûn Dixwazin rêza ku tê de Berhem Pêlava 1, jêbirin û ji bo vê rêzê jêbirin hûn dikarin vê rêbazê bişopînin.
Gav-01 :
➤Biçe Pêşdebir Tab>> Visual Basic Vebijêrk
Piştre, Edîtorê Visual Basic dê vebe.
➤Biçe Têxe Tab>> Module Vebijêrk
Piştî wê, Modul dê were çêkirin.
Gavek-02 :
➤Polê binivîse koda kêmkirinê
3522
Li vir, "Tek" yekîtiya pir rêzikên ku bi şaneyên xwedî tarîxa 11/12/2021 ve girêdayî ne, û di dawiyê de, rêzeçiya dê werin jêbirin. 1>F5
Encam :
Piştî wê, hûn ê rêzên ku tarîxek diyarkirî ne 11/12/2021 jêbikin. .
Naveroka Têkildar: Excel VBA ku Rêzên bi Daneyên Taybet jê Bike (9 Nimûne)
Pratîk Beşa
Ji bo ku hûn bi tena serê xwe tetbîq bikin, me di kaxezek bi navê Peraktîv de beşa Pratîk wek li jêr pêşkêş kiriye. Ji kerema xwe wê bi xwe bikin.
Encam
Di vê gotarê de, min hewl da ku rêyên herî hêsan ên karanîna VBA bi bandor ji bo rêzikan jêbirin. Hêvî dikim ku hûn ê wê kêrhatî bibînin. Ger pêşniyar û pirsên we hebin, di beşa şîroveyê de parve bikin.
Navê pelê xebatê, û Rêz(7) dê hejmara rêzê hilbijêre..EntireRow.Delete dê hemû rêza 7 jêbibe.
➤Pel F5
Encam :
Bi vî awayî, hûn ê rêza ku <1 tê de ye jêbikin>Berhem Navê Shoe 1 .
Zêdetir Bixwîne: Çawa Rêzên li Excel Jê Bike: 7 Rêbaz
Rêbaz-2: Pir Rêzan Bi Bikaranîna VBAyê Jê Bikin
Heke hûn dixwazin çend rêzên mîna rêzên ku Berhem navên Shoe1
Gav-01 :
➤ Bişopînin Gava-01 ji Rêbaz-1
3739
Li vir, jimareyên rêzên 13, 10 , û 7 dê bên jêbirin û di nivîsandina rêzê de jimareyên rêzê divê hûn ji jimareya rêza paşîn heya jimareya rêza yekem mîna vê kodê binivîsin.
Wek din, piştî jêbirina rêza yekem mîna Rêza 7, ya mayî rêzên li binê vê rêzê dê rêzek ber bi jor ve biçin û bi vî rengî Rêza 10 dê bibe Rêza 9, û Rêza 13 dê bibe Rêza 12. Ji bo vê yekê ji nû ve ason, hûn ê nikaribin rêzên rast jêbikin.
➤Partî F5
Encam :
Piştre, hûn ê rêzikên ku navên Berhem hene Shoe 1 , Shoe2, û Shoe3 jêbikin.
Zêdetir Bixwîne: Meriv Çawa Gelek Rêzan di Excel de Jê Bike (3 Rêbaz)
Rêbaz-3 : Bi Hilbijartina Rêzekê jêbirin
Li vir, ez ê riya jêbirina rêzekê nîşan bidimji bo şaneyek çalak a wê rêzê.
Gava-01 :
➤Bişopînin Gava-01 ji Rêbaz-1
9434
Ew ê rêza ku şaneyek çalak heye jê bibe.
➤Kodê hilîne.
Gav-02 :
➤Hûna şaneya rêza ku hûn dixwazin jêbikin hilbijêrin ( Li vir min şaneya B7 hilbijartiye)
➤ Biçe Pêşdebir Tab>> Makro Vebijêrk
Piştî wê, Makro Sêrbaz dê vebe.
➤ Navê makroyê dltrow3 hilbijêre û Run
<3 bike>
Encam :
Piştre, hûn ê rêza ku tê de Berhem navê Shoe 1 jêbirin.
Rêbaz-4: Jêbirina Hemî Rêzên Di Hilbijartinê de
Ji bo jêbirina hemî rêzên hilbijarkî hûn dikarin vê rêbazê bişopînin.
Gava-01 :
➤Bişopînin Gava-01 ji Rêbaz-1
4068
Ew dê hemî rêzên hilbijartî jêbibe.
➤Kodê hilîne.
Gavê-02 :
➤Rêzika rêzên ku hûn dixwazin jêbirin hilbijêrin (Li vir, min rêza B7:D9 hilbijart)
➤Biçe Pêşdebir Tab>> Makro Vebijêrk
Piştî wê, Makro Sêrbaz dê vebe.
➤ Navê makroyê hilbijêre dltrow4 û pêl Rûn bike
Encam :
Piştre, hûn ê rêzên ku tê de hene jêbikin. Hilber navên Pêlav 1 , Çaket1, û Jacket2 .
Zêdetir Bixwîne: Meriv çawa Rêzên Hilbijartî di Excel de Jê Bike (8 Nêzîktêdayîn)
Rêbaz-5: Jêbirina Rêzekê Ger Hucreyek Vala be
Li vir, şaneyek min a vala heye ku B9 (min ji bo vê nirxê ji vê şaneyê derxist rêbaz), û bi kodek VBA ez ê rêza ku B9 hucre heye jêbikim.
Gavê-01 :
➤Bişopînin Gava-01 ji Rêbaz-1
7151
Ew ê hemû rêzikên di navberê de <1 jêbibe>"B5:D13" hucreyek vala heye.
➤Pel bike F5
Encam > Meriv çawa Rêzên Vala li Excel Rake (Rêbazên 11)
Rêbaz-6: Jêbirina Rêzekê Ger Tevahiya Rêzê Vala be
Li vir, şaneyek min a vala heye ku <1 e>B9 (Min nirx ji bo vê rêbazê rakirin), û rêzek vala ku Rêza 12 ye (min nirxên vê rêbazê rakirin), û kodek VBA û <1 bikar tîne>Fonksiyon COUNTA Ez ê rêza ku vala ye jêbikim.
Gavê-01 :
➤Bişopînin Gavê-01 ji Rêbaz-1
3739
"B5:D13" rêza daneyê ye û FOR loop dê ji bo her şaneyek li ev rêze.
CountA(cell.EntireRow) hejmara şaneyên ne vala vedigere û dema ku bibe 0 wê demê rêz dê jê bibe.
➤Partî F5
Encam :
Piştî wê, hûn ê karibin rêza vala jêbikin lê ew ê ti rêzek ku hemî rêzik tune ne jêbibe. şaneyên vê rêzê vala ne.
Zêdetir Bixwîne: Meriv çawa VBA-yê bikar tîne ku rêzên vala di Excel de jê bibe
Rêbaz-7: Jêbirina Her rêza n-emîn
Hûn dikarin her rêza n-emîn (di vê rewşê de her rêza sêyemîn) bi vê rêbazê jêbirin.
Gav-01 :
➤ Bişopînin Gava-01 ji Rêbaz-1
7693
“B5 :D13” rêza daneyê ye û rc dê hejmara rêza giştî ya vê rêzê ku 9 e vegerîne.
Li vir, FOR loop dê ji rêza dawîn dest pê bike ku di vê rewşê de rc an 9 ye û bi rêza yekem diqede.
Gavek -3 dê ji bo jêbirina her rêzika 3yemîn di vê rêzê de bibe alîkar.
➤Pel F5
Encam :
Piştre, hûn ê rêzên ku navên Berhem hene Shoe 1 , Shoe2, û <8 jêbikin>Shoe3 .
Zêdetir Bixwîne: Her nth R çawa jê bibe ow di Excel de (6 Rêyên herî hêsan)
Xwendinên Bi vî rengî:
- Meriv çawa Rêzên Hilbijartî bi Excel VBA re Jê Bike (Gavek- Rêbernameya bi-gav)
- Rêzên Nebikaranîn li Excel Jê Bikin (8 Rêbazên Hêsan)
- Rêzên Veşartî çawa li Excel Jê Bikin (3 Rêbaz)
- Rêzên Bêdawî li Excel Jê Bikin (5 Rêbazên Hêsan)
- Meriv çawa Rêzên li Excel-ê Ku Her Dem Diçe Jê Bike (4 HêsanRêbaz)
Rêbaz-8: Jêbirina Rêzê Li gorî Nirxa Hucreyê
Di vê rêbazê de, ez ê rêza xwedî nirxek taybetî jêbikim Kirasê 2 .
Gavê-01 :
➤ Bişopînin Gavê-01 ji Rêbaz- 1
6834
“B5:D13” navbera daneyê ye û FOR loop dê ji bo her şaneyek di vê rêzê de bixebite.
Heke şaneyek rêzekê nirxa "Kirasê 2" hebe wê demê rêz dê were jêbirin.
➤Pel F5
Encam :
Bi vî awayî hûn ê rêza ku tê de Berhem navê Kirasê 2 heye jêbikin.
Zêdetir Bixwîne: VBA Macro ji bo Jêbirina Rêzê heke Hucre Di Excel de Nirx Bihewîne (2 Rêbaz)
Rêbaz-9: Jêbirina Rêzên Duber
Li vir, du rêzên min hene Koda Berhemê 97375 hene û ji ber vê yekê ez dixwazim yek ji van rêzên ku bi nîşankirî ne jêbikim. qutiyeke sor li jêr.
Gavê-01 :
➤ Bişopînin Gava-01 ji Rêbaz-1
8582
Li vir, “B5:D13” nîjera daneyê ye û Stûn:=1 ez ango ew ê tenê di stûnekê de ku stûna destpêkê ye li nirxên dubare bigere Stûna B lê heke hûn bixwazin di stûnên din de jî bigerin hûn dikarin vê hejmarê li gorî hewcedariyên xwe bikar bînin.
➤Pel F5
Encam :
Piştre, hûn ê karibin rêza ku jêbirin jêbirin. dişibe rêzek din.
Zêdetir Bixwîne: Rêzên Ducarî çawa di nav de Jê BikinExcel bi VBA (8 Awayên Bibandor)
Rêbaz-10: Jêbirina Rêzan di Tabloyekê de
Bifikirin, tabloya li jêr heye ku navê wê Table1 û niha hûn dixwazin rêza jimare 6 ê vê tabloyê jêbikin. Ji bo vê yekê hûn dikarin vê rêbazê bişopînin.
Gavê-01 :
➤ Bişopînin Gava-01 ji Rêbaz-1
9869
Li vir, "Table" navê pelê ye, "Table1" navê tabloyê ye û 6 hejmara rêza vê tabloyê ye ku tu dixwazî jê bibî.
➤Pel bike F5
Encam :
Bi vî awayî hûn ê rêza xweya vê tabloyê jêbirin.
Zêdetir Bixwînin: Meriv çawa Rêzên Ducarî Li Ser Bingehînek Stûnek Bi Bikaranîna Excel VBA Rabike
Rêbaz-11: Rakirina Rêzên Dîtbar Piştî Parzûnkirinê
Li vir, tabloyek daneya min heye ku ji hêla tê parzûn kirin stûna Biha ji bo nirxên ji $1,500.00 zêdetir û ez dixwazim piştî parzûnkirinê hemû rêzên xuyayî jêbikim.
Gava-01 :
➤ Bişopînin Gava-01 ya Rêbaz-1
3368
Li vir, “B5: D13” rêza daneyê ye.
➤Pel F5
Niha, hemî rêzên xuyayî piştî parzûnkirinê dê bên jêbirin. Naha hûn dikarin rêzên veşartî vegerînin bi bijartina nîşana Parzûn di stûna Biha de.
➤Li ser bikirtînin Hemû Hilbijêre Vebijêrk
➤Partî OK
Encam :
Di dawiyê de, hûn ê rêzên veşartî vegerin hundurtabloya daneyan.
Zêdetir Bixwîne: Meriv çawa bi VBA di Excel de Rêzan Parzîne û Jê Bike (2 Rêbaz)
Rêbaz-12: Jêbirina Rêzê li ser bingeha Xaneya Çalak a Dawî
Li vir, şaneya min a dawîn a çalak şaneya B13 e û ez dixwazim vê şaneya çalak a dawîn a jêrîn jêbikim. tabloya daneyan.
Gavê-01 :
➤ Bişopînin Gava-01 ji Rêbazê -1
5164
Li vir, 2 tê wateya Stûna B ku li ser şaneya min a çalak heye, tu dikarî li gorî hewcedariyên xwe jimareyê biguherînî.
➤Pel F5
Encam :
Bi vî awayî, hûn ê xwe jêbikin. rêza çalak a dawîn.
Zêdetir Bixwîne: Koda VBA ya Excel ji bo Jêbirina Rêzan Li ser Bingeha Pir Nirxa Hucreyê (3 Krîteran)
Rêbaz-13: Jêbirina Rêzên ku rêzikên wan hene
Bihesibînin, hûn dixwazin rêzên ku rêzikên wan hene jêbikin û ji bo vê yekê hûn dikarin vê rêbazê bişopînin.
Gava-01 :
➤ Bişopînin Gava-01 ji Rêbaz-1
8388
Li vir, "string" navê pelê ye, hejmara rêza yekem a vê rêza daneyê 5 e û hejmara stûna destpêkê 2
Gotina With dihêle hûn hêmanekê diyar bikin. an jî ji hêla bikarhêner ve ji bo tevahî rêze daxuyaniyan carekê binivîsin.
Li ser Çewtiyê Resume Next Daxuyaniya diyar dike ku gava xeletiyek dema xebitandinê çêbibe, kontrol diçe daxuyaniya li dû daxuyaniya ku tê de xeletî çêdibe.
Rewşa Dawî û Stûna Dawî Rêz û stûna paşîn a rêza daneyan vedigerînin.
SpecialCells(xlCellTypeConstants, xlTextValues) dê rêzikên ku di nav rêzên nivîsê de xwedî nirxên nivîsê ne hilbijêrin range.
➤Partî F5
Encam :
Piştre, hûn ê rêzên ku her rêzika nivîsê heye jêbikin.
Zêdetir Bixwîne: Kurtebirra Excel ji bo Jêbirina Rêzan (Bi Teknîkên Bonusê)
Rêbaz-14: Jêbirina Rêzê Li gorî Dîrokan
Li vir, ez ê rêzên xwedî tarîxek taybetî 11/12/2021 (mm/dd/yyyy) di vê de jêbikim rêbaza bi kar Fonksiyon DATEVALUE .
Gavê-01 :
➤ Bişopînin Gavê- 01 ji Rêbaz-1
1766
Li vir, "Dîrok" navê pelê ye, hejmara rêza yekem a vê rêza daneyê e. 5 û stûna krîteran (ku stûna wan tarîx hene) hejmara 3 e.
Daxuyaniya With destûrê dide te ku hûn tiştekî an tîpek ji hêla bikarhêner ve hatî diyar kirin carekê diyar bikin. ji bo tevaya rêze daxuyaniyan.
Li ser Çewtiya Paşê Ji nû ve Daxuyaniyê diyar dike ku, dema ku xeletiyek dema xebitandinê çêbibe, kontrol diçe daxuyaniya li dû daxuyaniya ku lê xeletî çêdibe.
Rojiya Dawî rêza dawî ya rêza daneyê vedigerîne û li vir, FOR xeleka wê ji rêza dawîn dest pê bike ku di vê rewşê de Rêza Dawî an 6 e û bi rêza yekem diqede.
DATEVALUE Dê dîroka nivîsê veguherîne nirxê.
Li vir, Yekîtî dê vegere
