Contents
Waxaan hore u qoray oo ku saabsan sida aad si dhakhso ah ugu dhejin karto qoraalka dhowr unug oo aad, cagsigeeda, u kala qaybin karto xardhigga qoraalka dheer qaybaha. Hadda aynu eegno hawl dhow, laakiin hawl yar ka adag – sida loogu dhejiyo qoraalka unugyo badan marka xaalad cayiman la buuxiyo.
Aynu nidhaahno waxaan haynaa kaydka macluumaadka macaamiisha, halkaas oo hal magac oo shirkad ah uu u dhigmi karo dhowr emails oo kala duwan oo shaqaalaheeda ah. Hawsheenu waa in aan ku ururinno dhammaan ciwaannada magacyo shirkadeed oo aan isku xidhno (oo ay kala soocaan hakadyo ama hal-koolo) si aan u samayno, tusaale ahaan, liiska boostada ee macaamiisha, tusaale ahaan in aan helno wax la mid ah:
Si kale haddii loo dhigo, waxaan u baahanahay qalab ku dhejin doona (isku xirka) qoraalka si waafaqsan xaaladda - analoogga shaqada SUMMESLI (SUMIF), laakiin qoraal ahaan.
Habka 0. Formula
Ma aha mid aad u qurux badan, laakiin habka ugu fudud. Waxaad qori kartaa qaacido fudud oo hubin doona in shirkadda safka xigta ay ka duwan tahay tii hore. Haddii aysan ka duwanayn, dabadeed ku dheji ciwaanka ku xiga oo ay kala soocaan joodar. Haddii ay ka duwan tahay, markaa waxaan "dib u dejineynaa" ururinta, dib u bilawga mar labaad:
Khasaaraha habkani waa cad yahay: laga bilaabo dhammaan unugyada tiirka dheeraadka ah ee la helay, waxaan u baahanahay kaliya kuwa ugu dambeeya ee shirkad kasta (jaalle). Haddii liisku weyn yahay, markaa si aad si dhakhso ah u doorato, waa inaad ku darto tiir kale adoo isticmaalaya shaqada DLSTR (LEN), hubinta dhererka xadhkaha urursan:
Hadda waxaad sifayn kartaa kuwa oo koobi kartaa ciwaanka loo baahan yahay si aad u isticmaasho.
Habka 1. Makrofunction of gluing by hal xaalad
Haddii liiska asalka ah aan la kala saarin shirkad, markaa qaacidada fudud ee kor ku xusan ma shaqeynayso, laakiin waxaad si fudud u heli kartaa shaqo yar oo caado ah oo VBA ah. Fur Tifaftiraha Aasaasiga ah ee Visual Adoo riixaya furaha kiiboodhka Alt + F11 ama adigoo isticmaalaya badhanka Visual Basic tab sameeysa (horumariye). Daaqadda furmo, geli module cusub oo madhan menu-ka Geli - Module oo nuqul ka samee qoraalka shaqadayada halkaas:
Function MirgeIf(TextRange As Range, SearchRange As Range, Condition As String) Dim Delimeter As String, i As Long Delimeter = ", " gluings are not equal to each other - we out with an error if SearchRange.Count <> TextRange.Count Markaa MergeIf = CVERr(xlErrRef) Dhammaadka Hawsha Ka Bixinta Haddii 'aad u dhex marto dhammaan unugyada, hubi xaaladda oo ku soo ururi qoraalka doorsoome OutText For i = 1 Si aad u raadiso Range. Unugyada. Tiri Haddii ay Raadin Range shaqayn
Haddii aad hadda ku soo noqoto Microsoft Excel, ka dib liiska hawlaha (button fx ee bar ama tab formula Foomamka - Geli Shaqada) waxa suurto gal ah in la helo shaqadeena Isku dar Haddi qaybta Qeexitaanka Isticmaalaha (Isticmaalku Qeexay). Doodaha shaqadu waa sida soo socota:
Habka 2. Ku dheji qoraalka xaalad aan sax ahayn
Haddii aan bedelno jilaha ugu horreeya ee xariiqda 13aad ee makro = ku dhawaad hawlwadeenka ciyaarta Like, ka dib waxaa suurtagal noqon doonta in lagu sameeyo isku dhejinta iyada oo la raacayo xogta bilowga ah oo aan sax ahayn oo leh shuruudaha xulashada. Tusaale ahaan, haddii magaca shirkadda lagu qori karo noocyo kala duwan, markaa waxaan ku hubin karnaa oo ku soo ururin karnaa dhammaantood hal shaqo:
Kaadhadhka duurjoogta ah ee caadiga ah waa la taageeray:
- calaamad (*) - waxay tilmaamaysaa tiro kasta oo xaraf ah (oo ay ku jirto maqnaanshahooda)
- calaamad su'aal (?) - waxay u taagan tahay dabeecad kasta
- calaamada rodol (#) - waxay u taagan tahay hal lambar (0-9)
Sida caadiga ah, hawlwadeenka Like waa kiis xasaasi ah, tusaale ahaan, wuxuu fahamsan yahay, tusaale ahaan, "Orion" iyo "orion" sida shirkado kala duwan. Si loo iska indhatiro kiiska, waxaad ku dari kartaa laynka bilowga moduleka ee tafatiraha Visual Basic Ikhtiyaarka Is barbar dhig qoraalka, kaas oo u beddeli doona Like si uu u noqdo kiis dareen la'aan ah.
Sidan, waxaad samayn kartaa waji-xidho aad u adag oo lagu hubinayo xaaladaha, tusaale ahaan:
- ?1##??777RUS - xulashada dhammaan taarikada gobolka 777, laga bilaabo 1
- LLC* - dhammaan shirkadaha magacoodu ka bilaabmo LLC
- ##7## - Dhammaan alaabooyinka leh koodka dhijitaalka ah ee shan-god, halkaas oo lambarka saddexaad uu yahay 7
- ????? – dhammaan magacyada shan xaraf, iwm.
Habka 3. Shaqada makro ee ku dhejinta qoraalka laba shuruudood
Shaqada waxaa laga yaabaa inay dhibaato ka dhacdo marka aad u baahan tahay inaad ku xirto qoraalka wax ka badan hal shuruud. Tusaale ahaan, aan qiyaasno in miiskayagii hore, hal tiir oo kale oo magaalada lagu daray, iyo dhejinta waa in lagu sameeyaa ma aha oo kaliya shirkad la siiyay, laakiin sidoo kale magaalo gaar ah. Xaaladdan oo kale, shaqadeena waa in la casriyeeyaa iyadoo lagu darayo hubin kala duwan:
Isku-darka Shaqada (TextRange Sida Range, SearchRange1 Sida Range, Condition1 As String, SearchRange2 Sida Range, Condition2 As String) Dim Delimeter As String, i As Long Delimeter = ","" jilayaasha xadeeya (waxaa lagu bedeli karaa meel bannaan ama, iwm.) e.) 'Haddii kala duwanaanta ansaxinta iyo isku dhejinta aysan sinnayn midba midka kale, ka bax adigoo qalad ah Haddii SearchRange1.Count <> TextRange.Count Or SearchRange2.Count <> TextRange.Count Markaas MergeIfs = CVERr(xlErrRef) Shaqada ka bixida dhammaatay haddi U gudub unugyada oo dhan, hubi dhammaan shuruudaha oo ku ururi qoraalka doorsoome OutText For i = 1 To SearchRange1.Cells.Count If SearchRange1.Cells(i) = Condition1 And SearchRange2.Cells(i) = Condition2 Markaas OutText = OutText & TextRange.Cells(i) & Xadaynta Dhammaadka Haddi ku Xiga waxaan 'muujiyaa natiijooyinka iyada oo aan lahayn xadaynta ugu dambaysa MergeIfs = Bidix( OutText, Len (OutText) - Len (Delimeter)
Waxaa loo dabaqi doonaa si la mid ah - kaliya doodaha hadda waxay u baahan yihiin in wax badan la sheego:
Habka 4. Kooxaynta iyo ku dhejinta Query Query
Waxaad xallin kartaa dhibaatada adigoon barnaamijka ku sameynin VBA, haddii aad isticmaasho ku-darka Query Query ee bilaashka ah. Waayo, Excel 2010-2013 halkan waa la soo dejisan karaa, iyo in Excel 2016 waxaa mar hore loo dhisay si default. Taxanaha falku wuxuu noqonayaa sidan soo socota:
Query Query ma garanayo sida loogu shaqeeyo miisaska caadiga ah, markaa talaabada ugu horeysa waa in aan miiskayaga u rogno mid "smart". Si tan loo sameeyo, dooro oo riix isku dhafka Ctrl+T ama ka dooro tab Guriga – Qaab miis ahaan (Guriga - Qaabka Shaxda). On tab in markaas ka muuqan Constructor (Naqshad) waxaad dejin kartaa magaca miiska (waxaan ka tagay heerka Shaxda 1):
Hadda aan ku shubno miiskayaga ku-darka Query Query. Si tan loo sameeyo, tabka Data (haddii aad haysato Excel 2016) ama tabka Query Query (haddii aad haysato Excel 2010-2013) guji Laga soo bilaabo miiska (Xogta - Laga soo bilaabo Shaxda):
Daaqadda tifaftiraha weydiimaha ee furmay, dooro tiirka adigoo gujinaya madaxa Sharikadda oo taabo badhanka kore Group (Koox By). Geli magaca tiirka cusub iyo nooca hawlgalka ee kooxaynta - Dhammaan khadadka (Dhammaan safafka):
Guji OK oo waxaanu helnaa miis-yar oo qiimayaal kooxaysan ah shirkad kasta. Waxyaabaha ku jira miisaska ayaa si cad u muuqda haddii aad bidix-gujiso asalka cad ee unugyada (maaha qoraalka!) ee tiirka natiijada:
Hadda aan ku darno hal tiir oo kale, halkaas oo, annagoo adeegsanayna shaqada, aan ku dhejinno waxa ku jira tiirarka ciwaanka ee mid kasta oo ka mid ah miisaska yaryar, oo ay u kala qaybsan yihiin hakad. Si tan loo sameeyo, tabka Kudar sadar waanu riixnaa Tiirka gaarka ah (Ku dar tiir - tiirka gaarka ah) oo daaqada soo muuqata, geli magaca tiirka cusub iyo qaacidada isku xidhka ee luuqadda M ee loo dhisay Query Query:
Ogsoonow in dhammaan M-functions ay yihiin kiis xasaasi ah (ka duwan Excel). Kadib gujinta OK Waxaan helnaa tiir cusub oo leh ciwaanno dhejis ah:
Way hadhaysaa in meesha laga saaro tiirka aan loo baahnayn Cinwaanka Miiska (midig ku dhufo ciwaanka) Tirtir tiirka) oo natiijooyinka ku dheji xaashida adigoo gujinaya tab Guriga - Xidh oo soo deji (Guriga - Xidh oo rara):
Nuance muhiim ahSi ka duwan hababka hore (shaqooyinka), miisaska Query Query si toos ah looma cusbooneysiiyo. Haddii mustaqbalka ay jiri doonaan wax isbeddel ah oo ku yimaada xogta isha, markaa waxaad u baahan doontaa inaad midig-guji meel kasta oo ka mid ah shaxda natiijooyinka oo dooro amarka Cusbooneysii & Keydi (Cusbooneysii).
- Sida loo kala qaybiyo xadhig qoraal dheer oo qaybo ah
- Dhowr siyaabood oo loogu dhejiyo qoraalka unugyo kala duwan hal
- Isticmaalka hawlwadeenka Like si aad qoraalka uga tijaabiso maaskaro