VBA మాక్స్ ఫంక్షన్ | ఎక్సెల్ VBA లో గరిష్టంగా ఉపయోగించి గరిష్టంగా కనుగొనడం ఎలా?

మాక్స్, పేరు సూచించినట్లుగా, ఇచ్చిన డేటా సమితి లేదా శ్రేణి నుండి గరిష్ట విలువను కనుగొనటానికి ఉపయోగిస్తారు, ఇది వర్క్‌షీట్ ఫంక్షన్ కాబట్టి ఇది వర్క్‌షీట్ పద్ధతిలో వర్క్‌షీట్ ఫంక్షన్‌గా ఉపయోగించబడుతుంది, ఈ పద్ధతికి పరిమితి ఉంది ఫంక్షన్ శ్రేణిని వాదనగా తీసుకుంటుంది, శ్రేణిలో 30 విలువలు మాత్రమే ఉంటాయి.

ఎక్సెల్ VBA మాక్స్ ఫంక్షన్

ఎక్సెల్ లో మనకు అనేక సంఖ్యా విధులు ఉన్నాయి. మేము పరిధిలో సంఖ్యా విలువలను లెక్కించవచ్చు, మనం సంకలనం చేయవచ్చు మరియు కనీస విలువను అలాగే లాట్ యొక్క గరిష్ట విలువను కనుగొనవచ్చు. లాట్ యొక్క గరిష్ట విలువను కనుగొనడానికి మనకు MAX అని పిలువబడే ఎక్సెల్ ఫంక్షన్ ఉంది, ఇది సరఫరా చేయబడిన సంఖ్యల శ్రేణి యొక్క గరిష్ట విలువను అందిస్తుంది. VBA లో గరిష్ట సంఖ్యను పొందడానికి “MAX” అని పిలువబడే అంతర్నిర్మిత ఫంక్షన్ మాకు లేదు. ఈ ఎక్సెల్ VBA మాక్స్ ఫంక్షన్‌ను ఎలా ఉపయోగించాలో చూద్దాం.

ఎక్సెల్ VBA లో మాక్స్ ఫంక్షన్ యొక్క ఉదాహరణ

దురదృష్టవశాత్తు, VBA అంతర్నిర్మిత ఫంక్షన్‌గా MAX ను ఉపయోగించుకునే లగ్జరీ మాకు లేదు, కాని వర్క్‌షీట్ ఫంక్షన్ క్లాస్‌లో భాగంగా ఈ ఫంక్షన్‌ను యాక్సెస్ చేయవచ్చు.

ఇప్పుడు, క్రింది కోడ్ చూడండి.

కోడ్:

 ఉప MAX_Example1 () పూర్ణాంక మసకబారిన మసకగా మసకబారడం సి పూర్ణాంకం వలె మసకబారిన ఫలితం a = 50 b = 25 c = 60 ఫలితం = వర్క్‌షీట్ఫంక్షన్.మాక్స్ (a, b, c) MsgBox ఫలితం ముగింపు ఉప 

పై ఉదాహరణలో, నేను సంఖ్యను నిల్వ చేయడానికి మూడు వేరియబుల్స్ ప్రకటించాను.

డిమ్ ఎ యాస్ ఇంటీజర్డిమ్ బి యాస్ ఇంటీజర్డిమ్ సి యాస్ ఇంటీజర్

ఫలితాలను చూపించడానికి నేను మరో వేరియబుల్ ప్రకటించాను.

మసక ఫలితం పూర్ణాంకం.

మొదటి 3 మూడు వేరియబుల్స్ కోసం, నేను వరుసగా 50, 25 మరియు 60 వంటి విలువను కేటాయించాను.

a = 50b = 25c = 60

తరువాతి పంక్తిలో, ఫలితాన్ని వేరియబుల్ “ఫలితం” కు నిల్వ చేయడానికి నేను MAX ని VBA వర్క్‌షీట్ ఫంక్షన్ క్లాస్‌గా వర్తింపజేసాను.

ఫలితం = వర్క్‌షీట్ఫంక్షన్.మాక్స్ (ఎ, బి, సి)

