300 எடுத்துக்காட்டுகள்

இரண்டாவது மிக உயர்ந்த மதிப்பைக் கண்டறியவும்

Find Second Highest Value

கீழே ஒரு நிரலைப் பார்ப்போம் எக்செல் வி.பி.ஏ. அந்த இரண்டாவது மிக உயர்ந்த மதிப்பைக் காண்கிறது .

நிலைமை:



இரண்டு தேதிகளுக்கு இடையிலான ஆண்டுகளின் எண்ணிக்கை

எக்செல் விபிஏவில் இரண்டாவது மிக உயர்ந்த மதிப்பைக் கண்டறியவும்



1. முதலில், இரண்டு ரேஞ்ச் பொருள்கள் மற்றும் இரட்டை வகை இரண்டு மாறிகள் என்று அறிவிக்கிறோம். நாங்கள் ரேஞ்ச் பொருள்களை rng மற்றும் cell என்று அழைக்கிறோம். ஒரு இரட்டை மாறி நாம் மிக உயர்ந்த மதிப்பு என்றும், ஒரு இரட்டை மாறி இரண்டாவது வினாடி மிக உயர்ந்த மதிப்பு என்றும் அழைக்கிறோம்.

எதுவுமில்லைrngஎனவரம்பு, செல்எனசரகம்
எதுவுமில்லைமிக உயர்ந்த மதிப்புஎன இரட்டை, secondHighestValueஎன இரட்டை

2. நாங்கள் ரேஞ்ச் ஆப்ஜெக்ட் rng ஐ தேர்ந்தெடுக்கப்பட்ட வரம்போடு துவக்குகிறோம் மற்றும் மதிப்பு 0 உடன் இரண்டு இரட்டை மாறிகள்.



அமைrng = தேர்வு
highValue = 0
secondHighestValue = 0

3. முதலில், மிக உயர்ந்த மதிப்பைக் கண்டுபிடிக்க விரும்புகிறோம். ஒவ்வொரு கலத்தையும் தோராயமாக தேர்ந்தெடுக்கப்பட்ட வரம்பில் சரிபார்க்க விரும்புகிறோம் (இந்த வரம்பு எந்த அளவிலும் இருக்கலாம்). எக்செல் வி.பி.ஏ இல், இதற்காக நீங்கள் ஒவ்வொரு அடுத்த லூப்பையும் பயன்படுத்தலாம். பின்வரும் குறியீடு வரிகளைச் சேர்க்கவும்:

'உயர்ந்த மதிப்பைக் கண்டறியவும்
க்கு ஒவ்வொன்றும்செல்இல்rng

அடுத்ததுசெல்

குறிப்பு: rng மற்றும் செல் தோராயமாக இங்கே தேர்ந்தெடுக்கப்பட்டன, நீங்கள் எந்த பெயர்களையும் பயன்படுத்தலாம். உங்கள் குறியீட்டின் மீதமுள்ள இந்த பெயர்களைக் குறிப்பிட நினைவில் கொள்க. பச்சைக் கோடு ஒரு கருத்து மற்றும் இந்த குறியீட்டைப் பற்றிய தகவல்களை வழங்க மட்டுமே இங்கு சேர்க்கப்பட்டுள்ளது.

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



என்றால்cell.Value> மிக உயர்ந்த மதிப்புபிறகுhighValue = cell.Value

குறிப்பு: முதல் மதிப்பு எப்போதும் உயர்ந்த மதிப்பை விட அதிகமாக இருக்கும், ஏனெனில் மிக உயர்ந்த மதிப்பின் தொடக்க மதிப்பு 0 ஆகும்.

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

தேதி வேறுபாட்டைக் கணக்கிட எக்செல் சூத்திரம்
'இரண்டாவது மிக உயர்ந்த மதிப்பைக் கண்டறியவும்
க்கு ஒவ்வொன்றும்செல்இல்rng

அடுத்ததுசெல்

6. தேர்ந்தெடுக்கப்பட்ட வரம்பில் உள்ள ஒவ்வொரு கலத்தையும் மீண்டும் சரிபார்க்கிறோம். இது இரண்டாவது மிக உயர்ந்த மதிப்பை விட உயர்ந்ததாகவும், மிக உயர்ந்த மதிப்பை விடக் குறைவாகவும் இருந்தால், மதிப்பை மாறி இரண்டாவது ஹைஜெஸ்ட்வல்யூவுக்கு எழுதுகிறோம். பின்வரும் குறியீட்டு வரியை வளையத்தில் சேர்க்கவும்.

என்றால்cell.Value> secondHighestValueமற்றும்cell.ValueபிறகுsecondHighestValue = cell.Value

7. இறுதியாக, ஒரு MsgBox ஐப் பயன்படுத்தி இரண்டாவது மிக உயர்ந்த மதிப்பைக் காண்பிப்போம்.

MsgBox 'இரண்டாவது மிக உயர்ந்த மதிப்பு' & secondHighestValue

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

விளைவாக:

இரண்டாவது அதிகபட்ச மதிப்பு முடிவைக் கண்டறியவும்

7/9 முடிந்தது! அறிக்கைகள் என்றால் மேலும் அறிக
அடுத்த அத்தியாயத்திற்குச் செல்லவும்: கண்ணி



^