જો તમે VBA નો ઉપયોગ કરીને સબસ્ટ્રિંગ શોધવાની કેટલીક સરળ રીતો શોધી રહ્યાં છો, તો તમે યોગ્ય સ્થાને છો. આ લેખમાં ગયા પછી, તમે સબસ્ટ્રિંગની સ્થિતિ શોધી શકશો અથવા આ સબસ્ટ્રિંગનો ઉપયોગ કરીને ડેટા કાઢી શકશો અથવા સબસ્ટ્રિંગનું ફોર્મેટ સરળતાથી બદલી શકશો. ચાલો લેખમાં જઈએ.

વર્કબુક ડાઉનલોડ કરો

VBA નો ઉપયોગ કરીને સબસ્ટ્રિંગ શોધવાની 9 રીતો

અહીં, મારી પાસે નીચેના છે ડેટા ટેબલ કે જેના દ્વારા હું VBA નો ઉપયોગ કરીને સ્ટ્રિંગમાં સબસ્ટ્રિંગ શોધવાની રીતો બતાવીશ. હું રેન્ડમ સ્ટ્રિંગમાં સબસ્ટ્રિંગ શોધવાની રીતો બતાવવાનો પણ પ્રયાસ કરીશ.

મેં Microsoft Excel 365 સંસ્કરણનો ઉપયોગ કરીને આ કાર્ય કર્યું છે, તમે તમારી અનુકૂળતા મુજબ અન્ય કોઈપણ સંસ્કરણનો ઉપયોગ કરી શકો છો.

પદ્ધતિ-1: VBA નો ઉપયોગ કરીને સ્ટ્રીંગમાં સબસ્ટ્રિંગ શોધવી

જો તમે VBA નો ઉપયોગ કરીને તમારી ઇચ્છિત સબસ્ટ્રિંગ શોધવા માંગતા હો, તો તમે InStr ફંક્શન 11>વિઝ્યુઅલ બેઝિક વિકલ્પ

પછી, વિઝ્યુઅલ બેઝિક એડિટર ખુલશે.

➤<11 પર જાઓ ટેબ>> મોડ્યુલ વિકલ્પ

તેના પછી, મોડ્યુલ બનાવવામાં આવશે.

સ્ટેપ-02 :

➤નીચેનો કોડ લખો

7972

