VBA "సమానం కాదు" ఆపరేటర్ | VBA యొక్క దశల వారీ ఉదాహరణలు "సమానం కాదు"
సమానం కాదు VBA లో ఒక ఆపరేటర్, దీనిని నెగెషన్ ఆపరేటర్ అని కూడా పిలుస్తారు, ఇది ఒక తార్కిక ఫంక్షన్ కాబట్టి ఈ ఫంక్షన్ ద్వారా తిరిగి వచ్చే అవుట్పుట్ నిజం లేదా తప్పు అని మాకు తెలుసు, సమాన ఆపరేటర్ “=” ఇది సమానమని కాదు “ VBA లో కాబట్టి సమాన ఆపరేటర్ నుండి మనకు లభించే విలువ ఏమైనప్పటికీ నాట్ ఈక్వల్ ఆపరేటర్ ఉపయోగించి ఖచ్చితమైన వ్యతిరేక విలువను పొందుతాము.
VBA లో “సమానం కాదు” ఆపరేటర్
సాధారణంగా, మేము ఒక తార్కిక పరీక్షను చేస్తాము “ఏదో ఇతర విషయాలతో సమానంగా ఉందా లేదా అనేది”. కొన్ని సందర్భాల్లో, మేము దీన్ని చేయాలి “అసమానత” పరీక్ష కూడా.అసమానత పరీక్ష సమాన పరీక్ష కాదు. సాధారణంగా, ఏదైనా ఇతర విషయానికి సమానంగా ఉందా లేదా అని మేము చెప్తాము, అది సమానంగా ఉంటే వేరే పని కాకపోతే ఒకరకమైన పనిని చేస్తుంది. అదేవిధంగా ఉపయోగించడం అసమానత పరీక్ష కూడా మేము ఒక రకమైన ఆపరేషన్ చేయవచ్చు. VBA లోని “NOT EQUAL” చిహ్నాల కంటే ఎక్కువ మరియు తక్కువ కలయికతో సూచించబడుతుంది. ఈ రెండు ఆపరేటర్లు కలిపి ఉంటే అది సమాన చిహ్నం కాదు. “”.
ఎక్సెల్ VBA లో పని చేయడానికి ఎలా సమానం కాదు?
VBA సమానమైనది కాదు ఆపరేటర్‌కు సమానమైన తర్కానికి సరిగ్గా వ్యతిరేకం. ఆపరేటర్‌కు సమానం సరఫరా చేసిన పరీక్ష సంతృప్తి చెందితే అది నిజం కాదు. ఉదాహరణకు, మీరు 10 = 10 అని చెబితే అది ఒప్పును తిరిగి ఇస్తుంది లేదా లేకపోతే తప్పు.
మరొక వైపు “సమానం కాదు” వ్యతిరేక దిశలో పనిచేస్తుంది, ఎక్సెల్ లో సరఫరా చేయబడిన తార్కిక పరీక్ష సమానంగా లేకపోతే అది మాత్రమే నిజమైనది లేదా తప్పుగా తిరిగి వస్తుంది.
ఉదాహరణకు, మీరు 10 10 అని చెబితే అది తప్పుగా వస్తుంది ఎందుకంటే 10 10 కి సమానం. నిజమైన ఫలితం పొందడానికి ఒక విలువ ఇతర విలువకు సమానంగా ఉండకూడదు.
ఎక్సెల్ VBA లో సమానంగా లేని ఉదాహరణలు
ఎక్సెల్ VBA లో ఆపరేటర్‌తో సమానం కానందుకు ఉదాహరణలు క్రింద ఉన్నాయి.
ఉదాహరణ # 1
ఇప్పుడు ఆచరణాత్మకంగా VBA నాట్ ఈక్వల్ () గుర్తును ఎలా ఉపయోగించాలో చూద్దాం. క్రింద ఉన్న కోడ్ భాగాన్ని చూడండి.
కోడ్:
ఉప NotEqual_Example1 () మసకబారిన స్ట్రింగ్ k = 100 100 MsgBox k ఎండ్ సబ్
ఇక్కడ మేము 100 సంఖ్య 100 కు సమానం కాదా అని పరీక్షిస్తున్నాము. ఖచ్చితంగా 100 సంఖ్య 100 కు సమానమని మాకు తెలుసు, కాబట్టి ఫలితం తప్పు అవుతుంది.
ఇప్పుడు నేను సమీకరణాన్ని మారుస్తాను.
కోడ్:
ఉప NotEqual_Example1 () మసకబారిన స్ట్రింగ్ k = 100 99 MsgBox k ఎండ్ సబ్
100 వ సంఖ్య 99 కి సమానం కాదా అనేది ఇప్పుడు పరీక్ష. కాబట్టి ఫలితం నిజం అవుతుంది.
ఉదాహరణ # 2
రియల్ టైమ్ ఉదాహరణలలో ఈ సమానమైన ఆపరేటర్‌ను ఎలా ఉపయోగించాలో ఇప్పుడు మనం చూస్తాము. ప్రదర్శన కోసం, నేను కొంత డేటాను సృష్టించాను.
మాకు రెండు విలువలు ఉన్నాయి, “విలువ 1” మరియు “విలువ 2”.
ఇప్పుడు నా అవసరం ఏమిటంటే విలువ 1 విలువ 2 కు సమానం కాకపోతే నాకు ఫలితం “భిన్నమైనది” కావాలి, లేకపోతే ఫలితం “అదే” గా అవసరం.
దశ 1: వేరియబుల్‌ను పూర్ణాంకంగా నిర్వచించండి.
కోడ్:
ఉప NotEqual_Example2 () మసకబారిన పూర్ణాంక ముగింపు ఉప
దశ 2: 2 నుండి 9 వరకు తదుపరి లూప్ కోసం తెరవండి.
కోడ్:
ఉప NotEqual_Example2 () d = k కోసం పూర్ణాంకంగా k = 2 నుండి 9 వరకు తదుపరి k ముగింపు ఉప
దశ 3: లూప్ లోపల, విలువ 1 విలువ 2 కు సమానం కాదా అని మనం పరీక్షించాలి. మనకు మన స్వంత ఫలితాలు కావాలి కాబట్టి మనం IF కండిషన్ ఉపయోగించాలి.
కోడ్:
కణాలు (k, 1) కణాలు (k, 2) అప్పుడు కణాలు (k, 3) ఉంటే విలువ = "భిన్నమైన" ఇతర కణాలు (k, 3). విలువ = "అదే" ఎండ్ నెక్స్ట్ కె ఎండ్ సబ్
విలువ 1 విలువ 2 కు సమానం కాదా అని పరీక్షిస్తే. సమానంగా లేకపోతే అది “భిన్నమైనది”, సమానంగా ఉంటే అది “అదే” అని తిరిగి వస్తుంది.
మీరు క్రింది VBA కోడ్‌ను కాపీ చేసి పేస్ట్ చేయవచ్చు.
ఈ కోడ్‌ను మీ మాడ్యూల్‌కు కాపీ చేసి, F5 కీని ఉపయోగించి లేదా మానవీయంగా అమలు చేయండి. ఇది ఇలాంటి ఫలితాన్ని ఇస్తుంది.
సమాన చిహ్నంతో షీట్లను దాచండి మరియు దాచండి
సమానమైన పాడకుండా ఉపయోగించే వివిధ మార్గాలు అపారమైనవి. మన అవసరాలను తీర్చడానికి ఈ గుర్తును ఉపయోగించవచ్చు.
# 1 - ఒక షీట్ మినహా అన్ని షీట్లను దాచండి
ఈ రకమైన పరిస్థితిని మనం చాలాసార్లు చూశాము. మేము నిర్దిష్ట షీట్ మినహా అన్ని షీట్లను దాచాల్సిన అవసరం ఉంది.
ఉదాహరణకు, మీరు “కస్టమర్ డేటా” అనే షీట్ పేరు మినహా అన్ని షీట్లను దాచాలనుకుంటే, మీరు ఈ కోడ్‌ను ఉపయోగించవచ్చు.
కోడ్:
యాక్టివ్‌వర్క్‌బుక్‌లోని ప్రతి Ws కోసం వర్క్‌షీట్‌గా ఉప Hide_All (వర్క్‌షీట్‌లు)
# 2 - ఒక షీట్ మినహా అన్ని షీట్లను దాచు
అదేవిధంగా, మేము ఒక షీట్ మినహా అన్ని షీట్లను కూడా దాచవచ్చు. దీన్ని చేయడానికి క్రింది కోడ్‌ను ఉపయోగించండి.
కోడ్:
యాక్టివ్‌వర్క్‌బుక్‌లోని ప్రతి డబ్ల్యుఎస్‌కి వర్క్‌షీట్‌గా సబ్ అన్‌హైడ్_అన్ని () డిమ్‌ డబ్ల్యు.
మీరు ఈ VBA ను ఎక్సెల్ టెంప్లేట్‌కు సమానం కాదు - VBA నాట్ ఈక్వల్ ఆపరేటర్ మూస
