VBA ఎనుమ్ | VBA గణనలను ఉపయోగించడానికి దశల వారీ ఉదాహరణలు
గణనలకు ENUM ఒక చిన్న రూపం, దాదాపు ప్రతి ప్రోగ్రామింగ్ భాషలో మనకు గణనలు ఉన్నాయి, కొన్ని ముందే నిర్వచించబడ్డాయి మరియు కొన్ని వినియోగదారు నిర్వచించిన గణనలు, VBA Vbnewline లో ఒక గణన మరియు మేము ENUM స్టేట్మెంట్ ఉపయోగించి మన స్వంత గణనలను చేయవచ్చు.
VBA ఎన్యూమరేషన్స్ (ఎనుమ్)
మేము సాధారణంగా వేరియబుల్స్ డిక్లేర్ చేస్తాము మరియు వాటికి డేటా రకాలను కేటాయిస్తాము. మేము ఉపయోగించే సాధారణ డేటా రకాలు “ఇంటీజర్, లాంగ్, సింగిల్, డబుల్, వేరియంట్ మరియు స్ట్రింగ్”. కానీ మనకు మరో డేటా రకం ఉంది, అంటే VBA “Enum”. ఇది ఏమిటో మీరు ఆలోచిస్తూ ఉండాలి మరియు ఒక వింతగా అనిపిస్తుంది, కానీ మీ సందేహాలన్నింటినీ తొలగించడానికి మేము ఈ కథనాన్ని “VBA ఎన్యూమరేషన్స్” లో ప్రదర్శిస్తున్నాము
VBA ఎనుమ్ అంటే ఏమిటి?
“ఎనుమ్” అంటే గణనలు. ఎనుమ్ అనేది మా స్ట్రింగ్ లేదా పూర్ణాంకం లేదా మరే ఇతర డేటా రకం మాదిరిగానే వేరియబుల్ రకం, కానీ ఇక్కడ మనం ఎక్సెల్ VBA ఎనుమ్ స్టేట్మెంట్ ఉపయోగించి జాబితా మూలకాన్ని సృష్టిస్తాము. గణన అంటే “అనేక విషయాలను ఒక్కొక్కటిగా ప్రస్తావించే చర్య”.
ఎక్సెల్ VBA ఎనుమ్ అనేది స్థిరాంకాల గణనను కలిగి ఉన్న ఒక రకం. గణనలు అంశాల జాబితాను సృష్టించి వాటిని సమూహంగా చేస్తాయి. ఉదాహరణకు మొబైల్‌ల రకం: “రెడ్మి, శామ్‌సంగ్, ఆపిల్, వివో, ఒప్పో”.
గణనలను ఉపయోగించి మనం అన్నింటినీ ఒకే విలువలో సమూహపరచవచ్చు. ఎనుమ్‌ను VBA లో వేరియబుల్స్‌గా ఉపయోగించవచ్చు మరియు ఇది లాంగ్ యొక్క సంఖ్యా వేరియబుల్ డేటా రకం.
VBA ఎనుమ్ యొక్క ఫార్ములా
మీరు ఏదైనా అర్థం చేసుకోకపోతే చింతించకండి, మీరు నెమ్మదిగా దాన్ని ఆపివేస్తారు. ఇప్పుడు VBA ఎనుమ్ యొక్క సూత్రాన్ని చూడండి.
ఎనుమ్ గ్రూప్ నేమ్ మెంబర్ 1 = [లాంగ్] మెంబర్ 2 = [లాంగ్] మెంబర్ 3 = [లాంగ్] మెంబర్ 4 = [లాంగ్] మెంబర్ 5 = [లాంగ్] ఎండ్ ఎనుమ్
నేను ప్రారంభంలో చెప్పినట్లుగా ఎనుమ్‌ను వేరియబుల్‌గా ఉపయోగించవచ్చు మరియు ఇది లాంగ్ యొక్క సంఖ్యా వేరియబుల్ డేటా రకం.
VBA ఎనుమ్ యొక్క ఉదాహరణలు
నేను ఎనుమ్ ఉదాహరణలు ప్రారంభించే ముందు VBA లో “స్థిరమైన” ఉదాహరణను మీకు చూపిస్తాను. స్థిరమైనది కూడా VBA లో వేరియబుల్ ప్రకటించడానికి ఉపయోగించే పదం.
క్రింది కోడ్‌లను చూడండి.
కోడ్:
ఎంపిక స్పష్టమైన కాన్స్ట్ శామ్‌సంగ్ = 15000 కాన్స్ట్ వివో = 18000 కాన్స్ట్ రెడ్మి = 8500 కాన్స్ట్ ఒప్పో = 18500 సబ్ ఎనుమ్_ఎక్సాంపుల్ 1 () ఎండ్ సబ్
నేను కాన్స్ట్ పదాన్ని ఉపయోగించి మాడ్యూల్ పైభాగంలో వేరియబుల్స్ ప్రకటించాను.
కాన్ శాంసంగ్ = 15000
కాన్స్ట్ వివో = 18000
కాన్స్ట్ రెడ్మి = 8500
కాన్స్ట్ ఒప్పో = 18500
ఈ వేరియబుల్స్ అన్నీ మొబైల్ యొక్క గ్రూప్ సభ్యులని ఇప్పుడు నాకు తెలుసు. నేను ఈ వేరియబుల్స్ ఉపయోగించాలనుకుంటే మాడ్యూల్‌లో “వివో” అని చెప్పండి.
కోడ్:
సబ్ ఎనుమ్_ఎక్సాంపుల్ 1 () వి ఎండ్ సబ్
నేను “v” పాత్రను ప్రారంభించేటప్పుడు VBA యొక్క అనేక ఇతర విషయాలు వాటితో కలపడం నేను చూడగలను “v” అక్షరంతో ప్రారంభమయ్యే విషయాలు.
ఇక్కడే VBA “ఎన్యూమరేషన్స్” చిత్రం చిత్రంలోకి వస్తుంది.
మంచి అవగాహన కోసం సెల్ యొక్క నేపథ్య రంగును మార్చడానికి ప్రయత్నిద్దాం.
కోడ్:
ఉప Enum_Example1 () AcriveCell.Intior.Color = RGB ఎండ్ సబ్
పై కోడ్‌లో మీరు చూడగలిగినట్లుగా, VBA లో అందుబాటులో ఉన్న అన్ని RGB రంగులను మనం చూడవచ్చు. ఇవన్నీ అద్భుతమైన పేర్లతో స్థిరాంకాలు.
వాస్తవానికి, ఈ RGB రంగులు అన్నీ కుటుంబ గణనలో భాగం “xlRGBColor”.
కోడ్:
ఉప Enum_Example1 () AcriveCell.Intior.Color = xlrg ముగింపు ఉప
వాస్తవానికి ఈ VBA గణనలను ఉపయోగించడం ద్వారా, నేను ఈ గణనలోని అన్ని సమూహ సభ్యులకు ప్రాప్యత చేయగలను.
కోడ్:
ఉప Enum_Example1 () AcriveCell.Intior.Color = XlRgbColor. ఎండ్ సబ్
పై చిత్రంలో మనం చూడగలిగినట్లుగా మనం కలర్ కాంబినేషన్ మాత్రమే చూస్తాము. “VBA Enum” యొక్క సాధారణ అవలోకనం ఇదే.
సరే, ఇప్పుడు మేము మొబైల్ సమూహ సభ్యుల మా అసలు ఉదాహరణకి తిరిగి వెళ్తాము. RGB రంగు యొక్క సమూహ సభ్యులను మనం ఎలా చూశాము, అదేవిధంగా మేము VBA ఎనుమ్ స్టేట్మెంట్ ఉపయోగించి వేరియబుల్స్ ను డిక్లేర్ చేయవచ్చు.
కోడ్:
ఎనుమ్ మొబైల్స్ శామ్‌సంగ్ = 15000 వివో = 18000 రెడ్మి = 8500 ఒప్పో = 18500 ఎండ్ ఎనుమ్ సబ్ ఎనుమ్_ఎక్సాంపుల్ 1 () ఎండ్ సబ్
ఇప్పుడు నేను “ఎనమ్” స్టేట్‌మెంట్‌లను ఉపయోగించి “మొబైల్” సమూహం క్రింద అన్ని మొబైల్ బ్రాండ్‌లను ప్రకటించాను.
“మొబైల్స్” అనే గుంపు పేరును ఉపయోగించడం ద్వారా ఇప్పుడు నేను ఈ బ్రాండ్లన్నింటినీ మాడ్యూల్‌లో యాక్సెస్ చేయగలను.
కోడ్:
ఎనుమ్ మొబైల్స్ శామ్‌సంగ్ = 15000 వివో = 18000 రెడ్మి = 8500 ఒప్పో = 18500 ఎండ్ ఎనుమ్ సబ్ ఎనుమ్_ఎక్సాంపుల్ 1 () మోబ్ ఎండ్ సబ్
సమూహాన్ని ఎన్నుకోండి మరియు సమూహంలోని సభ్యులందరినీ చూడటానికి చుక్క ఉంచండి.
“మొబైల్స్” గుంపులోని సమూహ సభ్యులను మాత్రమే మనం చూడగలం. ఈ విధంగా మేము ఒకే పైకప్పు కింద వస్తువుల జాబితాను సమూహపరచడానికి VBA ఎన్యూమరేషన్లను ఉపయోగించవచ్చు.
డేటాను నిల్వ చేయడానికి VBA ఎన్యూమరేషన్ వేరియబుల్స్ ఉపయోగించడం
డిక్లేర్డ్ ఎనుమ్ వేరియబుల్స్ ఉపయోగించటానికి ఒక సాధారణ ఉదాహరణ చూద్దాం. ఎనుమ్ సమూహం పేరును “విభాగం” గా ప్రకటించండి మరియు విభాగం సభ్యుల పేర్లను సమూహ సభ్యునిగా చేర్చండి.
కోడ్:
ఎనుమ్ మొబైల్స్ ఫైనాన్స్ = 150000 హెచ్ఆర్ = 218000 సేల్స్ = 458500 మార్కెటింగ్ = 718500 ఎండ్ ఎనమ్ సబ్ ఎనుమ్_ఎక్సాంపుల్ 1 () ఎండ్ సబ్
ప్రతి విభాగం జీతం సంఖ్యలను వారి ముందు ప్రకటించాను.
ఇప్పుడు మేము ఈ సంఖ్యల విలువలను ఎక్సెల్ షీట్లో నిల్వ చేస్తాము. కోడ్‌ను వర్తించే ముందు క్రింద ఉన్న పట్టికను సృష్టించండి.
ఇప్పుడు విజువల్ బేసిక్ ఎడిటర్‌కి తిరిగి వెళ్లి సెల్ B2 ని ఉపయోగించి చూడండి రేంజ్ వస్తువు.
కోడ్:
ఉప Enum_Example1 () పరిధి ("B2"). విలువ = ముగింపు ఉప 
A2 సెల్ లో మనకు ఆర్థిక శాఖ ఉంది మరియు B2 సెల్ లో, మేము ఈ విభాగం యొక్క జీతం నిల్వ చేస్తాము. కాబట్టి మొదట గుంపు పేరును యాక్సెస్ చేయండి “విభాగం”.
కోడ్:
ఉప Enum_Example1 () పరిధి ("B2"). విలువ = Dep End Sub 
ఇప్పుడు ఈ గుంపులో, డిక్లేర్డ్ మాత్రమే చూడవచ్చు విభాగం పేర్లు.
కోడ్:
ఉప ఎనుమ్_ఉదాహరణ 1 () పరిధి ("బి 2"). విలువ = విభాగం. ఎండ్ సబ్ 
విభాగం పేరును ఎంచుకోండి “ఫైనాన్స్”.
కోడ్:
ఉప ఎనుమ్_ఉదాహరణ 1 () పరిధి ("బి 2"). విలువ = విభాగం. ఫైనాన్స్ ఎండ్ సబ్ 
అదేవిధంగా, మిగతా అన్ని కణాలకు సంబంధిత విభాగం పేర్లను ఎంచుకోండి.
కోడ్:
సబ్ ఎనుమ్_ఎక్సాంపుల్ 1 () రేంజ్ ("బి 2"). విలువ = డిపార్ట్మెంట్.ఫైనాన్స్ రేంజ్ ("బి 3"). విలువ = డిపార్ట్మెంట్. హెచ్ఆర్ రేంజ్ ("బి 4"). విలువ = డిపార్ట్మెంట్. మార్కెటింగ్ రేంజ్ ("బి 5"). విలువ = విభాగం సేల్స్ ఎండ్ సబ్ 
ఈ VBA కోడ్‌ను అమలు చేయండి ఈ విభాగాలకు కేటాయించిన జీతం మొత్తాన్ని పొందుతాము.
ఈ విధంగా మనం VBA Enum ను ఉపయోగించవచ్చు.
మీరు ఈ VBA ఎనుమ్ ఎక్సెల్ ను ఇక్కడ డౌన్‌లోడ్ చేసుకోవచ్చు. VBA ఎనుమ్ ఎక్సెల్ మూస