અહીં, InStr(1, “ મને લાગે છે કે તેથી હું છું", "વિચારો") સ્ટ્રિંગના સબસ્ટ્રિંગની સ્થિતિ પરત કરશે. 1 છેસ્ટાર્ટ પોઝિશન, “ મને લાગે છે કે તેથી હું છું” એ સ્ટ્રિંગ છે જ્યાં તમને તમારી ઇચ્છિત સબસ્ટ્રિંગ મળશે, અને “વિચારો” તમે શોધવા માંગો છો તે સબસ્ટ્રિંગ છે. તે ડિફૉલ્ટ રૂપે કેસ-સંવેદનશીલ છે તેથી તમે જે સબસ્ટ્રિંગ શોધવા માંગો છો તેનાથી સાવચેત રહો.

➤ F5

દબાવો પરિણામ :

તે પછી, તમને નીચેનું સંદેશ બોક્સ જેમાં “વિચારો” સબસ્ટ્રિંગની સ્થિતિ હશે.

પદ્ધતિ-2: સ્ટ્રિંગમાં કેસ-અસંવેદનશીલ સબસ્ટ્રિંગ શોધવી

જો તમે VBA નો ઉપયોગ કરીને કેસને ધ્યાનમાં લીધા વિના તમારી ઇચ્છિત સબસ્ટ્રિંગને સ્ટ્રિંગમાં શોધવા માંગતા હો, તો આને અનુસરો પદ્ધતિ.

પગલું-01 :

➤ અનુસરો પદ્ધતિ-01 માંથી પદ્ધતિ-1

5828

અહીં, vbTextCompare નો ઉપયોગ કેસ-અસંવેદનશીલ સબસ્ટ્રિંગ શોધવા માટે થાય છે.

➤ દબાવો F5

પરિણામ :

પછી, તમને નીચેનું સંદેશ બોક્સ જેમાં “વિચારો” સબસ્ટ્રિંગની સ્થિતિ હશે.

તમે નીચેના કોડનો ઉપયોગ કરીને તે જ કરી શકો છો.

1316

અહીં, ટેક્સ્ટની તુલના કરો વિકલ્પ કેસ-સંવેદનશીલ સબસ્ટ્રિંગ મળશે.

➤ દબાવો F5

પરિણામ :

પછીથી, તમે વાઈ. નીચે આપેલ સંદેશ બોક્સ જેમાં “વિચારો” સબસ્ટ્રિંગની સ્થિતિ હશે.

પદ્ધતિ-3: InstrRev ફંક્શનનો ઉપયોગ કરવો VBA માં

અહીં, હું a ના અંતથી સબસ્ટ્રિંગ શોધવાનો માર્ગ બતાવીશશબ્દમાળા.

સ્ટેપ-01 :

➤ફોલો કરો પદ્ધતિ-1

9219

➤ F5

પરિણામ :

પછી, તમને નીચેનું સંદેશ બોક્સ જેમાં બીજા “I” ની સબસ્ટ્રિંગની સ્થિતિ હશે. જમણી બાજુ.

પદ્ધતિ-4: ડેટાની શ્રેણીમાં સ્ટ્રીંગમાં સબસ્ટ્રિંગની સ્થિતિ શોધવી

જો તમે વિશિષ્ટ અક્ષર શોધવા માંગતા હોવ તો “@” ઈમેલ આઈડી માં, પછી આ પદ્ધતિને અનુસરો. મેં આ હેતુ માટે અહીં પોઝિશન કૉલમ ઉમેર્યું છે.

સ્ટેપ-01 :

➤અનુસરો પદ્ધતિ-1

5818

નું પગલું-01 FindSubstring (તમે અન્ય કોઈપણ નામનો ઉપયોગ કરી શકો છો)

મૂલ્ય એ કોષ સંદર્ભ છે જેમાં શબ્દમાળા હોય છે અને તેને શ્રેણી તરીકે જાહેર કરવામાં આવે છે.

પગલું -02 :

➤આઉટપુટ પસંદ કરો સેલ E5

➤ નીચેના ફંક્શનને ટાઈપ કરો ( VBA દ્વારા બનાવેલ)

=FindSubstring(D5)

D5 એ સેલ છે જેમાં સ્ટ્રીંગ છે.

➤ દબાવો એન્ટર

➤ ફિલ હેન્ડલ ટૂલ

પરિણામ :

સમાન વાંચન:

• કેવી રીતે શોધવુંએક્સેલમાં VBA નો ઉપયોગ કરીને સેલમાં સ્ટ્રિંગ (2 પદ્ધતિઓ)
• એક્સેલમાં VBA નો ઉપયોગ કરીને આગળ શોધો (2 ઉદાહરણો)
• સાથે સ્ટ્રીંગ કેવી રીતે શોધવી એક્સેલમાં VBA (8 ઉદાહરણો)
• VBA એક્સેલમાં છેલ્લી પંક્તિ શોધો (5 રીતો)

પદ્ધતિ-5: ચોક્કસ સબસ્ટ્રિંગ તપાસો ડેટાની શ્રેણીમાં એક સ્ટ્રીંગ

ધારો કે, તમે પરિણામ કૉલમના આધારે વિદ્યાર્થીઓના નામ પાસ અથવા પત્રવ્યવહારમાં નિષ્ફળ લખવા માંગો છો જ્યાં પાસ અથવા ફેલ કૌંસમાં લખાયેલ છે. આ સબસ્ટ્રિંગને પરિણામ કૉલમ માં શોધવા માટે અને તેને પાસ અથવા નિષ્ફળ કૉલમમાં લખો આ પદ્ધતિને અનુસરો.

સ્ટેપ-01 :

➤ફોલો કરો પદ્ધતિ-1

9782

અહીં, સેલ રેંજ છે પગલું-01 11>C5:C10 જે પરિણામ કૉલમ છે

InStr(cell.value, “Pass”) > 0 એ એવી સ્થિતિ છે કે જ્યાં સંખ્યા શૂન્ય કરતાં મોટી હોય (જ્યારે કોષમાં “પાસ” હોય છે)  તો નીચેની લાઇન ચાલુ રહેશે અને બાજુના કોષમાં પાસ<12 તરીકે આઉટપુટ આપશે>.

જો શરત ખોટી બની જાય તો કોષમાં કોઈ “પાસ” નથી, તો પછી અન્ય ની નીચેની લીટી એક્ઝિક્યુટ કરશે અને આઉટપુટ મૂલ્ય આપશે. અડીને આવેલ કોષ નિષ્ફળ તરીકે.

આ લૂપ દરેક કોષ માટે ચાલુ રહેશે.

➤ F5 <દબાવો 1>

પરિણામ :

પછી, તમને પાસ અથવા નિષ્ફળમાં નીચેના આઉટપુટ મળશે કૉલમ.

પદ્ધતિ-6: સ્ટ્રીંગમાં ચોક્કસ સબસ્ટ્રિંગ તપાસવું અને ડેટા એક્સટ્રેક્ટ કરવો

હું નામના વિદ્યાર્થીઓને શોધવાનો માર્ગ બતાવીશ માઇકલ વિદ્યાર્થી નામ કૉલમ માં અને આ પદ્ધતિમાં VBA નો ઉપયોગ કરીને તેમના અનુરૂપ ડેટાને બહાર કાઢો.

સ્ટેપ-01 :

➤ફોલો કરો પદ્ધતિ-1

3342

અહીં, મેં ઉપયોગ કર્યો છે સ્ટેપ-01 11>B100 સક્રિય શીટ રેન્જ તરીકે પરંતુ તમે તમારા ઉપયોગ મુજબ કોઈપણ શ્રેણીનો ઉપયોગ કરી શકો છો.

InStr(1, Range("B" & i), "Michael") > 0 કોષમાં છે કે કેમ તે તપાસવાની શરત છે કૉલમ B માં માઇકલ

Range("E" & icount & ":G" & icount) એ રેન્જ છે જ્યાં તમે તમારો આઉટપુટ ડેટા ઇચ્છો છો અને Range("B" & i & ":D" & i).value મૂલ્યો આપશે કૉલમ B થી D સુધી.

➤ F5

<11 દબાવો>પરિણામ :

તે પછી, તમને માઈકલ નામ ધરાવતા વિદ્યાર્થીઓ માટે નીચેનો એક્સ્ટ્રેક્ટ કરેલ ડેટા મળશે.

<38

પદ્ધતિ-7: શબ્દ માટે સબસ્ટ્રિંગ શોધવું

જો તમે સબસ્ટ્રિંગને શબ્દ તરીકે શોધવા માંગતા હો, તો ફોલ આ પદ્ધતિ ઓછી કરો.

સ્ટેપ-01 :

➤ફોલો કરો પદ્ધતિ-1

8056

તે સ્ટ્રીંગમાં છે છે કે કેમ તે તપાસશે અને પછી તેની સ્થિતિ આપવામાં આવશે

➤ દબાવો F5

પરિણામ :

ત્યારબાદ, તમને નીચેનો સંદેશ બોક્સ મળશે જે સ્થિતિમાં મળેલો શબ્દ દર્શાવે છે:6 (<11 ની સ્થિતિ>છે ).

તમે પરીક્ષણ કરી શકો છોશબ્દમાળામાં ન હોય તેવા શબ્દ માટે આ કોડ બહાર કાઢો.

➤નીચેનો કોડ ટાઈપ કરો

1633

➤ દબાવો F5

પરિણામ :

ત્યારબાદ, તમને નીચેનો સંદેશ બોક્સ મળશે જે શબ્દ મળ્યો નથી દર્શાવે છે.

પદ્ધતિ-8: Instr અને LEFT ફંક્શનનો ઉપયોગ કરીને

અહીં, હું સ્ટ્રીંગમાં સબસ્ટ્રિંગની સ્થિતિ શોધવાની રીત સમજાવીશ અને નો ઉપયોગ કરીને આ સબસ્ટ્રિંગ પહેલાંના ટેક્સ્ટને એક્સટ્રેક્ટ કરીશ. VBA અને લેફ્ટ ફંક્શન .

સ્ટેપ-01 :

➤ફોલો કરો સ્ટેપ-01 નું પદ્ધતિ-1

4287

j = InStr(txt, "is") સબસ્ટ્રિંગની સ્થિતિ છે અને Left(txt, j - 1) <11 પહેલા સબસ્ટ્રિંગને બહાર કાઢશે>છે .

➤ દબાવો F5

પરિણામ :

પછીથી, તમને નીચેનો સંદેશ બોક્સ મળશે જે અહીં ( છે પહેલા સબસ્ટ્રિંગ) બતાવે છે.

પદ્ધતિ-9: બોલ્ડિંગ સ્ટ્રીંગમાં ચોક્કસ સબસ્ટ્રિંગ

તમે આ પદ્ધતિને અનુસરીને પરિણામ કૉલમ માં કૌંસ પહેલાં ગ્રેડને બોલ્ડ કરી શકો છો d.

પગલું-01 :

➤ અનુસરો પદ્ધતિ-01 of પદ્ધતિ- 1

5319

txt = InStr(1, Cell, "(") પ્રથમ કૌંસની સ્થિતિ પરત કરશે અને Cell.Characters(1, txt - 1).Font.Bold પ્રથમ કૌંસ બોલ્ડ પહેલાં સબસ્ટ્રિંગ બનાવશે.

સ્ટેપ-02 :

➤ પરિણામ કૉલમ પસંદ કરો

➤જાઓ વિકાસકર્તા ટેબ>> મેક્રોઝ વિકલ્પ

પછી, મેક્રો વિઝાર્ડ દેખાશે.

➤ બોલ્ડિંગસબસ્ટ્રિંગ (VBA કોડ નામ) પસંદ કરો અને પછી ચલાવો .

પરિણામ :

તે પછી, પરિણામ કૉલમ માંના ગ્રેડને બોલ્ડ કરવામાં આવશે.

<49

પ્રેક્ટિસ વિભાગ

તમારી જાતે પ્રેક્ટિસ કરવા માટે અમે પ્રેક્ટિસ નામની શીટમાં નીચેની જેમ પ્રેક્ટિસ વિભાગ પ્રદાન કર્યો છે. કૃપા કરીને તે જાતે કરો.

નિષ્કર્ષ

આ લેખમાં, મેં VBA નો ઉપયોગ કરીને સબસ્ટ્રિંગ શોધવા માટેની સૌથી સરળ રીતોને આવરી લેવાનો પ્રયાસ કર્યો છે. એક્સેલમાં અસરકારક રીતે. આશા છે કે તમને તે ઉપયોગી લાગશે. જો તમારી પાસે કોઈ સૂચનો અથવા પ્રશ્નો હોય, તો તેને અમારી સાથે શેર કરો.