Jinsi ya kupata Kamba na VBA katika Excel (Mifano 8)

  • Shiriki Hii
Hugh West

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.
  • Kwa chaguo-msingi, chaguo-msingi za InStr hukokotoa nafasi ya herufi kwa kuhesabu kutoka 1, si kutoka kwa nafasi ya kuanzia. Kwa hivyo, unaweza kuacha hili wazi ukitaka.
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,
  • vbBinaryCompare -> hufanya ulinganisho wa binary, thamani ya kurudi 0
  • vbTextCompare -> hufanya ulinganisho wa maandishi, thamani ya kurudi 1
  • vbDatabaseCompare -> hufanya ulinganisho wa hifadhidata, thamani ya kurejesha 2

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.

Hugh West ni mkufunzi na mchambuzi mwenye uzoefu wa juu wa Excel na uzoefu wa zaidi ya miaka 10 katika tasnia. Ana Shahada ya Kwanza katika Uhasibu na Fedha na Shahada ya Uzamili katika Utawala wa Biashara. Hugh ana shauku ya kufundisha na ameanzisha mbinu ya kipekee ya kufundisha ambayo ni rahisi kufuata na kuelewa. Ujuzi wake wa kitaalam wa Excel umesaidia maelfu ya wanafunzi na wataalamu ulimwenguni kote kuboresha ujuzi wao na kufaulu katika taaluma zao. Kupitia blogu yake, Hugh hushiriki ujuzi wake na ulimwengu, akitoa mafunzo ya bila malipo ya Excel na mafunzo ya mtandaoni ili kuwasaidia watu binafsi na biashara kufikia uwezo wao kamili.