எக்செல் VBA மூலம் உங்கள் Vlookupகளை தானியங்குபடுத்த கற்றுக்கொள்ளுங்கள்

எக்செல் VBA மூலம் உங்கள் Vlookupகளை தானியங்குபடுத்த கற்றுக்கொள்ளுங்கள்
உங்களைப் போன்ற வாசகர்கள் MUO ஐ ஆதரிக்க உதவுகிறார்கள். எங்கள் தளத்தில் உள்ள இணைப்புகளைப் பயன்படுத்தி நீங்கள் வாங்கும் போது, ​​நாங்கள் ஒரு இணை கமிஷனைப் பெறலாம். மேலும் படிக்க.

Vlookup என்பது எக்செல் இல் இன்றியமையாத செயல்பாடாகும், மேலும் இது தரவு செயலாக்கத்தின் முக்கிய பகுதியாக மாறியுள்ளது. நீங்கள் வழக்கமாக முழு அளவிலான தரவுத்தளத்துடன் தொடர்புபடுத்தக்கூடிய சில செயல்பாடுகளை இது வழங்குகிறது.





ஆனால் இந்த செயல்பாட்டை தானியக்கமாக்க விரும்பினால் என்ன செய்வது? ஆம், அது சாத்தியம், குறிப்பாக எக்செல் இன் சொந்த ஆட்டோமேஷன் மொழியான VBA ஐ எவ்வாறு பயன்படுத்துவது என்பது உங்களுக்குத் தெரிந்தால். எக்செல் விபிஏவில் வ்லுக்அப் செயல்பாட்டை எவ்வாறு தானியங்குபடுத்துவது என்பது இங்கே.



அன்றைய வீடியோவை உருவாக்கவும்

Vlookup இன் தொடரியல்

Vlookup செயல்பாட்டின் தொடரியல் மிகவும் எளிமையானது, ஆனால் எக்செல் VBA இல் தானியங்குபடுத்தும் போது கூட நீங்கள் கவனம் செலுத்த வேண்டிய நான்கு அம்சங்களைக் கொண்டுள்ளது.





 =vlookup(lookup_value, lookup_array, column_index, exact_match/partial_match)

செயல்பாட்டின் வாதங்கள் பின்வரும் பொருளைக் கொண்டுள்ளன:

  • தேடுதல்_மதிப்பு: தேடுதல் வரிசையில் இருந்து நீங்கள் பார்க்க விரும்பும் முதன்மை மதிப்பு இதுவாகும்.
  • தேடுதல்_வரிசை: இது ஆதாரத் தரவு, இது லுக்அப்_மதிப்பு ஒரு குறிப்பாகப் பயன்படுத்தும்.
  • column_index: மதிப்பை வழங்கும் நெடுவரிசை.
  • சரியான_போட்டி/பகுதி_பொருத்தம்: பொருத்த வகையைத் தீர்மானிக்க 0 அல்லது 1 ஐப் பயன்படுத்தவும்.

தரவு தயாரிப்பு

இந்த தரவுத்தொகுப்பில் இரண்டு பகுதிகள் உள்ளன: ஒரு தேடல் அட்டவணை மற்றும் இலக்கு தரவு புள்ளிகள்.



தேடல் அட்டவணையில் மூன்று நெடுவரிசைகள் உள்ளன, துணை வகை மற்றும் தயாரிப்பு பெயர் புலங்களை உள்ளடக்கிய தரவு:

MS Excel இல் உள்ள தரவு அட்டவணை, முன் மக்கள்தொகை கொண்ட வரிசைகள்

இலக்கு அட்டவணையில் துணை வகை அல்லது தயாரிப்பு பெயர் தரவு இல்லாமல், பொருந்தக்கூடிய நெடுவரிசைகள் உள்ளன. அதன் ஆர்டர் ஐடி நெடுவரிசையில் உள்ள மதிப்புகள் தேடல் அட்டவணையில் உள்ள அதே நெடுவரிசையிலும் உள்ளன என்பதை நினைவில் கொள்க:



