VBA కాంకాటేనేట్ | VBA లో కలిసి తీగలను ఎలా కలపాలి?

సంగ్రహణ అంటే రెండు విలువలు లేదా రెండు తీగలను కలపడం, మనం ఉపయోగించే ఎక్సెల్ మాదిరిగానే లేదా సంగ్రహించడానికి ఆంపర్సండ్ ఆపరేటర్ అని కూడా పిలుస్తారు, మనం ఉపయోగించే రెండు కాంకటేనేట్ రెండు తీగలను & స్ట్రింగ్ 1 & స్ట్రింగ్ 2 వంటి ఆపరేటర్, ఇప్పుడు గుర్తుంచుకోవలసిన ముఖ్యమైన విషయం ఉంది మరియు & ఆపరేటర్‌ను ఉపయోగిస్తున్నప్పుడు మేము ఖాళీలను అందించాలి లేదా VBA దీన్ని ఎక్కువ కాలం పరిగణిస్తుంది.

VBA కాంకాటేనేట్ స్ట్రింగ్స్

VBA కాంకాటేనేట్ మేము రెండు లేదా అంతకంటే ఎక్కువ విలువ గల సెల్ విలువలను మిళితం చేయడానికి ఉపయోగించిన వాటిలో ఒకటి, నేను సరళమైన భాషలో అది కలుపుతున్నానని చెబితే, అది రెండు లేదా అంతకంటే ఎక్కువ విలువలను కలిపి పూర్తి విలువను కలిగి ఉంటుంది.

మాకు ఎక్సెల్ లో CONCATENATE అని పిలువబడే ఒక ఫంక్షన్ ఉంది, ఇది రెండు లేదా అంతకంటే ఎక్కువ విలువలు లేదా రెండు లేదా అంతకంటే ఎక్కువ సెల్ విలువలను కలపడం చేస్తుంది.

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

VBA లో తీగలను ఎలా కలపాలి?

విలువలను ఏకీకృతం చేయడానికి మనకు ఎలాంటి అంతర్నిర్మిత ఫంక్షన్ లేకపోతే మరియు వర్క్‌షీట్ ఫంక్షన్ కూడా VBA తో కలిసిపోదు. ఇప్పుడు సవాలు ఏమిటంటే మనం విలువలను ఎలా మిళితం చేస్తాము?

అంతర్నిర్మిత విధులు లేనప్పటికీ, మనం “ఆంపర్సండ్” (&) చిహ్నాన్ని ఉపయోగించి VBA లో కలపవచ్చు.

మీరు మా పోస్ట్‌లను క్రమం తప్పకుండా అనుసరిస్తుంటే, మేము తరచుగా మా కోడింగ్‌లోని ఆంపర్సండ్ (&) చిహ్నాన్ని ఉపయోగిస్తాము.

ఉదాహరణకు, మీకు మొదటి పేరు మరియు చివరి పేరు విడిగా ఉంటే మేము ఈ రెండింటినీ మిళితం చేసి పూర్తి పేరుగా చేసుకోవచ్చు. VBA మాక్రో కోడ్‌ను మన స్వంతంగా వ్రాయడానికి క్రింది దశలను అనుసరించండి.

దశ 1: విజువల్ బేసిక్ ఎడిటర్‌కు వెళ్లి VBA ఉప విధానాన్ని సృష్టించండి.

దశ 2: మూడు వేరియబుల్స్ నిర్వచించండి స్ట్రింగ్ గా.

కోడ్:

 సబ్ కాంకాటేనేట్_ఉదాహరణ () మసక మొదటి_పేరు స్ట్రింగ్ డిమ్ లాస్ట్_నేమ్ స్ట్రింగ్ డిమ్ ఫుల్_నేమ్ స్ట్రింగ్ ఎండ్ సబ్ 

దశ 3: ఇప్పుడు కేటాయించండి మొదటి పేరు మరియు చివరి పేరు వేరియబుల్కు.

కోడ్:

 సబ్ కాంకాటేనేట్_ఉదాహరణ () మసక మొదటి_పేరు స్ట్రింగ్ డిమ్ లాస్ట్_నేమ్ స్ట్రింగ్ డిమ్ ఫుల్_నేమ్ స్ట్రింగ్ గా ఫస్ట్_నేమ్ = "సచిన్" లాస్ట్_నేమ్ = "టెండూల్కర్" ఎండ్ సబ్ 

దశ 4: ఇప్పుడు ఈ రెండు పేర్లను వేరియబుల్‌తో కలపండి పూర్తి పేరు ampersand వేరియబుల్ ఉపయోగించి.

కోడ్:

 సబ్ కాంకాటేనేట్_ఉదాహరణ () మసక మొదటి_పేరు స్ట్రింగ్ డిమ్ లాస్ట్_నేమ్ స్ట్రింగ్ డిమ్ ఫుల్_నేమ్ స్ట్రింగ్ గా ఫస్ట్_నేమ్ = "సచిన్" లాస్ట్_నేమ్ = "టెండూల్కర్" ఫుల్_నేమ్ = ఫస్ట్_నేమ్ & లాస్ట్_నేమ్ ఎండ్ సబ్ 

