VBA స్ప్లిట్ ఫంక్షన్ (ఉదాహరణలు) | ఎక్సెల్ VBA లో తీగలను ఎలా విభజించాలి?
ఎక్సెల్ లో VBA స్ప్లిట్ ఫంక్షన్ అంటే ఏమిటి?
VBA లో స్ప్లిట్ ఫంక్షన్ ఫంక్షన్కు అందించిన డీలిమిటర్ మరియు పోలిక పద్ధతి ఆధారంగా తీగలను బహుళ సబ్స్ట్రింగ్లుగా విభజించడానికి ఉపయోగించే చాలా ఉపయోగకరమైన స్ట్రింగ్ ఫంక్షన్, ఇతర స్ట్రింగ్ ఫంక్షన్లు కూడా ఉన్నాయి, ఇవి స్ట్రింగ్ను సబ్స్ట్రింగ్గా మారుస్తాయి కాని స్ప్లిట్ ఫంక్షన్ ఒక స్ట్రింగ్ను కంటే ఎక్కువ విభజించవచ్చు ఒక సబ్స్ట్రింగ్స్.
సాధారణ వర్క్షీట్లో LEFT ఫంక్షన్, MID ఫంక్షన్లు మరియు ఎక్సెల్లోని RIGHT వాక్యం యొక్క భాగాన్ని సంగ్రహించడానికి ఎక్సెల్లో టెక్స్ట్ ఫంక్షన్లుగా ఉపయోగిస్తారు. ఉదాహరణకు మొదటి పేరు, మధ్య పేరు మరియు చివరి పేరు యొక్క వెలికితీత అనేది మనం చూసిన సాధారణ దృశ్యాలు. కానీ VBA లో మాకు SPLIT అని పిలువబడే మరింత బహుముఖ ఫంక్షన్ ఉంది, ఇది మీ కోసం ఇలాంటి పని చేస్తుంది. SPLIT అనేది ఎక్సెల్ VBA లో అంతర్నిర్మిత ఫంక్షన్, ఇది డీలిమిటర్ ఆధారంగా సరఫరా చేసిన వాక్యాన్ని విభజించగలదు. ఉదాహరణకు, మీరు ఇమెయిల్ చిరునామాను వేర్వేరు భాగాలకు విభజించాలనుకుంటే, ఇమెయిల్ చిరునామాలోని సాధారణ అంశం అన్ని ఇమెయిల్ ఐడిలలో “@”, కాబట్టి “@” ఇక్కడ డీలిమిటర్ అవుతుంది.
VBA స్ప్లిట్ స్ట్రింగ్ ఫంక్షన్
అన్ని ఇతర ఫంక్షన్ల మాదిరిగా స్ప్లిట్ కూడా దాని స్వంత వాక్యనిర్మాణాన్ని కలిగి ఉంది. ఎక్సెల్ VBA స్ప్లిట్ స్ట్రింగ్ ఫంక్షన్ యొక్క పారామితులు క్రింద ఉన్నాయి.
- విలువ లేదా వ్యక్తీకరణ: ఇది మేము విభజించడానికి ప్రయత్నిస్తున్న అసలు విలువ తప్ప మరొకటి కాదు. ఉదాహరణకు, మీరు మొదటి పేరు మరియు చివరి పేరును విభజించాలనుకుంటే, పూర్తి పేరు ఇక్కడ విలువ.
- [డీలిమిటర్]: విలువ లేదా వ్యక్తీకరణను విభజించడానికి సాధారణ అంశం ఏమిటి? ఇమెయిల్లో ఐడి యొక్క “@” అనేది సాధారణ మూలకం, చిరునామా కామాలో (,) సాధారణ అంశం. మీరు దీనిని విస్మరిస్తే అది స్పేస్ అక్షరాన్ని డిఫాల్ట్ విలువగా పరిగణిస్తుంది.
- [పరిమితి]: మీరు సరఫరా చేసిన విలువ లేదా వ్యక్తీకరణ నుండి మీకు ఎన్ని సబ్స్ట్రింగ్లు కావాలి. ఉదాహరణకు, విలువ “నా పేరు ఎక్సెల్” అయితే, మీరు 3 ని పరిమితిగా సరఫరా చేస్తే అది “నా”, “పేరు”, “ఎక్సెల్” వంటి మూడు పంక్తులలో ఫలితాన్ని చూపుతుంది.
- [సరిపోల్చండి]: మేము పోలిక వాదనను ఉపయోగించనందున ఈ ఐచ్ఛిక వాదనను దాటవేయి.
వ్యాసం యొక్క తరువాతి విభాగాలలో, ఎక్సెల్ VBA లో SPLIT ఫంక్షన్ను ఆచరణాత్మకంగా ఎలా ఉపయోగించాలో చూద్దాం.
VBA స్ప్లిట్ స్ట్రింగ్ ఫంక్షన్ యొక్క ఉదాహరణలు
ఎక్సెల్ VBA లోని స్ప్లిట్ ఫంక్షన్ యొక్క ఆచరణాత్మక ఉదాహరణలు క్రింద ఉన్నాయి.
మీరు ఈ VBA స్ప్లిట్ ఫంక్షన్ ఎక్సెల్ మూసను ఇక్కడ డౌన్లోడ్ చేసుకోవచ్చు - VBA స్ప్లిట్ ఫంక్షన్ ఎక్సెల్ మూస
ఉదాహరణ # 1 - వాక్యాన్ని విభజించండి
స్ప్లిట్ 0 నుండి ప్రారంభమయ్యే శ్రేణిలో ఫలితాన్ని అందిస్తుంది. అన్ని శ్రేణులు 0 నుండి 1 నుండి కాదు.
సెల్ A1 లో మీకు “మై నేమ్ ఈజ్ ఎక్సెల్ VBA” అనే పదం ఉందని అనుకోండి.
ఇప్పుడు మీరు ఈ వాక్యాన్ని “నా”, “పేరు”, “ఉంది”, “ఎక్సెల్”, “విబిఎ” వంటి ముక్కలుగా విభజించాలనుకుంటున్నారు. ఎక్సెల్ VBA SPLIT స్ట్రింగ్ ఫంక్షన్ ఉపయోగించి మనం ఈ ఫలితాన్ని ఇవ్వవచ్చు.
దశ 1: పేరుతో స్థూలతను ప్రారంభించండి.
కోడ్:
ఉప స్ప్లిట్_ఉదాహరణ 1 () ముగింపు ఉప దశ 2: మూడు వేరియబుల్స్ ప్రకటించండి.
కోడ్:
సబ్ స్ప్లిట్_ఎక్సాంపుల్ 1 () డిమ్ మైటెక్స్ట్ స్ట్రింగ్ డిమ్ ఐ యాస్ ఇంటీజర్ డిమ్ మై రిసల్ట్ () స్ట్రింగ్ ఎండ్ సబ్
దశ 3: ఇప్పుడు నిర్వచించిన వేరియబుల్ కోసం, నా టెక్స్ట్ ఈ పదాన్ని కేటాయిస్తుంది “నా పేరు ఎక్సెల్ VBA”.
కోడ్:
సబ్ స్ప్లిట్_ఎక్సాంపుల్ 1 () డిమ్ మైటెక్స్ట్ స్ట్రింగ్ డిమ్ ఐ యాస్ ఇంటీజర్ డిమ్ మై రిసల్ట్ () స్ట్రింగ్ మైటెక్స్ట్ గా = "నా పేరు ఎక్సెల్ విబిఎ" ఎండ్ సబ్
దశ 4: ఇప్పుడు నా ఫలితం వేరియబుల్ కోసం VBA స్ప్లిట్ స్ట్రింగ్ ఫంక్షన్ను వర్తింపజేయండి.
కోడ్:
సబ్ స్ప్లిట్_ఎక్సాంపుల్ 1 () డిమ్ మైటెక్స్ట్ స్ట్రింగ్ డిమ్ ఐ యాస్ ఇంటీజర్ డిమ్ మై రిసల్ట్ () స్ట్రింగ్ మైటెక్స్ట్ గా = "నా పేరు ఎక్సెల్ విబిఎ" మై రిసల్ట్ = స్ప్లిట్ (ఎండ్ సబ్
దశ 5: వ్యక్తీకరణ మా వచన విలువ. మేము ఇప్పటికే మా టెక్స్ట్ విలువను వేరియబుల్ నా టెక్స్ట్కు కేటాయించినందున ఈ వాదనను ఇక్కడ నమోదు చేయండి.
కోడ్:
సబ్ స్ప్లిట్_ఎక్సాంపుల్ 1 () డిమ్ మైటెక్స్ట్ స్ట్రింగ్ డిమ్ ఐ యాస్ ఇంటీజర్ డిమ్ మై రిసల్ట్ () స్ట్రింగ్ మైటెక్స్ట్ గా = "నా పేరు ఎక్సెల్ విబిఎ" మై రిసల్ట్ = స్ప్లిట్ (మైటెక్స్ట్) ఎండ్ సబ్
గమనిక: ఇప్పుడు అన్ని ఇతర పారామితులను విస్మరించండి.
దశ 6: కాబట్టి ఇప్పుడు నా ఫలితం ఈ స్ప్లిట్ ఫలితాన్ని కలిగి ఉంది. నేను ఇంతకు ముందు పోస్ట్లో చెప్పినట్లుగా, స్ప్లిట్ ఫంక్షన్ ఫలితాన్ని ఇక్కడ శ్రేణిగా నిల్వ చేస్తుంది
- నా ఫలితం (0) = “నా”
- నా ఫలితం (1) = “పేరు”
- నా ఫలితం (2) = “ఉంది”
- నా ఫలితం (3) = “ఎక్సెల్”
- నా ఫలితం (4) = “VBA”
SPLIT ఫంక్షన్ను ప్రారంభించడానికి ఈ కోడ్ ఎటువంటి ప్రభావాన్ని చూపకపోయినా, మేము ఈ కోడ్ను ఉపయోగించవచ్చు.
ఉదాహరణ # 2 - UBOUND ఫంక్షన్తో VBA SPLIT స్ట్రింగ్
SPLIT ఫంక్షన్ ఫలితాన్ని నిల్వ చేయడానికి, మేము SPLIT ఫంక్షన్తో పాటు vba UBOUND ఫంక్షన్ను ఉపయోగించవచ్చు.
UBOUND శ్రేణి యొక్క గరిష్ట పొడవును అందిస్తుంది. పై ఉదాహరణలో, శ్రేణి యొక్క గరిష్ట పొడవు 5.
“మై నేమ్ ఈజ్ ఎక్సెల్ విబిఎ” అనే అదే పదాన్ని తీసుకోండి. ఈ పదాన్ని విభజించి, సెల్ A1 నుండి నిల్వ చేద్దాం.
దశ 1: మునుపటి ఉదాహరణలో మేము ఆపివేసిన చోటు నుండి కొనసాగుదాం.
దశ 2: ఇప్పుడు VBA లో నెక్స్ట్ లూప్ కొరకు అర్రే యొక్క 0 నుండి గరిష్ట పొడవు వరకు వర్తించండి, అంటే UBOUND.
మేము సున్నా నుండి ప్రారంభించడానికి కారణం SPLIT ఫలితాన్ని 1 నుండి కాకుండా సున్నా నుండి నిల్వ చేస్తుంది.
దశ 3: ఇప్పుడు VBA CELLS ఆస్తిని వర్తింపజేయండి మరియు ఫలితాన్ని నిల్వ చేయండి.
కోడ్:
కణాలు (i + 1, 1) .విలువ = MyResult (i)
దశ 4: ఈ కోడ్ను అమలు చేయండి, మనకు స్ప్లిట్ విలువలు ఉంటాయి.
పూర్తి కోడ్:
ఉప స్ప్లిట్_ఎక్సాంపుల్ 1 () డిమ్ మైటెక్స్ట్ స్ట్రింగ్ డిమ్ ఐ యాస్ ఇంటీజర్ డిమ్ మై రిసల్ట్ () స్ట్రింగ్ మైటెక్స్ట్ గా = "నా పేరు ఎక్సెల్ విబిఎ" మై రిసల్ట్ = స్ప్లిట్ (మైటెక్స్ట్) ఐ = 0 టు యుబౌండ్ (మై రిసల్ట్) సెల్స్ (ఐ + 1, 1) .వాల్యూ = మై రిసల్ట్ (i) నెక్స్ట్ ఐ ఎండ్ సబ్
పద గణనను తిరిగి ఇవ్వండి
మేము సరఫరా చేసిన విలువలోని మొత్తం పదాల సంఖ్యను కూడా చూపవచ్చు. మొత్తం పద గణనల సంఖ్యను చూపించడానికి క్రింది కోడ్ను ఉపయోగించండి. కోడ్:
సబ్ స్ప్లిట్_ఎక్సాంపుల్ 2 () డిమ్ మైటెక్స్ట్ స్ట్రింగ్ డిమ్ ఐ యాస్ ఇంటీజర్ డిమ్ మై రిసల్ట్ () స్ట్రింగ్ మైటెక్స్ట్ = "నా పేరు ఎక్సెల్ విబిఎ" మై రిసల్ట్ = స్ప్లిట్ (మైటెక్స్ట్) ఐ = యుబౌండ్ (మై రిసల్ట్ ()) + 1 ఎంఎస్బిబాక్స్ "మొత్తం పదాల సంఖ్య" & i ఎండ్ సబ్
పై VBA కోడ్ను కాపీ చేసి పేస్ట్ చేసి రన్ చేస్తే మెసేజ్ బాక్స్ ఫలితాన్ని ఇస్తుంది.
గుర్తుంచుకోవలసిన విషయాలు
- డీలిమిటర్ సరఫరా చేయకపోతే SPLIT స్వయంచాలకంగా డీలిమిటర్ను ఖాళీగా భావిస్తుంది.
- మీరు స్థలం తప్ప విభజించాలనుకుంటే, మీరు డీలిమిటర్ను డబుల్ కోట్స్లో పేర్కొనాలి.
- SPLIT ఫలితాన్ని శ్రేణి ఫలితాల వలె నిల్వ చేస్తుంది.
- UBOUND ఫంక్షన్ శ్రేణి యొక్క గరిష్ట పొడవును అందిస్తుంది.