VBA కలుస్తాయి | ఎక్సెల్ VBA లో ఖండన యొక్క ఉదాహరణలు | పద్ధతులు
ఎక్సెల్ VBA ఖండన
VBA కలుస్తుంది రెండు లేదా అంతకంటే ఎక్కువ పరిధిని కలిసే శ్రేణి వస్తువును పొందడానికి ఉపయోగిస్తారు. ఖండన శ్రేణి బిందువును కనుగొనడానికి కనిష్టంగా రెండు శ్రేణులను సరఫరా చేయాలి. అన్ని ఇతర వాదనలు అవసరం ఆధారంగా ఐచ్ఛికం.
క్రింద VBA INTERSECT ఫార్ములా యొక్క వాక్యనిర్మాణం ఉంది.
- అర్గ్ 1 పరిధిగా: మొదటి ఖండన పరిధి.
- అర్గ్ 2 పరిధిగా: రెండవ ఖండన పరిధి.
దిగువ ఉదాహరణలలో మనం కొన్ని ఉపయోగకరమైన పద్ధతులను చూస్తాము.
ఉదాహరణలు
మీరు ఈ VBA ఖండన ఎక్సెల్ మూసను ఇక్కడ డౌన్లోడ్ చేసుకోవచ్చు - VBA ఖండన ఎక్సెల్ మూసఉదాహరణ # 1
ఉదాహరణకు, క్రింది డేటాను ఉపయోగించండి.
దశ 1: వేరియబుల్ను వేరియంట్గా ప్రకటించండి.
కోడ్:
సబ్ ఇంటర్సెక్ట్_ఎక్సాంపుల్ () డిమ్ మైవాల్యూ వేరియంట్ ఎండ్ సబ్
దశ 2: ఈ వేరియబుల్ కోసం ఖండన సూత్రం ద్వారా విలువను కేటాయించండి.
కోడ్:
సబ్ ఇంటర్సెక్ట్_ఎక్సాంపుల్ () డిమ్ మైవాల్యూ వేరియంట్ మైవాల్యూ = ఖండన (ఎండ్ సబ్
దశ 3: మొదటి పరిధిని B2 నుండి B9 గా ఎంచుకోండి.
కోడ్:
సబ్ ఇంటర్సెక్ట్_ఎక్సాంపుల్ () డిమ్ మైవాల్యూ వేరియంట్ మైవాల్యూ = ఖండన (రేంజ్ ("బి 2: బి 9"), ఎండ్ సబ్
దశ 4: A5 నుండి D5 వరకు రెండవ పరిధిని ఎంచుకోండి.
కోడ్:
సబ్ ఇంటర్సెక్ట్_ఎక్సాంపుల్ () డిమ్ మైవాల్యూ వేరియంట్ మైవాల్యూ = ఖండన (రేంజ్ ("బి 2: బి 9"), రేంజ్ ("ఎ 5: డి 5") ఎండ్ సబ్
దశ 5: మేము ఇక్కడ రెండు పరిధులతో మాత్రమే పరీక్షిస్తున్నాము. సూత్రాన్ని మూసివేసి, పద్ధతిని VBA సెల్ చిరునామాగా ఎంచుకోండి.
కోడ్:
సబ్ ఇంటర్సెక్ట్_ఎక్సాంపుల్ () డిమ్ మైవాల్యూ వేరియంట్ మైవాల్యూ = ఖండన (రేంజ్ ("బి 2: బి 9"), రేంజ్ ("ఎ 5: డి 5")). చిరునామా ముగింపు ఉప
దశ 6: VBA లోని సందేశ పెట్టెలో విలువను చూపించు.
కోడ్:
సబ్ ఇంటర్సెక్ట్_ఎక్సాంపుల్ () డిమ్ మైవాల్యూ వేరియంట్ మైవాల్యూ = ఖండన (రేంజ్ ("బి 2: బి 9"), రేంజ్ ("ఎ 5: డి 5")). చిరునామా MsgBox MyValue End Sub
సరే, మేము పూర్తి చేసాము మరియు సందేశ పెట్టెలో మనకు ఏమి లభిస్తుందో చూడండి.
మేము ఫలితాన్ని B5 గా పొందాము, అంటే సరఫరా పరిధి యొక్క ఖండన స్థానం యొక్క సెల్ చిరునామా.
VBA INTERSECT పద్ధతిని ఉపయోగించి ఇలాగే, మనం మరెన్నో పనులు చేయవచ్చు.
ఉదాహరణ # 2
ఖండన కణాన్ని ఎంచుకోండి
సరఫరా చేయబడిన శ్రేణి యొక్క ఖండన కణాన్ని ఎంచుకోవడానికి క్రింది కోడ్ను ఉపయోగించండి.
కోడ్:
ఉప ఖండన_ఉదాహరణ 2 () ఖండన (పరిధి ("B2: B9"), పరిధి ("A5: D5")). ముగింపు ఉప ఎంచుకోండి
ఇది సరఫరా పరిధి యొక్క ఖండన కణాన్ని ఎన్నుకుంటుంది.
ఉదాహరణ # 3
ఖండన సెల్ యొక్క కంటెంట్ క్లియర్: సరఫరా పరిధి యొక్క ఖండన సెల్ యొక్క కంటెంట్ను క్లియర్ చేయడానికి క్రింది కోడ్ను ఉపయోగిస్తుంది.
కోడ్:
ఉప ఖండన_ఉదాహరణ 2 () ఖండన (పరిధి ("B2: B9"), పరిధి ("A5: D5")). క్లియర్ కంటెంట్లు ముగింపు ఉప
ఉదాహరణ # 4
ఖండన సెల్ యొక్క సెల్ రంగు నేపథ్యం మరియు ఫాంట్ రంగును మార్చండి: ఖండన సెల్ యొక్క నేపథ్య రంగును మరియు దిగువ కోడ్ను ఉపయోగించి ఖండన సెల్ విలువ యొక్క ఫాంట్ రంగును మార్చడానికి.
కోడ్:
ఉప ఖండన_ఉదాహరణ 2 () ఖండన (పరిధి ("బి 2: బి 9"), పరిధి ("ఎ 5: డి 5")). కణాలు. )). సెల్స్.ఫాంట్.కలర్ = rgbAliceBlue ఎండ్ సబ్
ఖండన సెల్ యొక్క విలువను మార్చండి: ఖండన ఫంక్షన్ను ఉపయోగించి మనం ఆ సెల్ యొక్క విలువను వేరొకదానికి మార్చవచ్చు.
పై డేటాలో, “B2: B9” & “A5: D5” పరిధి యొక్క ఖండన విలువ సెల్ B5 అనగా నీలిరంగు రంగుతో గుర్తించబడింది. ఇప్పుడు ఫంక్షన్ను ఖండన చేయడానికి ఈ పరిధిని సరఫరా చేయడం ద్వారా, మనం విలువను వేరొకదానికి మార్చవచ్చు.
దిగువ కోడ్ నుండి విలువను మారుస్తుంది 29398 “క్రొత్త విలువ” కు.
కోడ్:
ఉప ఖండన_ఉదాహరణ 3 () ఖండన (పరిధి ("B2: B9"), పరిధి ("A5: D5")). విలువ = "క్రొత్త విలువ" ముగింపు ఉప
పైన ఉన్న కోడ్ను అమలు చేయండి, దాని స్థానంలో “క్రొత్త విలువ” అనే పదాన్ని పొందుతాము 29398.
ఇలా, ఇంటర్సెక్ట్ ఫంక్షన్ను ఉపయోగించడం ద్వారా మేము సరఫరా పరిధి యొక్క మధ్య స్థానం విలువతో ఆడవచ్చు.
గుర్తుంచుకోవలసిన విషయాలు
- శ్రేణి యొక్క ఖండన విలువను పొందడానికి ఎక్సెల్ లో, మేము రెండు శ్రేణుల మధ్య స్థల అక్షరాన్ని ఇవ్వాలి.
- VBA కోడింగ్ను ఉపయోగించడం ద్వారా మనం ఖండన విలువకు హైలైట్ చేయవచ్చు, ఫార్మాట్ చేయవచ్చు, తొలగించవచ్చు లేదా మార్చవచ్చు మరియు మరెన్నో పనులు చేయవచ్చు.
- ఖండన ఫంక్షన్కు సరఫరా చేయబడిన బహుళ వరుసలు మరియు నిలువు వరుసలు ఉంటే అప్పుడు మనకు మధ్య రెండు విలువలు లభిస్తాయి.