VBA UCase ఫంక్షన్ | ఎక్సెల్ VBA లో వచనాన్ని పెద్ద అక్షరానికి మార్చండి

ఎక్సెల్ VBA UCase ఫంక్షన్

VBA లో ఉకేస్ అప్పర్‌కేస్‌లో అందించిన ఇన్‌పుట్ స్ట్రింగ్‌ను మార్చడానికి ఉపయోగించబడే ఇన్‌బిల్ట్ ఫంక్షన్, ఇది స్ట్రింగ్ అయిన ఇన్‌పుట్‌గా ఒకే ఆర్గ్యుమెంట్‌ను తీసుకుంటుంది మరియు ఈ ఫంక్షన్ ద్వారా ఉత్పత్తి అవుతున్న స్ట్రింగ్, గుర్తుంచుకోవలసిన ఒక విషయం ఈ ఫంక్షన్ అన్ని ఫంక్షన్లను మొదటి అక్షరానికి మాత్రమే కాకుండా పెద్ద అక్షరానికి మారుస్తుంది.

ఎక్సెల్ లో కొన్ని టెక్స్ట్ విలువలను UPPERCASE గా మార్చవలసిన పరిస్థితులు ఉన్నాయి. రెగ్యులర్ వర్క్‌షీట్ ఫంక్షన్‌లో UPPER ఫంక్షన్‌ను మరియు VBA కోడ్‌లో UCase ఫంక్షన్‌ను ఉపయోగించడం ద్వారా ఇది చేయవచ్చు.

మీరు ఇప్పటికే VBA లో UPPER ఫంక్షన్ కోసం శోధిస్తుంటే, వర్క్‌షీట్ ఫంక్షన్ క్లాస్‌తో కూడా మీరు కనుగొనలేరు. VBA లో ఇది పూర్తిగా భిన్నమైనది మరియు చిన్న పేరు ఫంక్షన్, అంటే “UCASE”. ఇక్కడ “U” అంటే “UPPER”, కాబట్టి ఫార్ములా “UPPERCASE” ను చదువుతుంది.

సింటాక్స్

ఇప్పుడు, UCASE ఫంక్షన్ యొక్క వాక్యనిర్మాణాన్ని చూడండి.

స్ట్రింగ్: ఇది పెద్దది కాదు, మేము అప్పర్‌కేస్‌కు మార్చడానికి ప్రయత్నిస్తున్న వచన విలువ ఏమిటి. ఇది ప్రత్యక్ష విలువ లేదా సెల్ సూచన కావచ్చు. కొద్దిసేపట్లో రెండు రకాల ఉదాహరణలను చూస్తాము.

VBA Ucase ని ఉపయోగించి వచనాన్ని అప్పర్‌కేస్‌గా మార్చడం ఎలా?

మీరు ఈ VBA UCase Excel మూసను ఇక్కడ డౌన్‌లోడ్ చేసుకోవచ్చు - VBA UCase Excel మూస

ఉదాహరణ # 1

వచన విలువను మార్చడానికి ప్రయత్నిద్దాం Excel vba UCase ఫంక్షన్‌ను ఉపయోగించడం ద్వారా పెద్ద వచనానికి.

దశ 1: స్థూలతను సృష్టించడం ద్వారా ఉపప్రాసెసర్‌ను ప్రారంభించండి.

కోడ్:

 ఉప UCase_Example1 () ముగింపు ఉప 

దశ 2: వేరియబుల్‌ను VBA స్ట్రింగ్‌గా ప్రకటించండి.

కోడ్:

 స్ట్రింగ్ ఎండ్ సబ్ గా ఉప UCase_Example1 () Dim k 

దశ 3: “UCASE” ఫంక్షన్‌ను వర్తింపజేయడం ద్వారా “k” వేరియబుల్‌కు విలువను కేటాయించండి.

దశ 4: ఇక్కడ స్ట్రింగ్ అనేది మన పెద్ద టెక్స్ట్ విలువ, మేము పెద్ద అక్షరానికి మార్చడానికి ప్రయత్నిస్తున్నాము మరియు స్ట్రింగ్ విలువ “ఎక్సెల్ vba”.

కోడ్:

 ఉప UCase_Example1 () Dim k As String K = UCase ("Excel vba") ముగింపు ఉప 

