Jedwali la yaliyomo
Utekelezaji VBA ndiyo njia bora zaidi, ya haraka na salama zaidi ya kutekeleza operesheni yoyote katika Excel. Katika makala haya, tutakuonyesha jinsi ya kupata mifuatano fulani katika mfuatano mwingine uliotolewa kwa kutumia VBA katika Excel.
Pakua Kiolezo cha Mazoezi
Wewe inaweza kupakua kiolezo cha mazoezi ya bila malipo cha Excel kutoka hapa.
VBA ili Kupata katika String.xlsm
InStr Function
Microsoft Excel ina chaguo la kukokotoa lililojengewa ndani linaloitwa The InStr Function ili kupata nafasi ya mifuatano mahususi katika Mfuatano fulani.
Sintaksia ya Jumla:
InStr([start], string1, string2, [compare])
Hapa,
Hoja | Inahitajika/ Hiari | Ufafanuzi |
---|---|---|
anza | Hiari | Nafasi ya kuanzia ya utafutaji.
|
string1 | Inahitajika | Mfuatano wa kutafuta, Mfuatano Msingi. |
string2 | Inahitajika | Mstari wa kutafuta katika mfuatano wa msingi. . |
linganisha | Hiari | Kitendaji cha InStr ni nyeti kwa kadiri kwa chaguomsingi. Lakini ikiwa unataka kutekeleza kesi isiyojali InStr , basi unaweza kupitisha hoja hapa ili kufanya ulinganisho fulani. Hoja hii inaweza kuwa ifuatayomaadili,
Kwa chaguo-msingi, InStr inachukua vbBinaryCompare kama hoja ya kulinganisha. |
8 Mifano Rahisi Kupata Nafasi Maalumu ya Mfuatano Katika Mfuatano Uliotolewa Kwa Kutumia VBA
Hebu tuone mifano rahisi ili kupata nafasi za mifuatano fulani katika mfuatano fulani kwa kutumia. VBA .
1. VBA ili Kupata Nafasi ya Maandishi katika Mfuatano
Hapa chini ni mfano wa InStr kupata nafasi ya maandishi katika mfuatano.
- Bonyeza Alt + F11 kwenye kibodi yako au nenda kwenye kichupo Msanidi programu -> Visual Basic ili kufungua Visual Basic Editor .
- Katika dirisha ibukizi la msimbo, kutoka kwa upau wa menyu , bofya Ingiza -> Moduli .
- Sasa kwenye kidirisha cha msimbo, andika InStr programu rahisi ndani ya VBA Sub Utaratibu (tazama hapa chini).
1910
Msimbo wako sasa uko tayari kutumika.
- Bonyeza F5 kwenye kibodi yako au kutoka kwa upau wa menyu chagua Run -> Endesha Fomu Ndogo/Mtumiaji . Unaweza pia kubofya ikoni ndogo ya Cheza katika upau wa menyu ndogo ili kuendesha jumla.
Utaona kwamba kisanduku cha ujumbe ibukizi kitakupa nambarikutangaza nafasi ya maandishi ambayo ulitaka kuangalia.
Maelezo:
Mstari wetu msingi, “ Furaha ni chaguo ” ni sentensi ya herufi 21 (yenye nafasi) na tulitaka kupata nafasi ya maandishi “ chaguo ” katika mfuatano huo. Maandishi “ chaguo ” yalianza kutoka nafasi ya 16 ya mfuatano wa msingi, kwa hivyo tulipata nambari 16 kama pato letu katika kisanduku cha ujumbe.
2. VBA ili Kupata Maandishi kutoka kwa Nafasi Maalum katika Mfuatano
Sasa hebu tujue nini kingetokea ikiwa tungetaka kupata nafasi kutoka kwa nambari fulani.
- Kwa njia sawa na kabla, fungua Visual Basic Editor kutoka kwa Msanidi kichupo na Ingiza Moduli kwenye dirisha la msimbo.
- Ndani dirisha la msimbo, andika programu rahisi ya InStr iliyoonyeshwa hapo juu na upitishe thamani katika hoja ya kuanza kulingana na nafasi unayotaka kuhesabu maandishi yako.
4706
- Inayofuata, Endesha msimbo.
Utaona kwamba kisanduku cha ujumbe ibukizi kitatokea. kukupa nambari inayotangaza nafasi ya maandishi kuanzia nafasi fulani ambayo ulitaka kuangalia.
Maelezo:
Kama tulivyokwishajua (kutoka kwenye mjadala wa awamu ya 1) kwamba maandishi “ chaguo ” yalianza kutoka nafasi ya 16 , kwa hivyo tukaingiza mbili “ chaguo ” katika mfuatano wa msingi na uweke 17 kama yetuKigezo cha 1 ili kuruka “ chaguo ” la kwanza. Kwa hivyo, sisi Run jumla ya hapo juu na ilituonyesha nambari ya nafasi 27 ambayo ndiyo nambari ya nafasi ya pili “ chaguo ” katika mfuatano uliotolewa.
3. VBA ya Kupata Maandishi yenye Kitendaji kisichojali Kesi katika Mfuatano
Kutoka kwa utangulizi wa kitendakazi cha InStr tayari unajua kwamba kwa chaguo-msingi, kitendakazi cha InStr ni nyeti kwa kesi. Hebu tujue hilo kwa mfano.
Angalia VBA msimbo ufuatao, ambapo tulitaka kupata nafasi ya neno “ Choice ” yenye mji mkuu “C” katika mfuatano “ Furaha ni chaguo ” ambapo chaguo limeandikwa kwa “c” ndogo .
- Endesha msimbo na upate 0 kama pato letu.
Hiyo ni kwa sababu InStr chaguo za kukokotoa hushughulikia mji mkuu “C” na ndogo “c” tofauti. Kwa hivyo ilitafuta neno “ Chaguo ” kwenye mfuatano na haikupata ulinganifu wowote, kwa hivyo ikarudisha 0 .
- Ili kufanya kitendakazi cha InStr kisisikie-kesi , weka hoja ya kulinganisha kuwa vbTextCompare (tazama hapa chini).
5302
35>
- Endesha msimbo.
Utapata nafasi ya maandishi kutoka kwa mfuatano, iwe maandishi yameandikwa kwa herufi kubwa au herufi ndogo .
4. VBA ili Kupata Maandishi kutoka kwa Kulia kwa Mfuatano
Mpaka sasa InStr kazi ilikuwa ikitupa tu nafasi kutoka upande wa kushoto wa mfuatano. Lakini vipi ikiwa ungependa kupata nafasi ya maandishi kutoka upande wa kulia wa mfuatano.
The InStrRev Function hutafuta kutoka kulia. InStrRev chaguo za kukokotoa hufanya kazi sawa na InStr chaguo za kukokotoa na itakupata nafasi ya maandishi kutoka upande wa kulia wa mfuatano.
Angalia mifano ifuatayo ili kuelewa tofauti.
- Ikiwa tutatumia msimbo ufuatao kwa kutumia kitendakazi cha InStr basi,
inatupa nafasi ( 16 ) ya maandishi ya kwanza “ chaguo ”.
- Lakini tukiendesha msimbo sawa na InStrRev Kazi basi,
inatupa nafasi ( 27 ) ya maandishi ya mwisho “ chaguo ”.
Masomo Sawa:
- Pata Inayofuata Kwa Kutumia VBA katika Excel (Mifano 2)
- Jinsi ya Kupata na Kubadilisha Kwa Kutumia VBA (Njia 11)
- Tafuta Inayolingana Halisi Kwa Kutumia VBA katika Excel (Njia 5)
5. VBA ili Kupata Nafasi ya Mhusika katika Mfuatano
Unaweza pia kupata nafasi ya herufi fulani katika mfuatano kwa njia ile ile uliyopata maandishi.
- Nakili kufuata msimbo kwenye VBA dirisha lako la msimbo
9805
- Na Endesha jumla.
Ya kwanza “ e ” katika mfuatano wetu uliotolewa iko saanambari 7 nafasi.
6. VBA ili Kupata Mfuatano mdogo katika Mfuatano
Hapa tutajifunza jinsi ya kupata ikiwa mfuatano una mfuatano mdogo au la.
Ili kupata hiyo, tunayo. ili kutekeleza Taarifa ya IF katika msimbo wetu.
- Sawa na hapo awali, fungua Kihariri cha Msingi cha Kuonekana kutoka kwa kichupo cha Msanidi na Ingiza Moduli kwenye dirisha la msimbo.
- Katika dirisha la msimbo, nakili msimbo ufuatao na ubandike.
7105
Yako msimbo sasa uko tayari kutumika.
- Endesha jumla.
Furaha ni chaguo” una neno “ chaguo ” au sivyo. Inavyoendelea, tunapata matokeo ya Mechi iliyopatikana.
7. VBA ili Kupata Kamba katika Msururu wa Seli
Unaweza kutafuta maandishi fulani katika safu ya kisanduku na kurudisha mfuatano fulani.
Angalia mfano ufuatao ambapo tutafanya hivyo. pata “ Dr. ” na kukiwa na mechi itarudi “ Doctor ”.
- Ifuatayo ni msimbo ili kupata matokeo yaliyojadiliwa hapo juu,
9897
- Endesha msimbo na matokeo yameonyeshwa hapa chini
- Unaweza kurekebisha jumla kulingana na hitaji lako. Kwa mfano, ikiwa unatakaili kupata “ Prof. ” katika kisanduku chochote cha mfuatano, na upate “ Profesa ” kama urejeshaji, kisha upitishe kwa urahisi “ Prof. ” kama thamani badala ya “ Dr .” katika mstari wa 4 wa jumla na “ Profesa ” badala ya “ Daktari ” katika mstari wa 5 wa jumla na kufafanua nambari ya safu ya seli ipasavyo.
8. VBA ili Kupata Kamba kwenye Seli
Unaweza pia kutafuta maandishi fulani katika kisanduku kimoja cha mfuatano na kurudisha mfuatano fulani.
- Nakili msimbo ufuatao na ubandike kwenye dirisha la msimbo.
8552
Itatafuta “ Dr. ” katika Cell B5 na ikipata inayolingana basi inarudisha “ Doctor ” katika Cell C5 .
- Unaweza kurekebisha jumla kulingana na hitaji lako. Kwa mfano, ikiwa ungependa kupata “ Prof. ” katika kisanduku chochote cha mfuatano, na upate “ Profesa ” kama kurejesha, kisha upitishe kwa urahisi “ Prof. ” kama thamani badala ya “ Dr .” katika mstari wa 2 wa jumla na “ Profesa ” badala ya “ Daktari ” katika mstari wa 3 wa jumla na kufafanua nambari ya kumbukumbu ya seli ipasavyo.
Hitimisho
Makala haya yalikuonyesha jinsi ya kupata maandishi fulani katika mfuatano wa Excel kwa kutumia VBA macro. Natumai makala hii imekuwa ya manufaa sana kwako. Jisikie huru kuuliza maswali yoyote kuhusumada.