எக்செல் விரிதாளில் மதிப்புகளைத் தேடுங்கள்

எக்செல் விரிதாளில் நேரடியாக Vlookup ஐப் பயன்படுத்துதல்

இலக்கு நெடுவரிசைகளை நிரப்ப, பி மற்றும் சி, உங்களால் முடியும் Excel இன் vlookup செயல்பாட்டைப் பயன்படுத்தவும் .

செல்லில் B2 , பின்வரும் சூத்திரத்தை உள்ளிடவும்:



 =VLOOKUP($A2, $F:$H, 2, 0)

இதேபோல், செல்லில் C2 , இந்த சூத்திரத்தை உள்ளிடவும்:

 =VLOOKUP($A2, $F:$H, 3, 0)

நீங்கள் ஃபார்முலாவை செல் B2 இலிருந்து நெடுவரிசையின் முடிவு B17 வரை இழுக்கலாம். C நெடுவரிசையிலும் இந்த செயல்முறையை மீண்டும் செய்யவும். ஒவ்வொரு அடுத்தடுத்த உள்ளீட்டிற்கான மதிப்புகள் இரண்டு நெடுவரிசைகளிலும் தானாகவே புதுப்பிக்கப்படும்.

vlookup செயல்பாட்டிற்கு நீங்கள் அனுப்பும் மதிப்புகள்:

யூடியூப்பில் சந்தாதாரர்களை எப்படிப் பார்ப்பது
  • A2 : தேடல் மதிப்பு இந்தக் கலத்தில் உள்ளது.
  • F3:H17 : இது தேடல் வரம்பைக் கொண்டுள்ளது.
  • 23 : மதிப்பைப் பெறுவதற்கான குறிப்பு நெடுவரிசைகள்.
  • 0 : ஒரு சரியான பொருத்தத்தைக் குறிக்கிறது.

எக்செல் VBA இன் Vlookup செயல்பாடு

நீங்கள் எக்செல் அல்லது VBA வழியாக நேரடியாகப் பயன்படுத்தினாலும் vlookup செயல்பாடு பல ஒற்றுமைகளைக் கொண்டுள்ளது. நீங்கள் தரவு வரிசைகளைக் கையாளும் தரவு ஆய்வாளராக இருந்தாலும் அல்லது புதிய தயாரிப்புகளைத் தொடர்ந்து கையாளும் சரக்கு மேலாளராக இருந்தாலும், நீங்கள் vlookup ஐப் பயன்படுத்தி பயனடையலாம்.

டைனமிக் லுக்-அப் வரம்பில் பணிபுரியும் போது, ​​எக்செல் இல் மீண்டும் மீண்டும் சூத்திரங்களைப் பயன்படுத்துவதைத் தவிர்க்க, உங்கள் சூத்திரங்களை தானியக்கமாக்குவது எப்போதும் சிறந்தது. VBA இல் உங்கள் Vlookup செயல்பாட்டை தானியக்கமாக்குவதன் மூலம், ஒரே கிளிக்கில் பல நெடுவரிசைக் கணக்கீடுகளைச் செய்யலாம்.

1. தேவையான அமைப்பைச் செய்யவும்

குறியீட்டு எடிட்டரைத் திறப்பதன் மூலம் தொடங்கவும் (அழுத்தவும் Alt + F11 அல்லது செல்லவும் டெவலப்பர் தாவல்) புதிய எக்செல் பணிப்புத்தகத்தில் மற்றும் உங்கள் குறியீட்டை எழுதத் தொடங்க ஒரு தொகுதியைச் சேர்க்கவும். குறியீட்டு எடிட்டருக்குள், துணை-வழக்கத்தை உருவாக்க, குறியீட்டு சாளரத்தின் மேலே பின்வரும் வரிகளைச் சேர்க்கவும்:

  Sub vlookup_fn1()End Sub

துணை-வழக்கம் என்பது உங்கள் VBA குறியீட்டிற்கான ஒரு கொள்கலன் மற்றும் அதை வெற்றிகரமாக இயக்க முக்கியமானது. ஒரு மாற்று உள்ளது VBA பயனர் படிவத்தை உருவாக்கவும் உங்கள் UI ஐ மேலும் ஊடாடச் செய்ய.

