Excel VBA Macros (ක්‍රම 7) භාවිතයෙන් පරාසයක දත්ත සමඟ අවසාන පේළිය සොයන්න

  • මේක Share කරන්න
Hugh West

Microsoft Excel සමඟ වැඩ කරන අතරතුර, අවසාන පේළි හෝ තීරු සොයා ගැනීම පොදු කාර්යයකි. අවසන් වරට භාවිතා කරන ලද පේළි හෝ තීරු සොයා ගැනීමට අපි යතුරු පුවරුව භාවිතා කරමු. නමුත්, ඔබ සංකීර්ණ දත්ත කට්ටලයකින් අවසන් වරට භාවිතා කළ පේළිය සොයා ගැනීමට අවශ්‍ය තත්වයක ඔබ සොයා ගත හැක. මෙම නිබන්ධනයේදී, ඔබ Excel හි VBA භාවිතා කරමින් පරාසයක දත්ත සහිත අවසාන පේළිය ප්‍රායෝගික උදාහරණ සහ නිසි නිදර්ශන සහිතව සොයා ගැනීමට ඉගෙන ගනු ඇත.

පුහුණු වැඩපොත බාගන්න

මෙම පුහුණු වැඩපොත බාගන්න.

Range එකක අවසන් වරට භාවිත කළ පේළිය සොයන්න , Excel හි VBA භාවිතයෙන් පරාසයක දත්ත සහිත අවසාන පේළිය සොයා ගැනීමට ඔබට උපකාර වන ක්‍රම හතක් අපි ඔබට ලබා දීමට සූදානම් වෙමු. ඔබගේ Excel දැනුම පොහොසත් කිරීමට මෙම ක්‍රම සියල්ල ඉගෙන ගෙන භාවිතා කිරීමට අපි ඔබට නිර්දේශ කරමු.

📕 තවත් කියවන්න : Excel හි පේළියේ අගය සහිත අවසාන කොටුව සොයන්න (ක්‍රම 6)

මෙම නිබන්ධනය ප්‍රදර්ශනය කිරීමට, අපි මෙම දත්ත කට්ටලය භාවිතා කරන්නෙමු:

මෙහි, අපට ක්‍රීඩකයන්ගේ තොරතුරු වලින් සමන්විත දත්ත කට්ටලයක් ඇත. ඔබට සියලු ක්‍රම ඉගැන්වීමට අපි මෙය භාවිතා කරන්නෙමු.

Open VBA Editor

අපි ආරම්භ කිරීමට පෙර, මෙන්න අපි ඔබට VBA Editor විවෘත කිරීමට සරල මතක් කිරීමක් ලබාදෙමු. Excel.

මුලින්ම, ඔබේ යතුරුපුවරුවේ Alt+F11 ඔබන්න. ඉන්පසු, ඇතුළු කරන්න > මොඩියුලය. ඊට පසු, එය Excel හි VBA සංස්කාරකය විවෘත කරනු ඇත.

1.VBA භාවිතයෙන් පරාසයක දත්ත සමඟ අවසාන පේළිය සොයා ගැනීමට Range.End Property භාවිතා කිරීම

දැන්, මෙම ක්‍රමය මූලික වශයෙන් පරාසයක අවසානය සොයා ගනී. ප්රධාන වශයෙන්, අවසන් වරට භාවිතා කරන ලද සෛල පරාසය. දී ඇති පරාසයක දත්ත සහිත අවසාන පේළිය සොයා ගැනීමට අපට මෙම ක්‍රමය භාවිතා කළ හැක. VBA භාවිතා කිරීමෙන් ඔබට අපේක්ෂිත ප්‍රතිඵල ලැබෙනු ඇත.

📌 පියවර

පළමුව, VBA සංස්කාරකය විවෘත කරන්න.

ඉන්පසු, පහත කේතය ටයිප් කරන්න:

3553

දැන්, ගොනුව සුරකින්න. ඉන්පසුව, මැක්‍රෝ සංවාද කොටුව විවෘත කිරීමට Alt+F8 ඔබන්න. range_end_method

තෝරන්න ඉන්පසු Run මත ක්ලික් කරන්න.

ඔබට පෙනෙන පරිදි, අපි Excel හි VBA භාවිතා කරමින් පරාසයක දත්ත සහිත අවසාන පේළිය සාර්ථකව සොයාගෙන ඇත. දත්ත කට්ටලයකින් නිශ්චිත අගයක් සෙවීමට අපි Range.Find ක්‍රමය භාවිතා කරමු. නමුත් පරාසයක දත්ත සහිත අවසාන පේළිය සොයා ගැනීමට මෙම ක්‍රමය ප්‍රයෝජනවත් වේ. එය Find & එක්සෙල් හි සංවාද කොටුව ප්‍රතිස්ථාපනය කරන්න. පරාසය. Find method එකට තර්ක ගොඩක් තියෙනවා. නමුත් අපි ඒවා සියල්ලම භාවිතා නොකරමු.

