கீழே உள்ள ஒரு நிரலைப் பார்ப்போம் எக்செல் VBA அந்த தோராயமாக தரவுகளை வரிசைப்படுத்துகிறது (இந்த உதாரணத்தில் தோராயமாக பெயர்களை வரிசைப்படுத்துகிறது).
நிலைமை:
1. முதலில், நாம் நான்கு மாறிகளை அறிவிக்கிறோம். நாம் TempString எனப்படும் ஒரு வகை சரம், நாம் TempInteger எனப்படும் முழு எண்ணின் ஒரு மாறுபாடு, நாம் அழைக்கும் முழு எண்ணின் ஒரு மாறுபாடு மற்றும் j என அழைக்கப்படும் ஒரு முழு எண்.
ஒன்றுமில்லைtempStringஎன லேசான கயிறு, tempIntegerஎன முழு, நான்என முழு, ஜெஎன முழு2. நெடுவரிசை B க்கு 5 சீரற்ற எண்களை எழுதுகிறோம் (ஒவ்வொரு பெயருக்கும் ஒன்று). இதற்காக RandBetween என்ற பணித்தாள் செயல்பாட்டைப் பயன்படுத்துகிறோம்.
க்கானi = 1க்கு5
செல்கள் (i, 2). மதிப்பு = பணித்தாள் செயல்பாடு. RandBetween (0, 1000)
அடுத்ததுநான்
இதுவரை முடிவு:
# n / எக்செல் பிழை
பெயர்களை வரிசைப்படுத்த ஒவ்வொரு பெயருக்கும் அடுத்த எண்களை பயன்படுத்துவோம். முதலில் குறைந்த எண் கொண்ட பெயர், இரண்டாவது குறைந்த எண், இரண்டாவது போன்ற பெயர்.
3. நாங்கள் a ஐத் தொடங்குகிறோம் இரட்டை வளையம் .
எக்செல் இல் மாத சூத்திரத்தைப் பயன்படுத்துவது எப்படிக்கானi = 1க்கு5
க்கானj = i + 1க்கு5
4. பின்வரும் குறியீடு வரியைச் சேர்க்கவும்:
என்றால்செல்கள் (j, 2). மதிப்புஎடுத்துக்காட்டு: i = 1 மற்றும் j = 2 க்கு, வென்டி மற்றும் ரிச்சர்ட் ஒப்பிடப்படுகிறது. ரிச்சர்டுக்கு குறைந்த எண்ணிக்கை இருப்பதால், நாங்கள் வென்டி மற்றும் ரிச்சர்டை மாற்றுகிறோம். ரிச்சர்ட் இப்போது முதல் இடத்தில் உள்ளார். I = 1 மற்றும் j = 3 க்கு, ரிச்சர்ட் மற்றும் ஜூஸ்ட் ஒப்பிடப்படுகிறது. ஜூஸ்ட் அதிக எண்ணிக்கையைக் கொண்டிருப்பதால் எதுவும் நடக்காது. இந்த வழியில், எக்செல் VBA முதல் இடத்தில் குறைந்த எண்ணுடன் பெயரைப் பெறுகிறது. I = 2 க்கு, எக்செல் VBA இரண்டாவது இடத்தில் இரண்டாவது குறைந்த எண்ணுடன் பெயரைப் பெறுகிறது.
5. உண்மையாக இருந்தால், நாங்கள் இடமாற்றம் பெயர்கள்.
tempString = செல்கள் (i, 1). மதிப்புசெல்கள் (i, 1). மதிப்பு = செல்கள் (j, 1). மதிப்பு
செல்கள் (j, 1). மதிப்பு = tempString
6. நாங்கள் எண்களை மாற்றுகிறோம்.
tempInteger = செல்கள் (i, 2). மதிப்புசெல்கள் (i, 2). மதிப்பு = செல்கள் (j, 2). மதிப்பு
செல்கள் (j, 2). மதிப்பு = tempInteger
7. If அறிக்கையை மூட மறக்காதீர்கள்.
முடிவு என்றால்8. இரண்டு சுழல்களையும் மூட மறக்காதீர்கள்.
அடுத்ததுஜெஅடுத்ததுநான்
9. திட்டத்தை சோதிக்கவும்.
எக்செல் இல் தற்போதைய தேதி மற்றும் நேரத்தை செருகவும்
விளைவாக:
கவனம் இருப்பினும், விளக்க நோக்கத்திற்காக தாளில் மதிப்புகளை வைக்க நாங்கள் தேர்வு செய்துள்ளோம்.
அடுத்த அத்தியாயத்திற்குச் செல்லவும்: மேக்ரோ பிழைகள்