2. உங்கள் மாறிகளை அறிவிக்கவும் மற்றும் உங்கள் குறிப்பு வரம்புகளை உருவாக்கவும்

முதலில், நீங்கள் மாறி தரவு வகைகளைப் பயன்படுத்தி அறிவிக்க வேண்டும் மங்கலான அறிக்கை:

  Dim i as integer, lastrow as long

அடுத்து, ஒரு உருவாக்கவும் கடைசியாக மாறி, உங்கள் தேடல் வரம்பிற்குள் கடைசியாக மக்கள்தொகை கொண்ட வரிசையின் மதிப்பைச் சேமிக்க. Lastrow செயல்பாடு பயன்படுத்துகிறது முடிவு (xldown) குறிப்பிட்ட வரம்பிற்குள் இறுதி வரிசை குறிப்பைக் கணக்கிடுவதற்கான செயல்பாடு.

இந்த நிலையில், லாஸ்ட்ரோ மாறியானது தேடல் வரம்பின் கடைசி மக்கள்தொகை கொண்ட வரிசை மதிப்பை சேமிக்கிறது, 17. 

  lastrow = Sheets("Sheet2").Range("F3").End(xlDown).Row

மேலே உள்ள எடுத்துக்காட்டில், இலக்கு அட்டவணை நீண்டுள்ளது A2:C17 , மூல அட்டவணை நீட்டிக்கப்படும் போது F2:H17 . Vlookup சூத்திரமானது நெடுவரிசை A க்குள் சேமிக்கப்பட்ட ஒவ்வொரு மதிப்பையும் சுழற்றும், அதை மூல அட்டவணையில் பார்த்து, B மற்றும் C நெடுவரிசைகளில் பொருந்தும் உள்ளீடுகளை ஒட்டவும்.

இருப்பினும், லூப்பில் குதிக்கும் முன், நீங்கள் வரம்பு மதிப்புகளை ஒரு புதிய மாறிக்குள் சேமிக்க வேண்டும் ( என்_வரம்பு ), பின்வருமாறு:

  my_range = Sheets("Sheet2").Range("F3:H" & lastrow)

தொடக்க செல் குறிப்பை நீங்கள் வெளிப்படையாக வரையறுக்க வேண்டும் ( F3 ) மற்றும் இறுதி நெடுவரிசை குறிப்பு ( எச் ) தேடல் வரிசையை முடிக்க VBA தானாகவே வரிசை மதிப்பைச் சேர்க்கிறது.

VBA எடிட்டர் சாளரத்தில் VBA குறியீடு

3. ஒவ்வொரு லுக்அப் மதிப்பின் மூலம் சுழற்சிக்கு ஒரு சுழற்சியை எழுதவும்

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

  i = 2

நீங்கள் ஒரு பயன்படுத்தலாம் செய்யும் போது ஒவ்வொரு வரிசையையும் செயலாக்க லூப், வரிசை 2 இல் தொடங்கி வரிசை 17 இல் முடிவடையும். மீதமுள்ள குறியீட்டைப் போலவே, இந்த அம்சமும் மாறும்; நிபந்தனை தவறானது வரை சுழற்சி இயங்கும். தற்போதைய வரிசையின் முதல் கலத்தில் காலியாக இல்லாத மதிப்பைச் சரிபார்க்க நிபந்தனையைப் பயன்படுத்தவும்.

  Do While len(Sheets("Sheet2").Cells(i, 1).value) <> 0

லூப்பின் உள்ளே, கலங்களை நிரப்ப VLookup செயல்பாட்டை நீங்கள் அழைக்கலாம்:

  Sheets("Sheet2").Cells(i, 2).Value = _ Application.WorksheetFunction.VLookup(Sheets("Sheet2") _ .Cells(i, 1).Value, my_range, 2, False)Sheets("Sheet2").Cells(i, 3).Value = _ Application.WorksheetFunction.VLookup(Sheets("Sheet2") _ .Cells(i, 1).Value, my_range, 3, False)

