VBA MID ఫంక్షన్ | ఎక్సెల్ VBA MID ఫంక్షన్‌ను ఎలా ఉపయోగించాలి?
ఎక్సెల్ VBA MID ఫంక్షన్
VBA MID ఫంక్షన్ సరఫరా చేసిన వాక్యం లేదా పదం మధ్య నుండి విలువలను సంగ్రహిస్తుంది. MID ఫంక్షన్ స్ట్రింగ్ మరియు టెక్స్ట్ ఫంక్షన్ క్రింద వర్గీకరించబడింది మరియు ఇది వర్క్‌షీట్ ఫంక్షన్, అంటే VBA లో ఈ ఫంక్షన్‌ను ఉపయోగించడం అంటే మనం అప్లికేషన్.వర్క్‌షీట్ పద్ధతిని ఉపయోగించాలి.
మేము మొదటి పేరు, చివరి పేరు లేదా మధ్య పేరును సంగ్రహించాలనుకునే పరిస్థితులు ఉన్నాయి. ఆ పరిస్థితులలో, మా అవసరాలను తీర్చడానికి TEXT వర్గ సూత్రాలు సహాయపడతాయి. ఈ ఫంక్షన్ యొక్క ఉపయోగం వర్క్‌షీట్ రిఫరెన్స్ మాదిరిగానే ఉంటుంది మరియు సింటాక్స్ కూడా అదే.
సింటాక్స్
మా ఎక్సెల్ MID ఫంక్షన్ మాదిరిగానే, VBA లో కూడా ఇది ఇలాంటి వాక్యనిర్మాణ విలువలను కలిగి ఉంది. క్రింద వాక్యనిర్మాణం ఉంది.
- శోధించడానికి స్ట్రింగ్: ఇది స్ట్రింగ్ యొక్క వాక్యం అంటే మరొకటి కాదు, అంటే మీరు ఏ స్ట్రింగ్ లేదా పదం నుండి విలువలను సేకరించాలనుకుంటున్నారు.
- ప్రారంభ స్థానం: వాక్యం యొక్క ఏ స్థానం నుండి మీరు సంగ్రహించాలనుకుంటున్నారు. ఇది సంఖ్యా విలువగా ఉండాలి.
- సంగ్రహించడానికి అక్షరాల సంఖ్య: ప్రారంభ స్థానం నుండి మీరు ఎన్ని అక్షరాలను సేకరించాలనుకుంటున్నారు? ఇది కూడా సంఖ్యా విలువగా ఉండాలి.
VBA MID ఫంక్షన్‌ను ఎలా ఉపయోగించాలి?
మీరు ఈ VBA MID ఫంక్షన్ మూసను ఇక్కడ డౌన్‌లోడ్ చేసుకోవచ్చు - VBA MID ఫంక్షన్ మూసఉదాహరణ # 1
మీకు “హలో గుడ్ మార్నింగ్” అనే పదం ఉందని అనుకోండి మరియు మీరు ఈ వాక్యం నుండి “గుడ్” ను సేకరించాలనుకుంటున్నారు. విలువను సేకరించేందుకు క్రింది దశలను అనుసరించండి.
దశ 1: మొదట స్థూల పేరును సృష్టించండి.
కోడ్:
ఉప MID_VBA_Example1 () ముగింపు ఉప
దశ 2: వేరియబుల్‌ను “STRING” గా ప్రకటించండి.
కోడ్:
ఉప MID_VBA_Example1 () మసక మిడిల్‌వాల్యూ స్ట్రింగ్ ఎండ్ సబ్
దశ 3: ఇప్పుడు MID ఫంక్షన్ ద్వారా ఈ వేరియబుల్‌కు విలువను కేటాయించండి.
కోడ్:
ఉప MID_VBA_Example1 () మసక మిడిల్‌వాల్యూ స్ట్రింగ్ మిడిల్‌వాల్యూ = మిడ్ (ఎండ్ సబ్
దశ 4: మొదటి వాదన స్ట్రింగ్ అనగా మనం ఏ విలువ నుండి సేకరించాలనుకుంటున్నాము. కాబట్టి మా విలువ “హలో గుడ్ మార్నింగ్”.
కోడ్:
ఉప MID_VBA_Example1 () మసక మిడిల్‌వాల్యూ స్ట్రింగ్ మిడిల్‌వాల్యూ = మిడ్ ("హలో గుడ్ మార్నింగ్", ఎండ్ సబ్ 
దశ 5: తదుపరిది మీరు సంగ్రహించదలిచిన పాత్ర యొక్క ప్రారంభ స్థానం ఏమిటి. ఈ సందర్భంలో, గుడ్ మార్నింగ్ 7 వ అక్షరం నుండి ప్రారంభమవుతుంది.
గమనిక: స్పేస్ కూడా ఒక పాత్ర.
కోడ్:
ఉప MID_VBA_Example1 () మసక మిడిల్‌వాల్యూ స్ట్రింగ్ మిడిల్‌వాల్యూ = మిడ్ ("హలో గుడ్ మార్నింగ్", 7 ఎండ్ సబ్ 
దశ 6: మీరు ఎన్ని అక్షరాలను సంగ్రహించాలనుకుంటున్నారో తప్ప పొడవు ఏమీ లేదు. “మంచి” అనే పదం 4 అక్షరాలు ఉన్నందున మనం ఇక్కడ 4 అక్షరాలను తీయాలి.
కోడ్:
ఉప MID_VBA_Example1 () మసక మిడిల్‌వాల్యూ స్ట్రింగ్ మిడిల్‌వాల్యూ = మిడ్ ("హలో గుడ్ మార్నింగ్", 7, 4) ఎండ్ సబ్ 
దశ 7: మేము సూత్రాన్ని పూర్తి చేసాము. సందేశ పెట్టెలో వేరియబుల్ ఫలితాన్ని చూపిద్దాం.
కోడ్:
ఉప MID_VBA_Example1 () మసక మిడిల్‌వాల్యూ స్ట్రింగ్ మిడిల్‌వాల్యూ = మిడ్ ("హలో గుడ్ మార్నింగ్", 7, 4) MsgBox మిడిల్‌వాల్యూ ఎండ్ సబ్ 
దశ 8: ఇప్పుడు ఈ కోడ్‌ను మాన్యువల్‌గా రన్ చేయండి లేదా ఎఫ్ 5 కీని నొక్కండి, మెసేజ్ బాక్స్ “గుడ్” అనే పదాన్ని చూపించాలి.
అవుట్పుట్:
ఉదాహరణ # 2
మీకు మొదటి పేరు మరియు చివరి పేరు కలిసి ఉన్నాయని అనుకోండి మరియు ఈ పదం “రమేష్, టెండూల్కర్”. మొదటి పేరు & చివరి పేరు మధ్య, విభజన అక్షరం కామా (,). ఇప్పుడు మనం మొదటి పేరును మాత్రమే తీయాలి.
దశ 1: స్థూల సృష్టించి వేరియబుల్‌ను నిర్వచించండి.
కోడ్:
ఉప MID_VBA_Example2 () మసక మొదటి పేరు స్ట్రింగ్ ఎండ్ సబ్
దశ 2: ఇప్పుడు MID ఫంక్షన్ ద్వారా ఈ వేరియబుల్‌కు విలువను కేటాయించండి.
కోడ్:
ఉప MID_VBA_Example2 () మసక ఫస్ట్‌నేమ్ స్ట్రింగ్ ఫస్ట్‌నేమ్ = మిడ్ (ఎండ్ సబ్
దశ 3: మా స్ట్రింగ్ “రమేష్. టెండూల్కర్”, కాబట్టి ఈ పదాన్ని నమోదు చేయండి.
కోడ్:
ఉప MID_VBA_Example2 () డిమ్ ఫస్ట్‌నేమ్ స్ట్రింగ్ ఫస్ట్‌నేమ్ = మిడ్ ("రమేష్, టెండూల్కర్", ఎండ్ సబ్ 
దశ 4: మేము మొదటి పేరును సంగ్రహిస్తున్నందున ప్రారంభ స్థానం 1.
కోడ్:
ఉప MID_VBA_Example2 () డిమ్ ఫస్ట్‌నేమ్ స్ట్రింగ్ ఫస్ట్‌నేమ్ = మిడ్ ("రమేష్, టెండూల్కర్", 1, ఎండ్ సబ్ 
దశ 5: మీరు నేరుగా 6 గా నమోదు చేయగల పాత్ర యొక్క పొడవు కానీ ఇది ఉత్తమ మార్గం కాదు. పొడవును నిర్ణయించడానికి Instr అని పిలువబడే మరో సూత్రాన్ని వర్తింపజేయండి.
కోడ్:
ఉప MID_VBA_Example2 () డిమ్ ఫస్ట్‌నేమ్ స్ట్రింగ్ ఫస్ట్‌నేమ్ = మిడ్ ("రమేష్, టెండూల్కర్", 1, ఇన్‌స్ట్రా (ఎండ్ సబ్ 
దశ 6: ఈ ప్రారంభ స్థానం 1.
కోడ్:
ఉప MID_VBA_Example2 () మసక ఫస్ట్‌నేమ్ స్ట్రింగ్ ఫస్ట్‌నేమ్ = మిడ్ ("రమేష్, టెండూల్కర్", 1, ఇన్‌స్ట్రా (1, ఎండ్ సబ్ 
దశ 7: స్ట్రింగ్ 1 మా పేరు అనగా “రమేష్, టెండూల్కర్”.
కోడ్:
ఉప MID_VBA_Example2 () డిమ్ ఫస్ట్‌నేమ్ స్ట్రింగ్ ఫస్ట్‌నేమ్ = మిడ్ ("రమేష్, టెండూల్కర్", 1, ఇన్‌స్ట్రా (1, "రమేష్, టెండూల్కర్", ఎండ్ సబ్ 
దశ 8: స్ట్రింగ్ 2 మొదటి పేరు & చివరి పేరు యొక్క వేరుచేసేది అంటే కామా (,).
కోడ్:
ఉప MID_VBA_Example2 () డిమ్ ఫస్ట్‌నేమ్ స్ట్రింగ్ ఫస్ట్‌నేమ్ = మిడ్ ("రమేష్, టెండూల్కర్", 1, ఇన్‌స్ట్రా (1, "రమేష్, టెండూల్కర్", ",") ఎండ్ సబ్ 
గమనిక: "రమేష్, టెండూల్కర్" అనే పదంలో స్ట్రింగ్ 1 స్థానం నుండి స్ట్రింగ్ 2 స్థానాలకు ఎన్ని అక్షరాలు ఉన్నాయో ఇన్‌స్ట్రర్ ఫంక్షన్ తిరిగి ఇస్తుంది. కాబట్టి కామా (,) తో సహా Instr 7 తిరిగి వస్తుంది.
దశ 9: ఇన్‌స్టార్ ఫంక్షన్ కామా (,) తో సహా అక్షరాల సంఖ్యను తిరిగి ఇవ్వదు కాబట్టి, మేము ఇక్కడ మైనస్ 1 అక్షరాన్ని కలిగి ఉండాలి. కాబట్టి Instr ఫంక్షన్ ముగిసిన తర్వాత -1 ఎంటర్ చేయండి.
కోడ్:
ఉప MID_VBA_Example2 () మసక ఫస్ట్‌నేమ్ స్ట్రింగ్ ఫస్ట్‌నేమ్ = మిడ్ ("రమేష్, టెండూల్కర్", 1, ఇన్‌స్ట్రా (1, "రమేష్, టెండూల్కర్", ",") - 1) ఎండ్ సబ్ 
దశ 10: ఇప్పుడు సందేశ పెట్టెలో వేరియబుల్ విలువను చూపించు.
కోడ్:
ఉప MID_VBA_Example2 () మసక ఫస్ట్‌నేమ్ స్ట్రింగ్ ఫస్ట్‌నేమ్ = మిడ్ ("రమేష్, టెండూల్కర్", 1, ఇన్‌స్ట్రా (1, "రమేష్, టెండూల్కర్", ",") - 1) MsgBox ఫస్ట్‌నేమ్ ఎండ్ సబ్ 
దశ 11: F5 కీని ఉపయోగించి ఈ కోడ్‌ను అమలు చేయండి లేదా మీరు ఈ కోడ్‌ను మానవీయంగా అమలు చేయవచ్చు, మేము సందేశ పెట్టెలో మొదటి పేరును పొందుతాము.
అవుట్పుట్:
ఉదాహరణ # 3
ఇప్పుడు నేను మీకు పరిష్కరించడానికి ఒక నియామకం ఇస్తాను. నా వద్ద మొదటి పేరు & చివరి పేరు జాబితా ఉంది.
ఈ జాబితా నుండి మీరు మొదటి పేరును మాత్రమే సేకరించాలని నేను కోరుకుంటున్నాను. అంతా మంచి జరుగుగాక!!!!.
సరే, మీరు ప్రయత్నించినట్లయితే మరియు ఫలితాన్ని పొందలేకపోతే, క్రింద కోడ్ మీకు సహాయపడుతుంది.
కోడ్:
ఉప MID_VBA_Example3 () మసకబారిన i = 2 నుండి 15 కణాలు (i, 2) .వాల్యూ = మధ్య (కణాలు (i, 1). విలువ, 1, InStr (1, కణాలు (i, 1). విలువ, " , ") - 1) నెక్స్ట్ ఐ ఎండ్ సబ్
పై కోడ్‌ను మీ మాడ్యూల్‌లో కాపీ చేసి పేస్ట్ చేయండి. కోడ్‌ను కాపీ చేసిన తర్వాత, ఈ కోడ్‌ను F5 కీని ఉపయోగించి అమలు చేయండి లేదా మీరు మానవీయంగా అమలు చేయవచ్చు.
ఇది క్రింది విధంగా ఫలితాన్ని ఇవ్వాలి.
గుర్తుంచుకోవలసిన విషయాలు
- MID ఫంక్షన్‌లో పొడవు వాదన ఐచ్ఛికం. మీరు దీనిని విస్మరిస్తే అది డిఫాల్ట్ విలువగా 1 పడుతుంది.
- పొడవు లేదా ప్రారంభ స్థానం నిర్ణయించడానికి MID ఫంక్షన్‌తో పాటు Instr ఫంక్షన్‌ను ఉపయోగించండి.
