Tabloya naverokê
Dema ku di Excel de bi VBA re dixebitin, em pir caran neçar in ku rêz (an) û guhêrbar (yên) di pelgeyek xebatê de bigihînin hev. Di xebatên me de hema hema di hemî sektoran de, ji berhevkirina encamên xwendekaran heya analîzkirina karsaziyek tevlihev dest pê dike; Di vê gotarê de, ez ê nîşanî we bidim ka hûn çawa dikarin rêzik (s) û guhêrbar (yên) di pelgeyek xebatê de bi VBA li Excel-ê bi hev ve girêbidin. Ez ê tiştan bi mînak û nîgarên rast rave bikim.
String (s) û Guherbar (yên) li Excel VBA (Nêrîna Zûtirîn) bi hev ve girêdin
Pirtûka Xebatê ya Praktîkê dakêşin
Vê pirtûka xebatê ya pratîkê dakêşin da ku hûn vê gotarê dixwînin.
String and Variable.xlsm Concatenate
Di Excel VBA de String (s) û Guherbar (yên) bi hev ve girêdin (Analîzkirina Gav bi Gav)
Berî her tiştî, werin em bibînin ka em çawa dikarin stêlan (an) bi hev ve girêdin û guhêrbar (yên) di VBA de gav bi gav.
⧪ Têkilkirina rêza (yên):
Ji bo ku du an jî zêdetir rêzan di <1 1>VBA , hûn dikarin hem nîşana arithmetîk zêde (+) û hem jî nîşana amperand (& ) bikar bînin.
Mînakî, ji bo hevgirtinê têlên "Hêviyên Mezin" û "Çîroka Du Bajaran" bi koma , hûn dikarin bikar bînin:
1500
An jî,
3107
Yek ji kodên jorîn bixebitin. Ew ê hilberîna hevgirtî nîşan bide, Hêviyên Mezin,Çîrokeke Du Bajaran .
⧪ Guherîbar (yên) Têkildar
Heke hemû guherbar nirxên rêzikan hebin, hingê hûn dikarin hem nîşana zêde (+) jimareyî û hem jî nîşana amperand (&) bi kar bînin.
Lê heke nekin, wê hingê hûn dikarin bikar bînin. tenê sembola ampersand (&) ji bo hevgirtinê.
Mînakî, em du guhêrbar hebin, A û B .
A rêzek heye, "Çîrokek Du Bajaran" , û B rêzek din heye, "Çil Rêbazên Evînê" .
Hûn dikarin hem sembola zêde (+) û hem jî amperand (&) ji bo wan bigihînin hev.
6063
An,
9589
Di her du rewşan de, ew ê rêzika hevgirtî vegerînin.
Lê heke A rêzek be ( " Çîrokek Du Bajaran" ) û B jimareyek tekûz be ( 27 ), divê hûn nîşana ampersand (&) bikar bînin da ku bi hev ve girêbidin.
3598
Ew ê hilberîna hevgirtî vegerîne .
Nimûneyên Concat Di Excel VBA de xêz û guherbaran binivîsin (Makro, UDF û Forma Bikarhêner Têde Dihewîne)
Me fêr bû ku di Excel de rêz (an) û guhêrbaran bi VBA ve girêbidin. . Vê carê em ê hin mînakên ku bi VBA ve girêdidin rêza (an) û guhêrbaran (s) vegerînin.
Mînak 1: Pêşxistina makroyek ji bo xêzkirina (an) û bi guhêrbar (yên) di Excel VBA de
Em fêr bûnerêz û guhêrbaran bi VBA ve girêdin. Vê carê em ê Makro pêş bixin da ku rêzik û guhêrbarên gelek stûnan di pelxebatekê de bigihîne hev.
Li vir em komek daneyan bi navên pirtûkan hene, nivîskar , û bihayên hin pirtûkên pirtûkfiroşeke bi navê Martin Bookstore.
Werin em Makro<2 pêş bixin> ji bo ku stûnên 1, 2, û 3 yên berhevoka daneyan B4:D14 di şaneya F4 de bigihînin hev.
Koda VBA dê bibe:
⧭ Koda VBA:
1804
⧭ Derketin :
Vê kodê bixebitîne. Hûn ê stûnên 3 yên ku di rêza F4:F14 de hatine girêdan bistînin.
Zêdetir Bixwînin: Macro to Gelek Stûnan li Excel (bi UDF û BikarhênerForma) bi hev ve girêdin
Mînak 2: Afirandina Fonksîyonek Bikarhêner diyarkirî ji bo Bihevrexistina stûn (an) û guhêrbar (yên) di Excel VBA de
Em fêr bûne ku em Makro pêşve bibin da ku çend stûnên komek daneyê bi hev ve girêbidin. Vê carê em ê Fonksiyonek Bikarhêner-Defined biafirînin ku rêz an guhêrbaran di Excel de bigihîne hev.
Koda tam VBA dê bibe:
⧭ Koda VBA:
4981
⧭ Derketin:
Stûna ku tu dixwazî lê bikî hilbijêrî rabe û vê formulê binivîse:
=ConcatenateValues("She","H. Rider Haggard",", ") Ew ê wekî encam vegere Ew, H. Rider Haggard .
Dîsa, formula binivîse:
=ConcatenateValues(B4:B14,30,", ") [ Formula Array . Ji ber vê yekê ji bîr nekinpêl CTRL + SHIFT + ENTER bike heya ku hûn di Office 365 de nebin.]
Ew ê 30 bi hemî nirxên rêzê ve bicivîne B4:B14 .
Di dawiyê de, têkevin:
=ConcatenateValues(B4:B14,C4:C14,", ") [Dîsa Formula Array . Ji ber vê yekê ji bîr nekin ku pêl CTRL + SHIFT + ENTER bikin heya ku hûn di Office 365 de nebin.]
Ew ê hemî nirxên rêzê B4 bi hev re bigihîne hev: B14 bi yên C4:C14 re.
Zêdetir Bixwînin: Meriv çawa di Excel de (3 Awayên Minasib) Têkilî Bike
Xwendinên bi vî rengî:
- Meriv çawa Nivîsar ji Du an Zêdetir Hucreyan di nav yek hucreyê de di Excel de (5 Rêbaz) Tevhev Dike
- Rêzan di yek hucreyê de li Excel bidin hev
- Hejmaran li Excel (4 Formulên Bilez) bigihînin hev
- Textê li hev bikin di Excel de (8 Awayên Minasib)
- Meriv çawa Apostrophe di Excel-ê de (6 Rêyên Hêsan) Bi hev ve girêdide
Mînak 3: Pêşxistina Bikarhêner Form ji bo Têkelkirina rêz (an) û guhêrbar (yên) di pelgeya Xebatê ya Cûda ya di Excel VBA de
Em fêr bûne ku em Makro û Dasanînek Bikarhêner pêşve bibin. fonksiyon ji bo girêdana rêz û nirxan. Di dawiyê de, em ê UserForm pêşve bibin da ku rêz û nirxan bi cîhê xwestinê yê pelxebata xwestinê ve girêbide.
⧪ Gav 1: Têxistina Forma Bikarhêner
Biçe Têxe > BikarhênerForm vebijêrk di darika amûrê VBA de ji bo têxistina UserForm nû.
⧪ Gav 2: Kaşkirin Amûrên kuBikarhênerForm
A UserForm ya bi navê UserForm1 wê were vekirin, ligel Toolbox bi navê Control .
Mişkê xwe bixin ser qutiya amûrê e û di Forma Bikarhêner de 2 Qutiyên Lîsteyê, 5 Qutiyên Nivîsarê, 7 Nîşan û 1 Bişkokên Ferman bikşînin .
Pêşandanên Etîketan biguherînin wek ku di wêneyê de tê nîşandan.
Bi heman awayî, nîşana CommandButton biguherîne OK .
⧪ Gav 3: Nivîsandina Kodê ji bo TextBox1
Li ser TextBox1 ducar bikirtînin. Pêvajoyek Taybet ya bi navê TextBox1_Change dê vebe. Koda jêrîn li wir binivîse.
5413
⧪ Gav 4: Ji bo TextBox3 Kodê nivîsandin
Bi heman awayî, ducar li ser bikirtînin. TextBox3 . Din Binpêvajoya Taybet ya bi navê TextBox3_Change dê vebe. Koda jêrîn li wir binivîse.
7881
⧪ Gav 5: Ji bo TextBox4 Kodê binivîsin
Herwiha, ducar li ser bikirtînin TextBox3 . Din Binpêvajoya Taybet ya bi navê TextBox3_Change dê vebe. Koda jêrîn li wir binivîse.
3846
⧪ Gav 6: Ji bo ListBox2 Kodê binivîsin
Piştre du caran li ser ListBox2 bikirtînin . Dema ku Pêvajoya Taybetî ya bi navê ListBox2_Click vebe, vê kodê li wir binivîsin.
8378
⧪ Gav 7: Koda Nivîsandinê ji bo CommanButton1
Herwiha, du caran li ser CommandButton1 bikirtînin. Piştî Pêvajoya Taybetî ya bi navê CommandButton1_Change vedibe, koda jêrîn têxe wir.
5629
⧪ Gav 7: Nivîsandina Koda Ji Bo BikarhênerForma Bikarhêner Bixebitîne
Niha gava dawî ye. Module ya nû ji darika amûrê VBA têxe û koda jêrîn têxe.
7070
⧪ Gav 8: Dimeşe UserForm
Your BikarhênerForm niha amade ye ku bikar bîne. Ji bo xebitandina wê, berhevoka daneyê ji pelê xebatê hilbijêrin ( Sernivîs tê de) û Makro bi navê Run_UserForm bimeşînin.
UserForm dê bi hemî vebijarkan bar bike. Navnîşana rêza hilbijartî dê li ser TextBox1 ( B3:D4 li vir) were nîşandan. Ger hûn bixwazin, hûn dikarin wê biguherînin. Rêjeya hilbijartî ya di pelxebatê de dê biguhere.
Stûnên ku hûn dixwazin ji Stûnan berbi Concatê ListBoxê ve girêbidin hilbijêrin. Li vir min Navê Pirtûkê û Biha hilbijart.
Têkevin Veqetandinê . Li vir min comma ( , ) kir.
Navê pelgeya xebatê ya ku hûn dixwazin rêzika hevgirtî ji Concatenated In<2 bibijêrin> listbox. Li vir ez ketim Sheet3 .
(Dema ku hûn pelê hilbijêrin, ew ê were aktîfkirin, her çend ne ya çalak be jî.)
Piştre têxin Cihê Derketinê . Ew referansa hucreyê ya hucreya yekem a rêza hevgirtî ye. Li vir min B3 daniye.
(Wexta ku hûn têkevin Cihê Derketinê , wê qada derhanînê were hilbijartin).
Û di dawiyê de , têkevinnavê Sernavê Derketinê (Seroka Rêzeya Derketinê). Li vir min Rêza hevgirtî daniye.
(Wexta ku hûn Sernavê derketinê bikin, sernavê stûna derketinê dê were danîn.)
Bitikîne OK . Hûn ê li cîhê xwestinê derana xwestinê bistînin.
Zêdetir Bixwînin: Meriv çawa String û Integer bi karanîna VBA-yê ve girêdide
Encam
Ji ber vê yekê ev çend mînak in ku tê de hûn dikarin Excel VBA bikar bînin da ku rêz û guherbaran bi hev ve girêbidin. Hêvîdarim ku mînakan her tişt ji we re zelal kir. Pirsên te hene? Xwe ji me bipirsin. Û ji bîr nekin ku hûn biçin malpera me ExcelWIKI ji bo zêdetir mesaj û nûvekirin.