අපි Range.Find ක්‍රමය භාවිතා කිරීමට පෙර, අපි ඔබට ඉක්මන් තොරතුරක් ලබා දෙමු:

Cells.Find(“*”, searchorder:=xlByRows, searchdirection:=xlPrevious)

කුමක්ද := ”*” – තරු ලකුණ යනු ඕනෑම පෙළක් හෝ අංකයක් සොයා ගන්නා Wildcard අක්ෂරයකි සෛලය තුළ. එය මූලික වශයෙන් හිස් නොවන සඳහා ගවේෂණයට සමාන වේcell.

SearchOrder:=xlByRows – මෙයින් අදහස් කරන්නේ ඊළඟට යාමට පෙර එක් එක් පේළිය හෑරීමට සෙවීමයි. SearchDirection තර්කය මත පදනම්ව වමේ සිට දකුණට හෝ දකුණේ සිට වමට දිශාව සොයනු ලැබේ. මෙහි ඇති අතිරේක විකල්පය xlByColumns වේ, එය අවසාන තීරුව ස්ථානගත කිරීමේදී භාවිතා වේ.

SearchDirection:=xlPrevious – මෙය ගවේෂණය කළ යුතු දිශාව තීරණය කරයි. xlPrevious යන්නෙන් අදහස් වන්නේ එය දකුණේ සිට වමට හෝ පහළ සිට ඉහළට සොයනු ඇති බවයි. අනෙක් විකල්පය වන්නේ ප්‍රතිවිරුද්ධ මාර්ගයට මාරු වන xlNext වේ.

📌 පියවර

පළමුව, VBA සංස්කාරකය විවෘත කරන්න.

ඉන්පසු, පහත කේතය ටයිප් කරන්න:

8996

දැන්, ගොනුව සුරකින්න. ඉන්පසු, Macro සංවාද කොටුව විවෘත කිරීමට Alt+F8 ඔබන්න. range_find_method තෝරන්න.

ඉන්පසු Run මත ක්ලික් කරන්න.

අවසානයේදී, එය අපගේ Excel වැඩ පත්‍රිකාවේ දත්ත සහිත අවසාන පේළිය සොයා ගනී.

3. VBA භාවිතයෙන් අවසන් පේළිය සොයා ගැනීමට විශේෂ සෛල ශ්‍රිතය භාවිතා කිරීම

මෙය ක්‍රමය ක්‍රියා කරන්නේ ඔබේ යතුරුපුවරුවේ Ctrl+End එබීම වැනි ය. ඔබ ඔබේ යතුරුපුවරුවේ Ctrl+End එබූ විට, ඔබ කොතැනක සිටියත් එය සැමවිටම ඔබව අවසාන පේළියට ගෙන යනු ඇත. නමුත් ඔබට Excel හි VBA කේත භාවිතයෙන් දත්ත සහිත අවසන් වරට භාවිතා කළ පේළිය සොයා ගැනීමට අවශ්‍ය නම්, මෙම කේතය ඔබට අත්‍යවශ්‍ය වේ.

📌 පියවර

පළමුව, VBA සංස්කාරකය විවෘත කරන්න.

ඉන්පසු, පහත කේතය ටයිප් කරන්න:

3833

දැන්, ගොනුව සුරකින්න. ඉන්පසු,Macro සංවාද කොටුව විවෘත කිරීමට Alt+F8 ඔබන්න. තෝරන්න specialcels_method .

ඉන්පසු Run මත ක්ලික් කරන්න.

ඔබට පෙනෙන පරිදි, Excel හි VBA භාවිතයෙන් දත්ත සහිත අවසාන පේළිය සොයා ගැනීමට අපි සාර්ථක වී ඇත.

4. UsedRange Function භාවිතයෙන් දත්ත සමඟ පරාසයක ඇති අවසාන පේළිය සොයා ගැනීම

VBA හි UsedRange යනු යම් වැඩ පත්‍රිකාවක භාවිතා කරන ලද පරාසය නියෝජනය කරන (සියලු Excel සෛල භාවිතා කරන හෝ වැඩ පත්‍රිකාවක පටවා ඇති) පරාස වස්තුවක් ආපසු ලබා දෙන වැඩ පත්‍රිකාවේ සන්තකයකි. එය දේපලක් වන අතර එහි අර්ථය වන්නේ වැඩ පත්‍රිකාවක ඉහළ වම් භාවිත කළ කොටු සහ අවසන් දකුණ භාවිත කළ සෛල මගින් ආවරණය කරන ලද හෝ නිශ්චිතව දක්වා ඇති ප්‍රදේශයයි.

