உள்ளடக்க அட்டவணை
எங்கள் எக்செல் பணிப்புத்தகத்தில் பெரிய தரவுத்தொகுப்பு இருக்கும்போது, சில நேரங்களில் நாம் பெற விரும்பும் குறிப்பிட்ட முடிவுகளைப் பிரித்தெடுக்க வரிசைகள் மூலம் லூப் செய்தால் வசதியாக இருக்கும். VBA ஐச் செயல்படுத்துவது எக்செல் இல் எந்தவொரு செயலையும் இயக்குவதற்கு மிகவும் பயனுள்ள, விரைவான மற்றும் பாதுகாப்பான முறையாகும். இந்தக் கட்டுரையில், எக்செல் இல் VBA மேக்ரோ மூலம் ஒரு அட்டவணையின் வரிசைகளை எப்படிப் பார்ப்பது என்பது பற்றிய 11 வெவ்வேறு முறைகளைக் காண்பிப்போம்.
பணிப்புத்தகத்தைப் பதிவிறக்கவும்
இங்கிருந்து இலவச பயிற்சி எக்செல் பணிப்புத்தகத்தை பதிவிறக்கம் செய்யலாம்.
VBA.xlsm உடன் அட்டவணையின் வரிசைகள் மூலம் லூப் செய்யவும்
எக்செல் இல் உள்ள அட்டவணையின் வரிசைகள் வழியாக லூப் செய்ய VBA உடன் 11 முறைகள்
இந்தப் பகுதியைப் பின்பற்றி, 11 வெவ்வேறு முறைகளுடன் ஒரு அட்டவணையின் வரிசைகளை எப்படிச் சுழற்றுவது என்பதை நீங்கள் கற்றுக்கொள்வீர்கள். ஒரு வெற்று செல் வரை வரிசைகள் வழியாக லூப், ஒரு குறிப்பிட்ட மதிப்பு கண்டறியப்படும் வரை வரிசைகள் வழியாக லூப், வரிசைகள் வழியாக லூப் மற்றும் ஒரு குறிப்பிட்ட கலத்தை வண்ணம் போன்ற. எக்செல் இல் VBA மேக்ரோ.
<8.
மேலே கொடுக்கப்பட்டுள்ள தரவுத்தொகுப்பு முறைகளை விவரிக்க இந்தக் கட்டுரை பின்பற்றும்.
1. உங்கள் எக்செல் ஒர்க்ஷீட்டில் ஒரு அட்டவணையின் ஒவ்வொரு வரிசையிலும் உள்ள ஒவ்வொரு கலத்தையும் லூப் செய்ய விரும்பினால், ஒரு டேபிளின் ஒவ்வொரு வரிசையிலும் உள்ள ஒவ்வொரு கலத்தின் வழியாகவும் VBA ஐ உட்பொதிக்கவும். மற்றும் செல் குறிப்பு எண்ணை திரும்ப மதிப்பாகப் பெறவும் , பின்னர் கீழே விவாதிக்கப்பட்ட படிகளைப் பின்பற்றவும்.
படிகள்:
- ஆரம்பத்தில் , உங்கள் கீபோர்டில் Alt + F11 ஐ அழுத்தவும் அல்லது செல்லவும்variable.
3028
இந்தக் குறியீடு 1 முதல் 15 வரையிலான வரிசைகள் வழியாகச் சுழலுவதற்கு இங்கே உள்ளது. அதில் “ Edge ” என்ற குறிப்பிட்ட வார்த்தையைக் கண்டறிந்தால், அந்தச் சொல்லை வைத்திருக்கும் கலத்திற்கு வண்ணம் கொடுக்கிறது. வரிசைகள் 1 முதல் 15 வரையிலான அனைத்து தரவையும் ஸ்கேன் செய்து முடிக்கும் வரை, இந்த வார்த்தையைத் தேடும் வரை இது தொடர்ந்து செய்கிறது.
மேலும் படிக்க: VLOOKUP அட்டவணை வரிசையை எவ்வாறு பயன்படுத்துவது Excel இல் செல் மதிப்பு
இதே மாதிரியான அளவீடுகள்
- TABLE செயல்பாடு Excel இல் உள்ளதா?
- எக்செல் இல் அட்டவணையை பட்டியலிடுவது எப்படி (3 விரைவான வழிகள்)
- எக்செல் இல் வரம்பை அட்டவணையாக மாற்றுவது (5 எளிதான முறைகள்)
- எக்செல் டேபிளில் ஃபார்முலாவை திறம்பட பயன்படுத்தவும் (4 எடுத்துக்காட்டுகளுடன்)
- எக்செல் டேபிள் பெயர்: நீங்கள் தெரிந்து கொள்ள வேண்டிய அனைத்தும்
7. ஒவ்வொரு வரிசையிலும் லூப் செய்ய VBA ஐ செயல்படுத்தவும் மற்றும் எக்செல்
ல் உள்ள ஒவ்வொரு ஒற்றைப்படை வரிசையையும் வண்ணமயமாக்கவும். இந்தப் பிரிவில், எக்செல் இல் விபிஏ மேக்ரோவைக் கொண்டு ஒரு அட்டவணையின் ஒவ்வொரு வரிசையிலும் லூப் செய்வது மற்றும் ஒவ்வொரு ஒற்றைப்படை வரிசையை வண்ணமாக்குவது எப்படி என்பதைக் கற்றுக்கொள்வோம்.
செயல்முறையைச் செயல்படுத்துவதற்கான படிகள் கீழே விவரிக்கப்பட்டுள்ளன.
படிகள்:
- முன் காட்டப்பட்டுள்ளபடி, டெவலப்பர் இலிருந்து விஷுவல் பேசிக் எடிட்டரை திறக்கவும் tab மற்றும் குறியீடு சாளரத்தில் செருகு ஒரு தொகுதி குறியீடு சாளரம்.
5358
உங்கள் குறியீடு இப்போது இயங்கத் தயாராக உள்ளது.
மேலும் பார்க்கவும்: எக்செல் தரவு அட்டவணையின் எடுத்துக்காட்டு (6 அளவுகோல்கள்)- இப்போது, இயக்கு மேக்ரோ மற்றும் வெளியீட்டைக் காண பின்வரும் படத்தைப் பார்க்கவும்.
எல்லா ஒற்றைப்படை எண் வரிசைகளும் வண்ணத்தில் உள்ளன பணித்தாளின் அட்டவணையில் உள்ள அனைத்து வரிசைகளையும் சுழற்றிய பிறகு.
VBA குறியீடு விளக்கம்
9447
மாறியை வரையறுக்கவும்.
2041
நாம் வேலை செய்யும் வரம்பை வரையறுக்கவும்.
3213
குறியீட்டின் இந்தப் பகுதியானது, தற்போதைய வரிசையின் அடுத்த வரிசையில் இருந்து தொடங்கி, அனைத்து வரிசைகளிலும் மறு செய்கையைக் குறிக்கிறது, B4 . வரிசை எண்களை 2 ஆல் வகுக்கும் மோட் ஒரு முழு எண் வகையில் சேமிக்கப்பட்ட திரும்பிய வரிசை எண்ணுக்கு சமமாக இருந்தால், இந்தக் குறியீடு குறியீட்டில் வழங்கப்பட்ட வண்ணக் குறியீட்டைக் கொண்டு கணக்கீட்டின் மூலம் பிரித்தெடுக்கப்பட்ட அனைத்து வரிசைகளையும் வண்ணமயமாக்குகிறது. இது வரம்பின் முடிவை அடையும் வரை எல்லா வரிசைகளிலும் நகர்ந்து கொண்டே இருக்கும்.
8. எக்செல்
ல் உள்ள ஒவ்வொரு இரட்டை வரிசைகளையும் வரிசைகள் மற்றும் வண்ணங்களில் லூப் செய்ய VBA செயல்படுத்தவும். இந்தப் பிரிவில், எக்செல் இல் உள்ள VBA மேக்ரோ மூலம் ஒரு அட்டவணையின் ஒவ்வொரு வரிசையையும் எப்படிச் சுழற்றுவது மற்றும் ஒவ்வொரு இரட்டை வரிசையையும் வண்ணமயமாக்குவது எப்படி என்பதைக் கற்றுக்கொள்வோம்.
செயல்முறையை செயல்படுத்துவதற்கான படிகள் கீழே விவாதிக்கப்பட்டுள்ளன.<3
படிகள்:
- முதலில், டெவலப்பர் தாவலில் இருந்து விஷுவல் பேசிக் எடிட்டரை திறந்து செருகு ஒரு தொகுதி குறியீடு சாளரத்தில்.
- பின், பின்வரும் குறியீட்டை நகலெடு மற்றும் ஒட்டு குறியீடு சாளரத்தில். 14>
6607
உங்கள் குறியீடு இப்போது தயாராக உள்ளதுஇயக்கவும்.
- அடுத்து, இயக்கு மேக்ரோ மற்றும் முடிவைப் பார்க்க பின்வரும் படத்தைப் பார்க்கவும்.
அனைத்து இரட்டை எண் கொண்ட வரிசைகளும் பணித்தாளின் அட்டவணையில் உள்ள அனைத்து வரிசைகளிலும் சுழற்றிய பிறகு.
VBA குறியீட்டு விளக்கம்
2082
மாறியை வரையறுக்கவும்.
7355
நாம் வேலை செய்யும் வரம்பை வரையறுக்கவும்.
6018
இந்தக் குறியீடு பின் மீண்டும் தொடங்கும் தற்போதைய வரிசையில் இருந்து மூன்று வரிசைகள், B4 . இது முதலில் அதை வண்ணமயமாக்குகிறது, பின்னர் வரிசை எண்ணிக்கையை 2 ஆல் அதிகரிக்கிறது மற்றும் தரவுத்தொகுப்பின் கடைசி வரிசையை அடையும் வரை அதை வண்ணமயமாக்குகிறது.
9. எக்செல்
இல் உள்ள வெற்று செல் வரை வரிசைகள் மூலம் திரும்பத் திரும்ப மேக்ரோவைப் பயன்படுத்துங்கள்
உங்கள் குறியீடு செயல்பட வேண்டுமெனில், அது அட்டவணையின் அனைத்து வரிசைகளிலும் சுழன்று, வெற்றுக் கலத்தை அடைந்ததும் நிறுத்தப்படும் , இந்த பகுதி உங்களுக்கானது. எக்செல் VBA இல் FOR Loop மற்றும் Do-Until Loop ஆகிய இரண்டையும் கொண்டு அந்த பணியை நீங்கள் செயல்படுத்தலாம்.
9.1. FOR Loop உடன்
VBA Excel இல் FOR Loop உள்ள வெற்று செல் வரை ஒரு அட்டவணையில் வரிசைகள் வழியாக லூப் செய்வதற்கான படிகள் கீழே கொடுக்கப்பட்டுள்ளன.
படிகள்:
- முதலில், டெவலப்பர் தாவலில் இருந்து விஷுவல் பேசிக் எடிட்டரை திறந்து செருகு ஒரு தொகுதி குறியீடு சாளரத்தில்.
- அதன் பிறகு, பின்வரும் குறியீட்டை நகல் செய்து ஒட்டு குறியீடு சாளரத்தில். 14>
1560
உங்கள் குறியீடு இப்போது இயங்கத் தயாராக உள்ளது.
- பின், இயக்கு மேக்ரோ மற்றும் முடிவு கீழே உள்ள gif இல் காட்டப்பட்டுள்ளது.
மேக்ரோவை இயக்கிய பிறகு, அட்டவணையில் உள்ள அனைத்து வரிசைகளிலும் சுழலத் தொடங்கியது. அது வெற்று செல், செல் B8 ஐ அடைந்ததும், அது மறு செய்கையை நிறுத்தியது .
VBA குறியீடு விளக்கம் 3>
5937
மாறியை வரையறுக்கவும்.
9813
திரையைப் புதுப்பிக்கும் நிகழ்வை அணைக்கவும்.
4784
செல் B4 இலிருந்து தொடங்கி கடைசி வரை அனைத்து வரிசைகளையும் சேமிக்கவும்.
3568
Cell B4 என்பதைத் தேர்ந்தெடுக்கவும்.
4826
இந்தக் குறியீடு அனைத்து வரிசைகளிலும் சுழலத் தொடங்குகிறது. அது ஒரு வரிசையில் காலியான கலத்தைக் கண்டறிந்தால், அதைத் தேர்ந்தெடுத்து, அது இறுதி வரை வரிசைகளை ஸ்கேன் செய்து கொண்டே இருக்கும்.
5007
திரையைப் புதுப்பிக்கும் நிகழ்வை இயக்கவும்.
9.2. Do-Until Loop உடன்
VBA இல் Do-Until loop உள்ள வெற்று கலம் வரை வரிசைகள் வழியாக லூப் செய்வதற்கான படிகள் கீழே கொடுக்கப்பட்டுள்ளன.
படிகள்:
- முதலில், டெவலப்பர் தாவலில் இருந்து விஷுவல் பேசிக் எடிட்டரை திறந்து செருகு a குறியீடு சாளரத்தில் தொகுதி .
- பின், பின்வரும் குறியீட்டை நகலெடு செய்து ஒட்டு குறியீடு சாளரத்தில்.
6222
உங்கள் குறியீடு இப்போது இயங்கத் தயாராக உள்ளது.
- பின்னர், இயக்க மேக்ரோ. முடிவு பின்வரும் gif இல் காட்டப்பட்டுள்ளது.
மேக்ரோவை இயக்கிய பிறகு, அது அனைத்து வரிசைகளிலும் அட்டவணை மற்றும் ஒருமுறை சுழலத் தொடங்கியது. அது வெற்று செல், செல் B8 ஐ அடைந்தது, அது மறு செய்கையை நிறுத்தியது .
VBA குறியீடுவிளக்கம்
8827
நாம் வேலை செய்யும் கலத்தைத் தேர்ந்தெடுங்கள்.
2968
தொடங்குகிறது மற்றும் காலியான செல் கண்டுபிடிக்கப்படும் வரை தொடர்ந்து லூப்பிங் செய்யும்.
1267
வெற்றுக் கலம் இருக்கும் போது ஒரு வரிசையில் காணப்பட்டது, அதைத் தேர்ந்தெடுத்து மறு செய்கையை நிறுத்தவும்.
10. எக்செல்
இல் பல வெற்று செல்கள் வரை வரிசைகள் மூலம் மீண்டும் மீண்டும் செய்ய VBA மேக்ரோ
முந்தைய பகுதியில், காலியான செல் கண்டறியப்பட்டால் லூப்பை நிறுத்துவது எப்படி என்பதை நீங்கள் கற்றுக்கொண்டீர்கள். ஆனால் ஒன்றுக்கு பதிலாக பல வெற்று செல்கள் கிடைக்கும் வரை நீங்கள் மறு செய்கையை நிறுத்த விரும்பவில்லை என்றால் என்ன செய்வது உடன் VBA Excel கீழே காட்டப்பட்டுள்ளது.
படிகள்:
- முதலில், விஷுவல் பேசிக் எடிட்டரை திறக்கவும் குறியீடு சாளரத்தில் டெவலப்பர் தாவல் மற்றும் செருகு தொகுதி .
- பின், நகல் பின்வரும் குறியீடு மற்றும் ஒட்டு குறியீடு சாளரத்தில்.
3792
உங்கள் குறியீடு இப்போது இயக்கத் தயாராக உள்ளது.
- இப்போது, மேக்ரோவை இயக்கவும் மற்றும் வெளியீட்டிற்கான பின்வரும் gif ஐப் பார்க்கவும்.
மேக்ரோவை இயக்கிய பிறகு, அது இல் நிற்கவில்லை முதல் வெற்று செல், செல் B8 . செல் B16 இல் தொடர்ச்சியான இரண்டு வெற்று செல்களைக் கண்டறிந்ததும் அது நிறுத்தப்பட்டது.
VBA குறியீடு விளக்கம்
3002
கலத்தைத் தேர்ந்தெடுக்கவும் அதில் இருந்து செயல்படுவோம்அதைத் தேர்ந்தெடுத்து மறு செய்கையை நிறுத்தவும்.
11. எக்செல் இல் காலியாக இருக்கும் வரை அனைத்து நெடுவரிசைகளையும் இணைப்பதன் மூலம் VBA ஐ லூப் டூ லூப் செய்யவும் VBA Excel உடன் காணப்படுகிறது.
எக்செல் இல் VBA மேக்ரோ மூலம் அதை எப்படி செய்வது என்று கற்றுக்கொள்வோம்.
படிகள்:
- முதலில், டெவலப்பர் தாவலில் இருந்து விஷுவல் பேசிக் எடிட்டரை திறந்து செருகு தொகுதி குறியீடு சாளரத்தில்.
- பின், பின்வரும் குறியீட்டை நகலெடு மற்றும் ஒட்டு குறியீடு சாளரத்தில்.
5925
உங்கள் குறியீடு இப்போது இயக்கத் தயாராக உள்ளது.
- பின்னர், மேக்ரோவை இயக்கி, பின்வரும் gifஐப் பார்க்கவும்.
மேலே உள்ள gif இல் இருந்து நீங்கள் பார்ப்பது போல், ஒரு பாப்-அப் MsgBox உள்ளது, இது ஒவ்வொன்றிலும் உள்ள அனைத்து நெடுவரிசைகளின் ஒருங்கிணைந்த மதிப்பைக் காட்டுகிறது உங்கள் எக்செல் பணித்தாளின் அட்டவணையில் இருந்து வரிசை . ஆனால் வெற்று கலத்தை அடைந்தவுடன் நிறுத்தப்பட்டது .
VBA குறியீடு விளக்கம்
4121
மாறிகளை வரையறுக்கவும்.
3416
நாங்கள் பணிபுரியும் தாள் பெயரை அமைக்கவும் (“ ConcatenatingAllColUntilBlank ” என்பது பணிப்புத்தகத்தில் உள்ள தாள் பெயர்).
7567
நாம் வேலை செய்யும் வரம்பை வரையறுக்கவும்.
9914
இந்தக் குறியீடு வரிசையுடன் வளையத்தைத் தொடங்குகிறது. இது வரிசையின் மிகப்பெரிய சப்ஸ்கிரிப்டையும் மற்றும் கீழ் வரம்பையும் வழங்கும் வரை லூப் தொடர்கிறதுமுதல் பரிமாணம். பின்னர் அது இரண்டாவது பரிமாணத்தின் கீழ் எல்லையை பிரித்தெடுக்கும் மறு செய்கைக்குள் நுழைகிறது. அதன் பிறகு, பிரித்தெடுக்கப்பட்ட அனைத்து மதிப்புகளையும் iResult மாறியில் ஒருங்கிணைத்து, முடிவை MsgBox இல் எறிந்து அனுப்புகிறது. அது காலியான கலத்தைக் கண்டுபிடிக்கும் வரை அதைச் செய்து கொண்டே இருக்கும்.
முடிவு
முடிவிற்கு, வரிசைகள் வழியாக லூப் செய்வது எப்படி என்பது குறித்த 11 பயனுள்ள முறைகளை இந்தக் கட்டுரை உங்களுக்குக் காட்டுகிறது. VBA மேக்ரோ உடன் Excel இல் ஒரு அட்டவணை . இந்த கட்டுரை உங்களுக்கு மிகவும் பயனுள்ளதாக இருந்தது என்று நம்புகிறேன். தலைப்பைப் பற்றி ஏதேனும் கேள்விகள் கேட்கலாம்.
தாவலுக்கு டெவலப்பர் -> விஷுவல் பேசிக் எடிட்டரை திறக்க விஷுவல் பேசிக் .
- அடுத்து, பாப்-அப் குறியீடு சாளரத்தில், மெனு பட்டியில், செருகு -> தொகுதி .
- பின், பின்வரும் குறியீட்டை நகல் செய்து அதை குறியீட்டில் ஒட்டவும் window.
2162
உங்கள் குறியீடு இப்போது இயக்கத் தயாராக உள்ளது விசைப்பலகை அல்லது மெனு பட்டியில் இருந்து Run -> துணை/பயனர் படிவத்தை இயக்கவும். மேக்ரோவை இயக்க துணை மெனு பட்டியில் உள்ள சிறிய ப்ளே ஐகானை கிளிக் செய்யலாம்.
- அல்லது தரவுத்தொகுப்பையும் முடிவையும் பார்வையிட்டு ஒப்பிட்டுப் பார்க்கவும், நீங்கள் குறியீட்டை சேமித்து மற்றும் ஆர்வமுள்ள ஒர்க் ஷீட்டிற்கு திரும்பிச் செல்லலாம்.
- அங்கிருந்து, நீங்கள் <1 என்பதைக் கிளிக் செய்யலாம். டெவலப்பர் தாவலில் இருந்து>மேக்ரோக்கள் , மேக்ரோ பெயரைத் தேர்ந்தெடுத்து, பின்னர் இயக்கு என்பதைக் கிளிக் செய்யவும்.
வெற்றிகரமான குறியீடு செயலாக்கத்திற்குப் பிறகு, முடிவைப் பார்க்க மேலே உள்ள gif ஐப் பார்க்கவும். ஒரு பாப்-அப் MsgBox இருக்கும் 0> VBA குறியீடு விளக்கம்
5279
அட்டவணையில் கடைசி வரிசை எண்ணைப் பெற, நெடுவரிசை B.
1268
எங்கள் தரவு தொடங்கும் இடத்திலிருந்து வரிசை எண் 4ஐ அமைக்கவும்.
6362
முதல் வரிசையில் இருந்து லூப் செய்ய.
4904
எங்கள் தரவு தொடங்கும் நெடுவரிசை எண் 2 ஐ அமைக்கவும்.
9601
கடைசியை பெற வரிசைகள் வழியாக லூப்பிங்கைத் தொடங்கவும்.கடைசி வரிசை வரை தற்போதைய வரிசையை மதிப்பிடுவதன் மூலம் நெடுவரிசை எண்.
9540
முதல் வரிசையிலிருந்து கடைசி வரிசை வரை நெடுவரிசையை லூப்பிங் செய்வதை அதிகரிக்கவும்.
8075
இந்தக் குறியீடு செயல்படும், ஒவ்வொன்றிற்கும் பிறகு அதிகரிக்கும் மறு செய்கை மற்றும் குறியீட்டின் முடிவைக் காண்பி . மதிப்பின்படி ஒவ்வொரு வரிசையிலும் உள்ள ஒவ்வொரு கலத்திலும் லூப் செய்ய VBA ஐ செயல்படுத்தவும்
நீங்கள் ஒரு அட்டவணையின் ஒவ்வொரு வரிசையிலும் உள்ள ஒவ்வொரு கலத்தின் வழியாகவும் லூப் செய்து, கலங்களில் இருக்கும் மதிப்பை திரும்பும் மதிப்பாக எறிய வேண்டும் , பிறகு VBA எக்செல் மூலம் அதை எப்படிச் செய்வது என்று இந்தப் பகுதி உங்களுக்கு உதவும்.
நீங்கள் அதை ListObject மற்றும் <1 உடன் செய்யலாம். VBA இன்>DataBodyRange சொத்து. பொருள் மற்றும் சொத்து இரண்டையும் கொண்ட மேக்ரோ குறியீட்டைக் காண்பிப்போம்.
2.1. ListObject உடன்
VBA Excel இல் உள்ள ListObject உடன் செல் மதிப்பின்படி அட்டவணையின் ஒவ்வொரு வரிசையிலும் உள்ள ஒவ்வொரு கலத்தையும் லூப் செய்வதற்கான படிகள் கீழே கொடுக்கப்பட்டுள்ளன.
படிகள்:
- முன்பைப் போலவே, டெவலப்பர் தாவலில் இருந்து விஷுவல் பேசிக் எடிட்டரை திறந்து <குறியீடு சாளரத்தில் 1> தொகுதி செருகவும்.
- பின், குறியீடு சாளரத்தில், நகல் பின்வரும் குறியீட்டை ஒட்டு அது.
3184
உங்கள் குறியீடு இப்போது இயங்கத் தயாராக உள்ளது.
- அதன்பிறகு, மேக்ரோவை இயக்கவும் மேலே உள்ள பிரிவில் நாங்கள் உங்களுக்குக் காட்டியது போல. முடிவு gif இல் காட்டப்பட்டுள்ளதுகீழே.
ஒரு பாப்-அப் MsgBox உங்களுக்கு காண்பிக்கப்படும் ஒவ்வொரு வரிசையிலிருந்தும் ஒவ்வொரு கலமும் கொண்டு செல்லும் உங்கள் எக்செல் தாளில் உள்ள அட்டவணையில் இருந்து.
VBA குறியீடு விளக்கம்
6168
மாறிகளை வரையறுக்கவும்.
2154
இந்தப் பகுதி குறியீடு முதலில் அட்டவணையில் உள்ள வரிசைகள் வழியாகச் சுழலத் தொடங்குகிறது (“ TblStudents ” என்பது எங்கள் அட்டவணைப் பெயர்). பின்னர் ஒவ்வொரு வரிசைக்கும் நெடுவரிசைகளை உள்ளிடுகிறது. அதன் பிறகு, கலத்தின் மதிப்பை MsgBox இல் அனுப்பவும். பின்னர் அடுத்த நெடுவரிசைக்குச் செல்லவும். ஒரு வரிசையின் அனைத்து நெடுவரிசைகளிலும் மறு செய்கையை முடித்த பிறகு, அது அடுத்த வரிசைக்குச் சென்று, கடைசி வரிசை வரை மறு செய்கையை தொடர்கிறது.
2.2. DataBodyRange சொத்துடன்
அட்டவணையில் இருந்து பிரித்தெடுக்கப்பட்ட தரவை இன்னும் துல்லியமாகச் சொல்ல, ListObject இன் DataBodyRange பண்புகளைப் பயன்படுத்தலாம். DataBodyRange பண்பு, தலைப்பு வரிசைக்கும் செருகு வரிசைக்கும் இடையே உள்ள பட்டியலிலிருந்து வரம்பைக் கொண்ட முடிவை உங்களுக்குத் தரும்.
ஒவ்வொரு வரிசையிலும் உள்ள ஒவ்வொரு கலத்தையும் எப்படி லூப் செய்யலாம் என்பதற்கான படிகள் VBA Excel இல் DataBodyRange உடன் செல் மதிப்பின்படி ஒரு அட்டவணை கீழே கொடுக்கப்பட்டுள்ளது.
படிகள்:
- காட்டப்பட்டுள்ளபடி முன், டெவலப்பர் தாவலில் இருந்து விஷுவல் பேசிக் எடிட்டரை திறந்து, குறியீடு சாளரத்தில் செருகு தொகுதி .
- பின் , நகல் பின்வரும் குறியீட்டை ஒட்டு குறியீடு சாளரத்தில்.
2294
உங்கள் குறியீடு இப்போது இயக்கத் தயாராக உள்ளது.
- பின்னர், இயக்கு மேக்ரோ மற்றும் வெளியீட்டைக் காண பின்வரும் gif ஐப் பார்க்கவும்.
ஒரு பாப்-அப் MsgBox உங்கள் எக்செல் தாளில் உள்ள அட்டவணையில் இருந்து ஒவ்வொரு வரிசையிலிருந்தும் ஒவ்வொரு கலமும் எடுத்துச் செல்லும் மதிப்பைக் காட்டுகிறது.
VBA குறியீடு விளக்கம்
2559
மாறியை வரையறுக்கவும்.
6862
இந்தக் குறியீட்டுத் துண்டு முதலில் அட்டவணையில் உள்ள வரிசைகள் வழியாகச் சுழலத் தொடங்குகிறது (“ TblStdnt ” என்பது எங்கள் அட்டவணைப் பெயர்) மற்றும் மதிப்புகளின் வரம்பைத் தருகிறது. அட்டவணையின் தலைப்பு வரிசை. பின்னர் வரம்பின் மதிப்பை MsgBox இல் அனுப்பவும். பின்னர் வரம்பைப் பிரித்தெடுக்க அடுத்த வரிசைக்குச் சென்று, கடைசி வரிசை வரை மறு செய்கை செயல்முறையைத் தொடர்கிறது.
3. எக்செல் இல் உள்ள நெடுவரிசைகளை இணைப்பதன் மூலம் வரிசைகள் மூலம் மீண்டும் மீண்டும் செய்ய VBA மேக்ரோவைப் பயன்படுத்தவும்
உங்கள் தரவுத்தொகுப்பில் இருந்து நெடுவரிசைகளை முதல் நெடுவரிசையுடன் இணைத்து அட்டவணையில் உள்ள வரிசைகளை லூப் செய்வது எப்படி என்பதை இந்தப் பிரிவு காண்பிக்கும். எக்செல் இல்.
உதாரணமாக, எங்கள் தரவுத்தொகுப்புக்கு, முதலில், ஜான் இன் செல் B5 மற்றும் 101 செல் C5 மூலம் அவற்றை ஒருங்கிணைத்து மீண்டும் மீண்டும் செய்கிறோம். செல் B5 இல் ஜான் மற்றும் 89 Cell D5 இல் வரிசை 5 இலிருந்து ஒருங்கிணைத்து.
இதை நீங்கள் எப்படிச் செய்யலாம் என்பதைக் காண்பிப்போம். எக்செல் இல் VBA மேக்ரோ.
படிகள்:
- முதலில், விஷுவல் பேசிக் எடிட்டரை திறக்கவும். குறியீடு சாளரத்தில் 1>டெவலப்பர் தாவல் மற்றும் செருகு தொகுதி குறியீடுமற்றும் ஒட்டு அதை.
2150
உங்கள் குறியீடு இப்போது இயக்கத் தயாராக உள்ளது.
- மூன்றாவதாக, <1 மேக்ரோவை இயக்கவும். முடிவைப் பார்க்க கீழே உள்ள gif ஐப் பார்க்கவும்.
ஒரு பாப்-அப் MsgBox உங்களுக்கு இணைந்த மதிப்பைக் காட்டும் முதல் மற்றும் இரண்டாவது நெடுவரிசையில் உள்ள கலங்களின் ( கலம் B5 இல் ஜான் B மற்றும் 101 C5 இல் C5 நெடுவரிசையில் இருந்து ) பின்னர் இணைக்கப்பட்ட மதிப்பு முதல் மற்றும் மூன்றாவது நெடுவரிசையில் உள்ள கலங்களின் ( வரிசை எண் 5 இன் நெடுவரிசை B இலிருந்து செல் B5 இல் ஜான் மற்றும் கலம் D5 இல் 89) 2> உங்கள் தரவுத்தொகுப்பிலிருந்து. அட்டவணையின் கடைசி வரிசையை அடையும் வரை இந்த ஒருங்கிணைப்பு செயல்பாடு தொடர்ந்து கொண்டே இருக்கும்.
VBA குறியீடு விளக்கம்
5515
மாறியை வரையறுக்கவும்.
4269
பின்னர் குறியீடு செயலில் உள்ள தாளில் இருந்து அட்டவணையைத் தேர்ந்தெடுக்கிறது (“ TblConcatenate ” எங்கள் அட்டவணை பெயரில்).
3272
அதன் பிறகு, தலைப்பைத் தவிர்த்து ஒவ்வொரு வரிசையையும் மீண்டும் செய்யத் தொடங்குகிறது. நெடுவரிசை. மறு செய்கையானது நெடுவரிசை தலைப்புக்கும் வரிசைகளுக்கும் இடையிலான வரம்பில் பொருத்தத்தைக் கண்டால், அது iValue மாறியில் மதிப்பைச் சேமிக்கும்.
6186
மேலே உள்ள நிபந்தனை பூர்த்தி செய்யப்படாவிட்டால், பிறகு குறியீடு MsgBox இல் மதிப்பை எறிந்து நிபந்தனையை முடிக்கிறது. அதன் பிறகு, அது மற்றொரு வரம்பில் லூப்பிங்கிற்கு நகர்கிறது மற்றும் இறுதி வரிசை வரை தொடர்கிறது. இறுதி வரிசையை அடைந்ததும், மேக்ரோ குறியீடு செயல்படுத்தலை முடிக்கிறது.
4. திரும்பத் திரும்ப மேக்ரோவை உட்பொதிக்கவும்எக்செல்
ல் உள்ள அட்டவணையில் உள்ள அனைத்து நெடுவரிசைகளையும் இணைப்பதன் மூலம் வரிசைகள் மூலம், இந்த பிரிவில், ஒவ்வொரு வரிசையும் வைத்திருக்கும் அனைத்து நெடுவரிசைகளையும் உடன் தரவுத்தொகுப்பில் எவ்வாறு இணைப்பது என்பதைக் கற்றுக்கொள்வோம். எக்செல் இல் VBA மேக்ரோ.
இதைச் செயல்படுத்துவதற்கான படிகள் கீழே காட்டப்பட்டுள்ளன.
படிகள்:
- முதலில், <திறக்கவும் டெவலப்பர் தாவலில் இருந்து 1>விஷுவல் பேசிக் எடிட்டர் மற்றும் குறியீடு சாளரத்தில் செருகு தொகுதி .
- பின், பின்வரும் குறியீட்டை நகலெடுத்து ஒட்டு குறியீடு சாளரத்தில்.
7088
உங்கள் குறியீடு இப்போது இயக்கத் தயாராக உள்ளது.
<3
- அடுத்து, இயக்கு மேக்ரோ குறியீடு.
மேலே உள்ள gif இல் இருந்து நீங்கள் பார்ப்பது போல் உள்ளது ஒரு பாப்-அப் MsgBox உங்கள் எக்செல் ஒர்க்ஷீட்டின் அட்டவணையில் இருந்து ஒவ்வொரு வரிசையிலும் உள்ள அனைத்து நெடுவரிசைகளின் ஒருங்கிணைந்த மதிப்பைக் காட்டுகிறது.
VBA குறியீடு விளக்கம்
8394
மாறிகளை வரையறுக்கவும்.
8906
நாம் வேலை செய்யும் தாள் பெயரை அமைக்கவும் (“ ConcatenatingAllCol ” என்பது தாள் பெயர் பணிப்புத்தகத்தில்).
1223
தே நாங்கள் பணிபுரியும் அட்டவணைப் பெயரைச் சரிசெய்>அட்டவணையின் ஒவ்வொரு வரிசையின் ஒவ்வொரு நெடுவரிசையிலும் மறு செய்கையைத் தொடங்குகிறது.
9873
ஒவ்வொரு வரிசையின் ஒவ்வொரு நெடுவரிசையும் கொண்டிருக்கும் மதிப்புகளை வெட்டுவதன் மூலம் முடிவைச் சேமிக்கவும். ஒவ்வொரு வரிசையிலும் உள்ள அனைத்து நெடுவரிசைகளையும் ஸ்கேன் செய்த பிறகு, அது கடந்து சென்றதுMsgBox இல் விளைகிறது. பின்னர் மீண்டும் அடுத்த வரிசையில் லூப்பிங் தொடங்கி, அது அட்டவணையின் கடைசி வரிசையை அடையும் வரை லூப்பிங் தொடர்கிறது.
மேலும் படிக்க: எக்செல் விபிஏ மூலம் ஒரு அட்டவணையின் பல நெடுவரிசைகளை வரிசைப்படுத்துவது எப்படி (2 முறைகள்)
5. VBA மேக்ரோவைக் கொண்டு அட்டவணையின் வரிசைகள் மூலம் லூப்பிங் செய்வதன் மூலம் மதிப்பு கண்டறியப்பட்டால் மறு செய்கையை நிறுத்து
உங்கள் அட்டவணையின் வரிசைகளை லூப் செய்து, குறிப்பிட்ட மதிப்பைக் கண்டறிந்ததும் லூப்பிங்கை நிறுத்த வேண்டும் . நீங்கள் ஒரு எளிய மேக்ரோ குறியீட்டைக் கொண்டு அதைச் செய்யலாம்.
எக்செல் இல் VBA அதை எப்படி செய்வது என்று கற்றுக்கொள்வோம்.
படிகள்:
- முதலில், டெவலப்பர் தாவலில் இருந்து விஷுவல் பேசிக் எடிட்டரை திறந்து, குறியீடு சாளரத்தில் செருகு தொகுதி .
- பின்னர், குறியீடு சாளரத்தில், பின்வரும் குறியீட்டை நகலெடு செய்து ஒட்டு அதை.
7579
உங்கள் குறியீடு இப்போது இயங்கத் தயாராக உள்ளது .
- பின்னர், இயக்கு மேக்ரோ குறிப்பிட்ட மதிப்பை (“ Edge ”) வரம்பில் கண்டுபிடித்து, முடிவை MsgBox இல் வீசுகிறது.
மேலே உள்ள படத்திலிருந்து நீங்கள் பார்ப்பது போல், ஒரு பாப்-அப் MsgBox உங்களுக்கு செல் முகவரியைக் காட்டுகிறது, $B$10 , நாங்கள் கண்டறிந்த இடத்தில் குறிப்பிட்ட மதிப்பு, “ எட்ஜ் ” .
VBA குறியீடு விளக்கம்
4653
வரையறு மாறி.
4229
இந்தக் குறியீடு 1 முதல் 15 வரையிலான வரிசைகளை லூப்பிங் செய்ய இங்கே உள்ளது. இது குறிப்பிட்ட வார்த்தையைக் கண்டால்“ Edge ” பின்னர் அது அந்த வார்த்தையை வைத்திருக்கும் செல் முகவரியுடன் முடிவை அனுப்புகிறது. வரிசைகள் 1 முதல் 15 வரையிலான எல்லா தரவையும் ஸ்கேன் செய்து முடிக்கும் வரை, இந்த வார்த்தையைத் தேடும் வரை இது தொடர்ந்து செய்கிறது.
மேலும் படிக்க: எக்செல் அட்டவணையில் இருந்து வரிசைகள் மற்றும் நெடுவரிசைகளை எவ்வாறு செருகுவது அல்லது நீக்குவது
6. ஒவ்வொரு வரிசையிலும் VBA ஐ லூப் செய்து, எக்செல் இல் ஒரு குறிப்பிட்ட மதிப்பை வண்ணமாக்குங்கள்
குறிப்பிட்ட மதிப்பின் செல் முகவரியை MsgBox இல் நீங்கள் போட விரும்பவில்லை என்றால் என்ன செய்வது? நீங்கள் தேடும் மதிப்பைக் கொண்ட கலத்திற்கு வண்ணம் கொடுக்க விரும்பலாம்.
VBA மேக்ரோவில் அதை எப்படி செய்வது என்று கற்றுக்கொள்வோம்.
படிகள்:
- முன்பைப் போலவே, டெவலப்பர் தாவலில் இருந்து விஷுவல் பேசிக் எடிட்டரை திறந்து செருகு ஒரு தொகுதி குறியீடு சாளரத்தில்.
- பின், பின்வரும் குறியீட்டை நகலெடு மற்றும் ஒட்டு குறியீடு சாளரத்தில்.
1950
உங்கள் குறியீடு இப்போது இயக்கத் தயாராக உள்ளது.
- அதன் பிறகு, இயக்கு மேக்ரோ.
- இது லூப்பைத் தொடங்கி, குறிப்பிட்ட மதிப்பை (“ எட்ஜ் ”) வரம்பில் கண்டறியும் போது அதை நிறுத்தும் மற்றும் கலர்இண்டெக்ஸ் கொண்டு கலத்தை கலர் செய்யும் குறியீட்டில் நீங்கள் வழங்கியது.
மேலே உள்ள படத்திலிருந்து நீங்கள் பார்க்க முடியும், C ell B10 , குறிப்பிட்ட மதிப்பைக் கண்டறிந்த இடத்தில், “ எட்ஜ் ” குறியீடு செயல்படுத்தப்பட்ட பிறகு நிறத்தில் உள்ளது.
VBA குறியீடு விளக்கம்
5836
வரையறு