VBA அதிகபட்ச செயல்பாடு | எக்செல் விபிஏவில் அதிகபட்சத்தைப் பயன்படுத்தி அதிகபட்சத்தைக் கண்டுபிடிப்பது எப்படி?

மேக்ஸ், பெயர் குறிப்பிடுவது போல, கொடுக்கப்பட்ட தரவு தொகுப்பு அல்லது வரிசையிலிருந்து அதிகபட்ச மதிப்பைக் கண்டறியப் பயன்படுகிறது, இது ஒரு பணித்தாள் செயல்பாடு, எனவே இது பணித்தாள் முறையுடன் பணித்தாள் செயல்பாடாகப் பயன்படுத்தப்படுகிறது, இந்த முறைக்கு ஒரு வரம்பு உள்ளது செயல்பாடு ஒரு வரிசையை ஒரு வாதமாக எடுத்துக்கொள்கிறது, வரிசையில் 30 மதிப்புகள் மட்டுமே இருக்க முடியும்.

எக்செல் விபிஏ அதிகபட்ச செயல்பாடு

எக்செல் இல் எங்களுக்கு பல எண் செயல்பாடுகள் உள்ளன. வரம்பில் எண்ணியல் மதிப்புகளை நாம் எண்ணலாம், நாம் தொகுக்கலாம், மேலும் குறைந்தபட்ச மதிப்பையும், அதிகபட்ச மதிப்பையும் காணலாம். லாட்டின் அதிகபட்ச மதிப்பைக் கண்டுபிடிக்க, MAX எனப்படும் எக்செல் செயல்பாடு உள்ளது, இது வழங்கப்பட்ட எண்களின் வரம்பின் அதிகபட்ச மதிப்பைத் தரும். VBA இல், அதிகபட்ச எண்ணிக்கையைப் பெற “MAX” எனப்படும் உள்ளமைக்கப்பட்ட செயல்பாடு எதுவும் எங்களிடம் இல்லை. இந்த எக்செல் விபிஏ மேக்ஸ் செயல்பாட்டை எவ்வாறு பயன்படுத்துவது என்று பார்ப்போம்.

எக்செல் விபிஏவில் அதிகபட்ச செயல்பாட்டின் எடுத்துக்காட்டு

துரதிர்ஷ்டவசமாக, 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 முடிவு துணை 

இது அதிகபட்ச எண்ணிக்கையை எளிதில் அடையாளம் காணும்.

இப்போது குறியீட்டை கைமுறையாக இயக்கவும் அல்லது F5 விசையை அழுத்தி கீழே காட்டப்பட்டுள்ளபடி முடிவைக் காண்க.

அதிகபட்ச மதிப்புகளைப் பெற மாதத்தின் பெயர் கீழே உள்ள குறியீட்டைப் பயன்படுத்தவும்.

குறியீடு:

 K = 2 முதல் 9 கலங்களுக்கு (k, 7) முழு MAX_Example2 () மங்கலான k. மதிப்பு = பணித்தாள் செயல்பாடு.மேக்ஸ் (வரம்பு ("B" & k & ":" & "E" & k)) கலங்கள் (k, 8). மதிப்பு = பணித்தாள் செயல்பாடு.இண்டெக்ஸ் (வரம்பு ("பி 1: இ 1"), பணித்தாள் செயல்பாடு.மட்ச் _ (கலங்கள் (கே, 7). மதிப்பு, வரம்பு ("பி" & கே & ":" & "ஈ" & கே) )) அடுத்த கே எண்ட் சப் 

VBA அதிகபட்ச செயல்பாடு வழங்கிய மதிப்பின் அடிப்படையில், INDEX செயல்பாடு & MATCH செயல்பாடு தொடர்புடைய வரியை அடுத்த வரியில் வழங்கும்.

நினைவில் கொள்ள வேண்டிய விஷயங்கள்

  • அவற்றின் நகல் எண் இருந்தால், அது முதலில் வரும் ஒரு எண்ணை மட்டுமே காண்பிக்கும்.
  • இது எக்செல் இல் MIN செயல்பாட்டின் எதிர் சூத்திரமாகும்.
  • MAX ஒரு VBA செயல்பாடு அல்ல, இது எக்செல் இல் உள்ளமைக்கப்பட்ட செயல்பாடு, எனவே பணித்தாள் செயல்பாட்டு வகுப்பைப் பயன்படுத்துகிறது.

இந்த எக்செல் வார்ப்புருவை இங்கே பதிவிறக்கம் செய்யலாம் - விபிஏ மேக்ஸ் செயல்பாட்டு வார்ப்புரு