📌 පියවර

පළමුව, VBA සංස්කාරකය විවෘත කරන්න.

ඉන්පසු, පහත කේතය ටයිප් කරන්න:

5677

දැන්, ගොනුව සුරකින්න. ඉන්පසු, Macro සංවාද කොටුව විවෘත කිරීමට Alt+F8 ඔබන්න. usedRange_method තෝරන්න.

ඉන්පසු Run මත ක්ලික් කරන්න.

අවසාන වශයෙන්, ඔබ Excel හි වැඩ පත්‍රිකාවක අවසන් වරට භාවිතා කළ පේළිය සාර්ථකව දකිනු ඇත.

5. Excel හි VBA භාවිතයෙන් වගු පරාසය භාවිතා කිරීම

ඔබට තිබේ නම් ඔබගේ වැඩ පත්‍රිකාවේ ඇති වගුව, ඔබට මෙම ක්‍රමය සමඟ දත්ත සහිත අවසාන පේළිය සොයාගත හැක.

📌 පියවර

පළමුව, VBA සංස්කාරකය විවෘත කරන්න .

ඉන්පසු, පහත කේතය ටයිප් කරන්න:

4067

සටහන : මෙන්න, අපි අපේ දත්ත කට්ටලය ආරම්භ වූ විට අවසාන පේළිය සමඟ 3ක් එකතු කරමු. පේළිය 3 ට පසුව.

දැන්, ගොනුව සුරකින්න. ඉන්පසු Alt+F8 ඔබන්නමැක්රෝ සංවාද කොටුව විවෘත කිරීමට. TableRange_method තෝරන්න.

ඉන්පසු Run මත ක්ලික් කරන්න.

ඔබට පෙනෙන පරිදි, Excel හි දත්ත සහිත අවසාන පේළිය සොයා ගැනීමට අපි VBA කේතවල වගු පරාසය ක්‍රමය සාර්ථකව භාවිතා කර ඇත.

6. සොයා ගැනීමට නම් කළ පරාසය භාවිතා කරන්න පරාසයක දත්ත සහිත අවසාන පේළිය

මෙම ක්‍රමය Excel හි බහුලව භාවිතා නොවේ. නමුත්, ඔබේ දැනුම පොහොසත් කිරීමට ඔබ මෙය ඉගෙන ගත යුතු යැයි අපි සිතමු.

ඔබගේ දත්ත කට්ටලයට නම් කළ පරාසයක් තිබේ නම්, ඔබට මෙම කේතය භාවිතා කළ හැක. පහත තිර රුවක් දෙස බලන්න. එහි නම් කළ පරාසයක් ඇත.

📌 පියවර

පළමුව, VBA සංස්කාරකය විවෘත කරන්න. .

ඉන්පසු, පහත කේතය ටයිප් කරන්න:

5690

සටහන : අපගේ පරාසය 1 පේළියෙන් පසුව ආරම්භ වූ නිසා අපි LastRow වෙත 1 එකතු කරමු. .

දැන්, ගොනුව සුරකින්න. ඉන්පසුව, මැක්‍රෝ සංවාද කොටුව විවෘත කිරීමට Alt+F8 ඔබන්න. nameRange_method තෝරන්න.

ඉන්පසු Run මත ක්ලික් කරන්න.

ඔබට පෙනෙන පරිදි, VBA භාවිතයෙන් දත්ත සහිත අවසාන පේළිය සොයා ගැනීමට අපි සාර්ථක වෙමු.

7. Excel හි VBA හි වත්මන් ප්‍රදේශ ක්‍රියාකාරිත්වය

ඔබට VBA හි CurrentRegion ක්‍රමයද භාවිතා කළ හැක. Excel හි අවසන් වරට භාවිතා කළ පේළිය සොයා ගැනීමට. එය උපක්‍රමශීලී වුවද, ඔබට අවශ්‍ය නම් මෙය ඔබගේ ප්‍රයෝජනයට යොදා ගත හැක.

📌 පියවර

පළමුව, VBA Editor එක විවෘත කරන්න.

ඉන්පසු, පහත කේතය ටයිප් කරන්න:

2243

සටහන : පරාසයේ පළමු කොටුව විය යුතුයඔබගේ දත්ත කට්ටලය. ඔබේ තේරීම අනුව ඔබේ පේළි අංකය එකතු කරන්න. මෙන්න, අපි 3 එකතු කළේ අපගේ දත්ත කට්ටලය 3 පේළියෙන් පසුව ආරම්භ වූ බැවිනි.