చివరకు నేను VBA లోని సందేశ పెట్టెలో విలువను చూపిస్తున్నాను. MsgBox ఫలితం

ఇప్పుడు నేను ఈ కోడ్‌ను F5 ఉపయోగించి లేదా మానవీయంగా నడుపుతాను మరియు సందేశం పెట్టెలో ఫలితం ఏమిటో చూస్తాను.

కాబట్టి, ఫలితం 60.

సరఫరా చేసిన అన్ని సంఖ్యల నుండి, అంటే 50, 25 మరియు 60 నుండి, గరిష్ట సంఖ్య 60.

ఎక్సెల్ VBA లో మాక్స్ యొక్క అధునాతన ఉదాహరణ

అన్ని కణాల ద్వారా నడపడానికి మరియు ఫలితాన్ని చేరుకోవడానికి VBA లో ఉచ్చులు చాలా ముఖ్యమైనవి. సంఖ్యల జాబితా నుండి గరిష్ట విలువను చేరుకోవడానికి VBA MAX ను లూప్‌లతో ఎలా మిళితం చేయాలో చూద్దాం.

దిగువ చూపిన విధంగా నా వద్ద వస్తువుల జాబితా మరియు ఆ వస్తువుల నెలవారీ అమ్మకాల పనితీరు ఉన్నాయి.

ఇప్పుడు ప్రతి వస్తువు కోసం, చిత్రంలో చూపిన విధంగా 4 నెలల్లో గరిష్ట అమ్మకపు సంఖ్య ఏమిటో తెలుసుకోవాలనుకుంటున్నాను.

ఎక్సెల్ లో MAX ను వర్తింపజేయడం ద్వారా మేము దీన్ని కొన్ని సెకన్లలో కనుగొనవచ్చు.

VBA కోడ్‌ను ఉపయోగించడం ద్వారా గరిష్ట విలువను ఎలా కనుగొనాలో ఇప్పుడు మనం చూస్తాము.

క్రింద ఉన్న కోడ్ ప్రతి అంశానికి గరిష్ట సంఖ్యను కనుగొనే పనిని చేస్తుంది.

కోడ్:

 K = 2 నుండి 9 కణాలకు (k, 7) ఉప MAX_Example2 () మసకబారిన k. విలువ = వర్క్‌షీట్ఫంక్షన్.మాక్స్ (పరిధి ("A" & k & ":" & "E" & k)) తదుపరి k ముగింపు ఉప 

ఇది గరిష్ట సంఖ్యను సులభంగా గుర్తిస్తుంది.

ఇప్పుడు కోడ్‌ను మాన్యువల్‌గా రన్ చేయండి లేదా ఎఫ్ 5 కీని నొక్కండి మరియు క్రింద చూపిన విధంగా ఫలితాన్ని చూడండి.

గరిష్ట విలువలను పొందడానికి నెల పేరు క్రింది కోడ్‌ను ఉపయోగించండి.

కోడ్:

 K = 2 నుండి 9 కణాలకు (k, 7) ఉప MAX_Example2 () మసకబారిన k. విలువ = వర్క్‌షీట్ఫంక్షన్.మాక్స్ (పరిధి ("B" & k & ":" & "E" & k)) కణాలు (k, 8) .వాల్యూ = వర్క్‌షీట్ఫంక్షన్.ఇండెక్స్ (రేంజ్ ("బి 1: ఇ 1"), వర్క్‌షీట్ఫంక్షన్.మ్యాచ్ _ (కణాలు (కె, 7). విలువ, పరిధి ("బి" & కె & ":" & "ఇ" & కె) )) తదుపరి k ఎండ్ సబ్ 

VBA గరిష్ట ఫంక్షన్ అందించిన విలువ ఆధారంగా, INDEX ఫంక్షన్ & MATCH ఫంక్షన్ తదుపరి నెలలో అనుబంధ నెలను తిరిగి ఇస్తుంది.

గుర్తుంచుకోవలసిన విషయాలు

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

మీరు ఈ ఎక్సెల్ మూసను ఇక్కడ డౌన్‌లోడ్ చేసుకోవచ్చు - VBA మాక్స్ ఫంక్షన్ మూస