దశ 5: సందేశ పెట్టెలో వేరియబుల్ ఫలితాన్ని ప్రదర్శిద్దాం.

కోడ్:

 ఉప UCase_Example1 () Dim k As String k = UCase ("Excel vba") MsgBox k End Sub 

సరే, మేము VBA కోడింగ్ భాగంతో పూర్తి చేసాము. సందేశ పెట్టెలో ఫలితాన్ని చూడటానికి స్థూలతను నడుపుదాం.

కాబట్టి అప్పర్‌కేస్ ఫంక్షన్ “ఎక్సెల్ విబిఎ” అనే టెక్స్ట్ విలువను సెకన్ల వ్యవధిలో “ఎక్సెల్ విబిఎ” గా మార్చింది.

ఉదాహరణ # 2

ఫంక్షన్‌కు సెల్ రిఫరెన్స్‌ను ఉపయోగించే ఉదాహరణను చూద్దాం. సెల్ A1 లో నేను నమోదు చేసిన అదే టెక్స్ట్ విలువ.

దశ 1: మేము ఫలితాన్ని రేంజ్ బి 1 సెల్ లో చూపిస్తాము, కాబట్టి కోడ్ ఉంటుంది పరిధి (“B”). విలువ =

కోడ్:

 ఉప UCase_Example2 () పరిధి ("B1"). విలువ = ముగింపు ఉప 

దశ 2: UCASE ఫంక్షన్ ద్వారా సెల్ B1 లో మేము డేటాను నిల్వ చేస్తాము, కాబట్టి UCASE ఫంక్షన్‌ను తెరవండి.

దశ 3: ఇక్కడ స్ట్రింగ్ విలువ ఈసారి సెల్ రిఫరెన్స్. కాబట్టి సెల్ రిఫరెన్స్ ఇవ్వండి పరిధి (“A1”). విలువ.

కోడ్:

 ఉప UCase_Example2 () పరిధి ("B1"). విలువ = UCase (పరిధి ("A1"). విలువ) ముగింపు ఉప 

కాబట్టి, పూర్తయింది.

కోడ్‌ను అమలు చేసి, ఫలితాన్ని B1 సెల్‌లో చూడండి.

ఉదాహరణ # 3

పై ఉదాహరణలో, ఒకే-సెల్ విలువను అప్పర్ కేస్‌గా మార్చడం మాత్రమే చూశాము. దిగువ చిత్రం వంటి అనేక పేర్లు మీకు ఉంటే g హించుకోండి.

ఈ సందర్భాలలో, మేము ప్రతి పంక్తికి కోడ్ రాయడం కొనసాగించలేము, కాబట్టి మనం ఫార్ములాను లూప్‌లతో జతచేయాలి. క్రింద ఉన్న కోడ్ పై వచన విలువలను ఒకేసారి అప్పర్ కేస్‌గా మారుస్తుంది.

కోడ్:

 ఉప UCase_Example3 () d = k పొడవుగా k = 2 నుండి 8 కణాలు (k, 2) .వాల్యూ = UCase (కణాలు (k, 1). విలువ) తదుపరి k ముగింపు ఉప 

ఇది అన్ని వచన విలువలను ఈ క్రింది విధంగా 2 వ వరుస నుండి 8 వ వరుసకు అప్పర్ కేస్‌గా మారుస్తుంది.

మీరు ఎంచుకున్న అన్ని సెల్ విలువలను అప్పర్ కేస్‌గా మార్చాలనుకుంటే, ఈ క్రింది కోడ్‌ను ఉపయోగించండి.

కోడ్:

 ఉప UCase_Example4 () డిమ్ Rng రేంజ్ సెట్‌గా Rng = ఎంపికలో ప్రతి Rng కోసం ఎంపిక Rng = UCase (Rng.Value) తదుపరి Rng ముగింపు ఉప 

ఈ కోడ్ పనిచేయడానికి, మొదట మనం అప్పర్ కేస్‌కు మార్చాలనుకుంటున్న కణాల పరిధిని ఎంచుకోవాలి, ఆపై స్థూలతను అమలు చేయండి. ఎంచుకున్న పరిధిలో ఇది టెక్స్ట్ విలువలను అప్పర్ కేస్ అక్షరాలకు మారుస్తుంది.