దశ 5: ఇప్పుడు వేరియబుల్ ఫుల్_నేమ్ యొక్క విలువను చూపించు సందేశ పెట్టె.

కోడ్:

 సబ్ కాంకాటేనేట్_ఎక్సాంపుల్ () డిమ్ ఫస్ట్_నేమ్ స్ట్రింగ్ డిమ్ లాస్ట్_నేమ్ స్ట్రింగ్ డిమ్ ఫుల్_నేమ్ స్ట్రింగ్ ఫస్ట్_నేమ్ = "సచిన్" లాస్ట్_నేమ్ = "టెండూల్కర్" ఫుల్_నేమ్ = ఫస్ట్_నేమ్ & లాస్ట్_నేమ్ ఎంఎస్జిబాక్స్ ఫుల్_నేమ్ ఎండ్ సబ్ 

ఇప్పుడు సందేశ పెట్టెలో మనకు పూర్తి పేరు వచ్చే కోడ్‌ను అమలు చేయండి.

ఈ పూర్తి పేరుతో ఉన్న సమస్య ఏమిటంటే, మేము మొదటి పేరు మరియు చివరి పేరు సెపరేటర్ అక్షర స్థలాన్ని జోడించలేదు, మొదటి పేరు మరియు చివరి పేరును కలిపేటప్పుడు, స్పేస్ క్యారెక్టర్‌ను కూడా కలపండి.

కోడ్:

 ఉప కాంకాటేనేట్_ఉదాహరణ () మసకబారిన మొదటి_పేరు స్ట్రింగ్ మసకబారిన చివరి_పేరు స్ట్రింగ్ మసకబారిన పూర్తి_పేరు స్ట్రింగ్ వలె మొదటి_పేరు = "సచిన్" చివరి_పేరు = "టెండూల్కర్" పూర్తి_పేరు = మొదటి_పేరు & "" & చివరి_పేరు MsgBox పూర్తి_పేరు ముగింపు ఉప 

ఇది ఇప్పుడు సరైన పూర్తి పేరును ఇస్తుంది.

ఆంపర్సండ్ చిహ్నాన్ని ఉపయోగించి ఇలా, మేము విలువలను సంగ్రహించవచ్చు. ఇప్పుడు మేము పూర్తి పేరుగా మార్చడానికి మొదటి పేరు & చివరి పేరును పరిష్కరించే వర్క్‌షీట్ సమస్యను పరిష్కరిస్తాము.

మేము చాలా పేర్లను మిళితం చేయాల్సిన అవసరం ఉన్నందున, మొదటి పేరు & చివరి పేరును కలపడానికి లూప్‌లను ఉపయోగించాలి. దిగువ కోడ్ మీ కోసం పని చేస్తుంది.

కోడ్:

 నేను = 2 నుండి 9 కణాలకు (i, 3) పూర్ణాంకంగా ఉప కాంకాటేనేట్_ఎక్సాంపుల్ 1 () మసక = కణాలు (i, 1) & "" & కణాలు (i, 2) తదుపరి i ముగింపు ఉప 

ఇది మా VBA కాంకాటేనేట్ ఫంక్షన్ మాదిరిగానే మొదటి పేరు మరియు చివరి పేరును మిళితం చేస్తుంది.

ఆంపర్సండ్ VBA సంగ్రహణలో సాధారణ తప్పు

మీరు నా కోడ్‌లను గమనించినట్లయితే నేను విలువల మధ్య ఖాళీ అక్షరాన్ని జోడించాను. VBA ప్రోగ్రామింగ్ యొక్క స్వభావం కారణంగా ఇది అవసరం.

మేము విలువలు మరియు ఆంపర్సండ్ చిహ్నాలను కలపలేము, లేకపోతే కింది విధంగా కంపైల్ లోపం వస్తుంది.

JOIN ఫంక్షన్ ఉపయోగించి VBA కాంకాటేనేట్

VBA లో మనం విలువలను కలపడానికి JOIN ఫంక్షన్‌ను ఉపయోగించవచ్చు. మొదట, VBA JOIN ఫంక్షన్ సింటాక్స్ చూడండి.

  • శ్రేణి మా విలువలను కలిగి ఉన్న శ్రేణి తప్ప మరొకటి కాదు. ఉదాహరణకు మొదటి పేరు & చివరి పేరు రెండూ.
  • డీలిమిటర్ ప్రతి శ్రేణి విలువ మధ్య విభజన ఏమిటి, ఈ సందర్భంలో, స్పేస్ అక్షరం.

దిగువ కోడ్ అదే ఉదాహరణను చూపుతుంది.

కోడ్:

 సబ్ కాంకాటేనేట్_ఎక్సాంపుల్ 2 () డిమ్ మైవాల్యూస్ వేరియంట్ డిమ్ ఫుల్_నేమ్ స్ట్రింగ్ మైవాల్యూస్ = అర్రే ("సచిన్", "టెండూల్కర్") పూర్తి_పేరు = చేరండి (మైవాల్యూస్, "") MsgBox Full_Name End Sub