දැන්, ගොනුව සුරකින්න. ඉන්පසු, Macro සංවාද කොටුව විවෘත කිරීමට Alt+F8 ඔබන්න. තෝරන්න CurrentRegion_method

ඉන්පසු Run මත ක්ලික් කරන්න.

ඔබට පෙනෙන පරිදි, අපි VBA කේතය භාවිතයෙන් දත්ත සහිත අවසාන පේළිය සාර්ථකව සොයාගෙන ඇත.

💬 මතක තබා ගත යුතු දේ

Range.End පමණක් ක්‍රියා කරයි තනි පේළියක් හෝ තීරුවක්. ඔබගේ දත්ත කට්ටලය හිස් කොටු විශාල ප්‍රමාණයක් අඩංගු නම්, දත්ත සහිත අවසාන පේළිය සොයා ගැනීම අපහසු වනු ඇත.

සමහර විට, කේතය ක්‍රියාත්මක කිරීම සඳහා ඔබේ ක්‍රමවලට යම් අගයන් එකතු කිරීමට සිදුවේ. සුමට ලෙස. අපි අන්තිම කොටුව සොයා ගැනීමට පේළි අංක එකතු කළෙමු. එබැවින්, ඔබේ දත්ත කට්ටලය ආරම්භ වූයේ කොතැනින්ද යන්න ඔබ මතක තබා ගත යුතුය.

නිගමනය

නිමා කිරීමට, මෙම නිබන්ධනය ඔබට පරාසයක දත්ත සමඟ අවසාන පේළිය සොයා ගැනීමට ප්‍රයෝජනවත් දැනුමක් ලබා දී ඇතැයි මම බලාපොරොත්තු වෙමි. Excel හි VBA භාවිතා කිරීම. මෙම උපදෙස් සියල්ල ඉගෙන ගෙන ඔබේ දත්ත කට්ටලයට අදාළ කර ගැනීමට අපි නිර්දේශ කරමු. පුහුණු වැඩපොත බාගත කර ඔබම උත්සාහ කරන්න. එසේම, අදහස් දැක්වීමේ කොටසෙහි ප්‍රතිපෝෂණ ලබා දීමට නිදහස් වන්න. ඔබගේ වටිනා ප්‍රතිපෝෂණය මෙවැනි නිබන්ධන නිර්මාණය කිරීමට අපව දිරිමත් කරයි.

විවිධ Excel සම්බන්ධ ගැටළු සහ විසඳුම් සඳහා Exceldemy.com අපගේ වෙබ් අඩවිය පරීක්ෂා කිරීමට අමතක නොකරන්න.

නව ක්‍රම ඉගෙන ගෙන දිගටම වර්ධනය වන්න!

Hugh West යනු ක්ෂේත්‍රයේ වසර 10කට වැඩි පළපුරුද්දක් ඇති ඉතා පළපුරුදු Excel පුහුණුකරුවෙකු සහ විශ්ලේෂකයෙකි. ඔහු ගිණුම්කරණය සහ මූල්‍ය පිළිබඳ ශාස්ත්‍රවේදී උපාධියක් සහ ව්‍යාපාර පරිපාලනය පිළිබඳ ශාස්ත්‍රපති උපාධියක් ලබා ඇත. හියු ඉගැන්වීම සඳහා දැඩි ආශාවක් ඇති අතර අනුගමනය කිරීමට සහ තේරුම් ගැනීමට පහසු වන අද්විතීය ඉගැන්වීම් ප්‍රවේශයක් වර්ධනය කර ඇත. ඔහුගේ Excel පිළිබඳ විශේෂඥ දැනුම ලොව පුරා සිටින දහස් ගණනක් සිසුන්ට සහ වෘත්තිකයන්ට ඔවුන්ගේ කුසලතා වැඩිදියුණු කිරීමට සහ ඔවුන්ගේ වෘත්තීය ජීවිතය තුළ විශිෂ්ටත්වයට පත් කිරීමට උපකාර කර ඇත. ඔහුගේ බ්ලොගය හරහා, හියු ඔහුගේ දැනුම ලෝකය සමඟ බෙදා ගනී, නොමිලේ එක්සෙල් නිබන්ධන සහ පුද්ගලයන්ට සහ ව්‍යාපාරවලට ඔවුන්ගේ පූර්ණ හැකියාවන් කරා ළඟා වීමට උපකාර කිරීමට මාර්ගගත පුහුණුව ලබා දෙයි.