இந்த அறிக்கைகள் தற்போதைய வரிசையில் உள்ள கலங்களின் மதிப்பை முறையே 2 மற்றும் 3 நெடுவரிசைகளில் அமைக்கின்றன. அவர்கள் பயன்படுத்துகின்றனர் பணித்தாள் செயல்பாடு அழைக்க பொருள் VLookup செயல்பாடு, தேடுவதற்கு நெடுவரிசை 1 இலிருந்து தொடர்புடைய மதிப்பைக் கடக்கிறது. நீங்கள் முன்னர் வரையறுத்த வரம்பையும், இறுதி மதிப்பைப் பெற தொடர்புடைய நெடுவரிசையின் குறியீட்டையும் அவை கடந்து செல்கின்றன.

vlookup குறியீடு தயாராக உள்ளது, ஆனால் லூப்பில் ஒவ்வொரு முறையும் வரிசை மாறியை அதிகரிக்க வேண்டும்:

  i = i + 1

லூப் இயங்கும் ஒவ்வொரு முறையும், அதன் மதிப்பை அதிகரிக்கிறது நான் மூலம் 1. நினைவில் கொள்ளுங்கள், தொடக்க வரிசை மதிப்பு 2, மற்றும் சுழற்சி இயங்கும் ஒவ்வொரு முறையும் அதிகரிப்பு நடக்கும். பயன்படுத்த வளைய லூப்பின் குறியீடு தொகுதியின் முடிவை அமைக்க முக்கிய வார்த்தை.

நீங்கள் முழு குறியீட்டையும் இயக்கும்போது, ​​​​மூல அட்டவணையில் உள்ள மதிப்புகளின் அடிப்படையில் இரண்டு நெடுவரிசைகளிலும் முடிவுகளை விரிவுபடுத்தும்.

எக்செல் விரிதாளில் அட்டவணை வெளியீடு

குறிப்புக்கான முழு குறியீடும் இங்கே:

  Sub vlookup_fn1() Dim i As Integer lastrow = Sheets("Sheet2").Range("F3").End(xlDown).Row my_range = Sheets("Sheet2").Range("F3:H" & lastrow) i = 2 Do While Len(Sheets("Sheet2").Cells(i, 1).Value) <> 0 On Error Resume Next Sheets("Sheet2").Cells(i, 2).Value = _ Application.WorksheetFunction.VLookup(Sheets("Sheet2") _ .Cells(i, 1).Value, my_range, 2, False) Sheets("Sheet2").Cells(i, 3).Value = _ Application.WorksheetFunction.VLookup(Sheets("Sheet2") _ .Cells(i, 1).Value, my_range, 3, False) i = i + 1 LoopEnd Sub

4. குறியீட்டை இயக்க ஒரு பொத்தானை உருவாக்கவும்

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

ஐபோனில் வீடியோவை அமுக்குவது எப்படி
விருப்பங்களின் பட்டியலுடன் எக்செல் விரிதாளில் செவ்வக பொத்தான்

உரையாடல் பெட்டியில், உங்கள் துணை-வழக்கத்தின் பெயரைத் தேர்ந்தெடுத்து, கிளிக் செய்யவும் சரி .

எக்செல் விரிதாளில் மேக்ரோ பாக்ஸ் திறக்கப்படும்

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

எக்செல் VBA ஐப் பயன்படுத்தி தேடுதல் செயல்பாடுகளை தானியங்குபடுத்துதல்

எக்செல் விபிஏ ஒரு நெகிழ்வான மொழியாகும், இது எம்எஸ் எக்செல்லின் பல்வேறு அம்சங்களில் ஆட்டோமேஷனை எளிதாக்குவதற்கு நன்கு வடிவமைக்கப்பட்டுள்ளது. MS Excel VBA இல் பல விருப்பங்கள் உள்ளன, Excel செயல்பாடுகளை தானியங்குபடுத்துவது முதல் விரிவான பிவோட் டேபிள்களை தானாக உருவாக்குவது வரை.

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