අන්තර්ගත වගුව
මෙම නිබන්ධනය Excel හි තීරුවක භාවිතා කළ පරාසය තේරීමට VBA භාවිතා කිරීම සඳහා 8 උදාහරණ පෙන්වයි. සාමාන්‍යයෙන්, excel හි ඇති UsedRange ගුණාංගය මඟින් දත්ත ඇති වැඩ පත්‍රිකාවක කොටස නියෝජනය කරයි. උදාහරණ පැහැදිලිව නිදර්ශනය කිරීම සඳහා, අපි සියලු උදාහරණ සඳහා විශේෂිත දත්ත කට්ටලයක UsedRange දේපල යොදන්නෙමු.
පුහුණු වැඩපොත බාගන්න
අපට පුහුණු වැඩපොත මෙතැනින් බාගත කළ හැක. .
VBA Column.xlsm හි UsedRange තේරීමට
8 තීරුවේ UsedRange තේරීමට VBA සඳහා පහසු උදාහරණ
පහත රූපයේ , අපි සියලු උදාහරණ සඳහා භාවිතා කරන දත්ත කට්ටලය අපට දැකිය හැකිය. දත්ත කට්ටලය තුළ විකුණුම්කරුවන් , ඔවුන්ගේ ස්ථානය , කලාපය, සහ ‘ මුළු මුදල ’ විකුණුම්වල නම් අඩංගු වේ. මෙම දත්ත කට්ටලය තුළ, භාවිතා කළ පරාසය ශීර්ෂය ඇතුළුව සලකා බලනු ඇත. එබැවින්, පහත දත්ත කට්ටලයේ භාවිතා කළ පරාසය ( B2:E15 ) වේ.
1. Excel
හි VBA සමඟ තීරුවේ UsedRange තෝරන්න.පළමුව සහ ප්‍රධාන වශයෙන්, අපි අපගේ දත්ත කට්ටලයෙන් සියලුම තීරු තෝරා ගනිමු. මෙය සිදු කිරීම සඳහා අපි තීරු තුළ VBA තෝරන්න UsedRange දේපල භාවිතා කරන්නෙමු. මෙම ක්‍රමය ක්‍රියාත්මක කිරීමට පියවර බලමු.
පියවර:
- ආරම්භ කිරීමට, නම් කර ඇති ක්‍රියාකාරී පත්‍රය මත දකුණු-ක්ලික් කරන්න ' තීරු_තෝරන්න '.
- ඊට අමතරව, ' කේතය බලන්න ' විකල්පය තෝරන්න.
9363
- ඉන් පසු, කේතය ක්‍රියාත්මක කිරීමට Run හෝ F5 යතුර ඔබන්න.
2.
තීරුවේ සම්පූර්ණ භාවිත පරාසය පිටපත් කිරීමට VBA භාවිත කරන්න. දෙවන උදාහරණයේදී, අපි අපගේ දත්ත කට්ටලයෙන් තීරු වල භාවිතා කරන ලද සම්පූර්ණ පරාසය පිටපත් කිරීමට VBA භාවිතා කරන්නෙමු. සාමාන්‍යයෙන්, අපගේ දත්ත කට්ටලයෙන් නිශ්චිත කලාපයක් පිටපත් කිරීමට අපි මෙම ක්‍රමය භාවිතා කරමු. මෙම ක්‍රමය ක්‍රියාත්මක කිරීම සඳහා අපි පහත පියවර අනුගමනය කළ යුතුයි.
පියවර:
- පළමුව, ' පිටපත් කරන්න<නමැති සක්‍රිය වැඩ පත්රිකාව වෙත යන්න. 2>'.
- ඊළඟට, එම ටැබය මත දකුණු-ක්ලික් කරන්න සහ ' View Code ' විකල්පය තෝරන්න.
- එය වත්මන් වැඩ පත්රිකාව සඳහා හිස් VBA කේත කවුළුවක් විවෘත කරනු ඇත. මෙම කවුළුව ලබා ගැනීමට තවත් ක්රමයක් නම් යතුරුපුවරුවෙන් Alt + F11 ඔබන්න.
- ඉන්පසු, එම කේත කවුළුවට පහත කේතය ඇතුළු කරන්න:
3666
- දැන්, කේතය ක්‍රියාත්මක කිරීමට Run මත ක්ලික් කරන්න නැතහොත් F5 යතුර ඔබන්න.
- අවසාන වශයෙන් අපට පහත පරිදි ප්රතිඵලය දැකිය හැක. එසේම, භාවිතා කරන ලද පරාසය වටා අපට මායිම් රේඛාවක් දැකිය හැකිය. කේතය දත්ත පිටපත් කර ඇති බව එයින් පෙන්නුම් කරයිමෙම මායිම තුළ.
වැඩිදුර කියවන්න: Excel VBA: Dynamic Range වෙනත් වැඩපොතකට පිටපත් කරන්න
3. ගණන් කිරීමේ අංකය VBA භාවිතා කරමින් UsedRange හි ඇති තීරු
තුන්වන උදාහරණයේ දී, අපි excel VBA තෝරන්න භාවිතා කළ පරාසය ක්‍රමය තීරුවේ භාවිතා කර අපගේ දත්ත කට්ටලයේ තීරු ගණන ගණන් කරන්නෙමු. . මෙම උදාහරණය අපගේ දත්ත කට්ටලයේ භාවිතා කළ පරාසය තුළ ඇති මුළු තීරු ගණන පණිවිඩ පෙට්ටියක ලබා දෙනු ඇත. මෙම ක්‍රමය ක්‍රියාත්මක කිරීමට පහත පියවර අනුගමනය කරන්න.
පියවර:
- පළමුව, ' Count_Columns ' නම් සක්‍රිය පත්‍රය තෝරන්න.
- දෙවනුව, ක්‍රියාකාරී පත්‍රයේ නම මත දකුණු-ක්ලික් කරන්න සහ ' View Code ' විකල්පය මත ක්ලික් කරන්න.
3>
- ඉහත විධානය මඟින් සක්‍රිය වැඩ පත්රිකාව සඳහා හිස් VBA කේත කවුළුවක් විවෘත කරයි. යතුරුපුවරුවෙන් Alt + F11 එබීමෙන් අපට කේත කවුළුව ලබා ගත හැක.
- තෙවනුව, එම හිස් කේත කවුළුවට පහත කේතය ඇතුළත් කරන්න: 14>
3563
- ඊළඟට, ධාවනය මත ක්ලික් කරන්න නැතහොත් කේතය ක්‍රියාත්මක කිරීමට F5 යතුර ඔබන්න.
3>
- අවසාන වශයෙන්, අපට පණිවිඩ පෙට්ටියක් තුළ ප්රතිඵලය ලැබේ. භාවිත පරාසයේ ඇති තීරු ගණන 4 වේ.
තව කියවන්න: පරාසයේ පේළි ගණන් කිරීමට VBA භාවිතා කරන්නේ කෙසේද Excel (5 Macros) හි දත්ත සමඟ
4. Excel VBA සිට භාවිත කළ පරාසයේ අවසාන තීරු ගණන ගණන් කිරීමට
පෙර ක්‍රමයේදී, අපි අවසන් තීරුවේ අංකය උපුටා ගත්තෙමු. භාවිතා කළ පරාසය.කෙසේ වෙතත්, මෙම උදාහරණයේදී, අපි VBA තෝරන්න UsedRange property භාවිතයෙන් සම්පූර්ණ වැඩ පත්රිකාව හරහා භාවිතා කළ පරාසයේ අවසාන තීරු ගණන තීරණය කරන්නෙමු. මෙම ක්‍රියාව සිදු කිරීමට අප අනුගමනය කළ යුතු පියවර බලමු.
පියවර:
- ආරම්භ කිරීමට, දකුණු-ක්ලික් කරන්න ' අවසන් තීරුව ' නම් සක්‍රිය පත්‍රයේ.
- ඊළඟට, ' කේතය බලන්න ' විකල්පය තෝරන්න.
- ඉතින්, ඉහත විධානය එම වැඩ පත්රිකාව සඳහා හිස් VBA කේත කවුළුවක් විවෘත කරයි. එම කේත කවුළුව විවෘත කිරීමට විකල්ප ක්රමයක් නම් Alt + F11 ඔබන්න.
- ඉන්පසු, එම කේත කවුළුවට පහත කේතය ඇතුළු කරන්න:
8228
- දැන්, Run මත ක්ලික් කරන්න නැතහොත් කේතය ක්‍රියාත්මක කිරීමට F5 යතුර ඔබන්න.
- අවසානයේදී, අපට අපගේ ප්රතිඵලය පණිවිඩ පෙට්ටියකින් ලැබේ. භාවිතා කළ පරාසයේ අවසාන තීරුව වන්නේ වැඩ පත්‍රිකාවේ 5 වන තීරුවයි.
සමාන කියවීම්
- Excel හි පරාසයක එක් එක් පේළිය සඳහා VBA භාවිතා කරන්නේ කෙසේද
- Excel හි Active Cell වෙතින් පරාසයක් තේරීමට VBA භාවිතා කරන්න (3 ක්‍රම)
- Excel මැක්‍රෝ: ගතික පරාසයකින් බහු තීරු වර්ග කරන්න (ක්‍රම 4)
5. UsedRange වෙතින් VBA සමඟින් අවසාන තීරුවේ අවසාන කොටුව තෝරන්න
පස්වන උදාහරණයේ දී, අපි එක්සෙල් පත්‍රයක අවසාන තීරුවේ අවසාන කොටුව තේරීමට VBA තෝරන්න භාවිතා කළ පරාසය දේපල භාවිතා කරමු. මෙම උදාහරණය නිදර්ශනය කිරීම සඳහා, අපිඅපගේ පෙර දත්ත කට්ටලය සමඟ දිගටම කරගෙන යනු ඇත. දැන්, මෙම ක්‍රමය කිරීමට ඇති පියවර දෙස බලන්න.
පියවර:
- පළමුව, ' Last_Cell<2 නම් ක්‍රියාකාරී පත්‍රය තෝරන්න>'.
- ඊළඟට, එම පත්‍රයේ නම මත දකුණු-ක්ලික් කරන්න . ' View Code ' විකල්පය තෝරන්න.
- ඉන්පසු, අපට හිස් VBA කේත කවුළුවක් ලැබේ . එසේම, එම කේත කවුළුව විවෘත කිරීමට අපට Alt + F11 ඔබන්න.
- ඊට පසුව, එම කේත කවුළුවේ පහත කේතය ටයිප් කරන්න:
4149
- දැන්, කේතය ක්‍රියාත්මක කිරීමට Run මත ක්ලික් කරන්න නැතහොත් F5 ඔබන්න.
- අවසාන වශයෙන්, අපට පහත රූපයේ ප්රතිඵලය දැකිය හැක. අවසාන තීරුවේ තෝරාගත් අවසාන කොටුව E15 සෛලය වේ.
6. Excel VBA
සමඟ තෝරාගත් UsedRange හි Cell Range සොයන්නමෙම උදාහරණයේදී, එක්සෙල් වැඩ පත්‍රිකාවක තෝරාගත් භාවිත පරාසයේ සෛල පරාසය සොයා ගැනීමට අපි VBA යොදන්නෙමු. අපි භාවිත කළ පරාසයේ සියලුම තීරු සඳහා VBA කේතය භාවිත කරන්නෙමු. කේතය සෛල පරාසය මෙන්ම භාවිතා කළ පරාසයේ ඇති තීරුවේ ලිපිනය ලබා දෙනු ඇත. මෙම ක්‍රියාව සිදු කිරීමට පහත පියවර අනුගමනය කරන්න.
පියවර:
- ආරම්භයේදී, සක්‍රිය පත්‍ර ටැබය මත දකුණු-ක්ලික් කරන්න ' Cell Range සොයන්න ' ලෙස නම් කර ඇත.
- දෙවනුව, ' View Code ' විකල්පය තෝරන්න.
- එය හිස් VBA කේත කවුළුවක් විවෘත කරයි. මෙම කේත කවුළුව විවෘත කිරීමට තවත් ක්රමයක් වන්නේ Alt ඔබන්න + F11 .
- තෙවනුව, එම කේත කවුළුව තුළ පහත කේතය ඇතුළත් කරන්න:
4021
- ඉන්පසු, කේතය ක්‍රියාත්මක කිරීමට ක්ලික් කරන්න ධාවනය නැතහොත් F5 යතුර ඔබන්න.
3>
- අවසානයේ, මෙවැනි පණිවිඩ පෙට්ටියක් පහත රූපයේ ප්රතිඵලය පෙන්වයි.
සමාන කියවීම්
- VBA to Loop to Rows සහ Excel හි පරාසයක තීරු (උදාහරණ 5)
- Excel VBA හි පරාසය Array බවට පරිවර්තනය කරන්නේ කෙසේද (විධි 3)
7. ඇතුළු කරන්න VBA UsedRange Property to count Empty Cells
මෙම උදාහරණයේදී, Excel පත්‍රයක හිස් කොටු ගණන් කිරීමට අපි VBA තෝරන්න UsedRange property භාවිතා කරමු. සමහර විට අපගේ දත්ත කට්ටලයේ භාවිතා කළ පරාසයේ හිස් කොටු තිබිය හැක. UsedRange property භාවිතා කිරීමෙන් අපට එම හිස් කොටු වල අංක පහසුවෙන් ගණන් කළ හැක. මෙම උදාහරණය ක්‍රියාත්මක කිරීමට පියවර බලමු.
පියවර:
- පළමුව, ' නම් සක්‍රිය පත්‍ර ටැබය මත දකුණු-ක්ලික් කරන්න Empty_Cells '.
- ඊළඟට, ' View Code ' විකල්පය තෝරන්න.
- ඉහත ක්‍රියාව හිස් VBA කේත කවුළුවක් විවෘත කරයි. එම කේත කවුළුව විවෘත කිරීමට විකල්ප ක්රමයක් වන්නේ Alt + F11 ඔබන්න.
- ඉන්පසු, එම කේත කවුළුව තුළ පහත කේතය ඇතුළු කරන්න:
5088
- ඉන් පසු, ධාවනය මත ක්ලික් කරන්න නැතහොත් කේතය ක්‍රියාත්මක කිරීමට F5 යතුර ඔබන්න.
- අවසාන වශයෙන්, අපට පණිවිඩ පෙට්ටිය තුළ ප්රතිඵලය ලැබෙනු ඇත. එමපණිවිඩ පෙට්ටිය අපගේ භාවිත කළ පරාසයේ ඇති සම්පූර්ණ සෛල සහ හිස් කොටු ගණන පෙන්වනු ඇත.
8. VBA UsedRange to Locate First Empty Cell in Column in Excel
අවසාන උදාහරණයේදී, අපගේ එක්සෙල් වැඩ පත්‍රිකාවේ පළමු හිස් කොටුව සොයා ගැනීමට තීරුවේ ඇති භාවිතා කළ පරාසය දේපල තේරීමට අපි excel VBA භාවිතා කරමු. මෙම ක්‍රමය මඟින් යම් තීරුවක පළමු හිස් කොටුව සොයා ගනු ඇත. හිස් කොටුව සැමවිටම දත්ත කට්ටලයේ භාවිත පරාසයෙන් පිටත පවතිනු ඇත. එබැවින්, භාවිතා කරන ලද පරාසය තුළ කිසියම් සෛලයක් හිස් හෝ හිස් නම් එය මෙම ක්‍රමයේදී සලකා බලනු නොලැබේ. දැන්, මෙම ක්‍රමය ක්‍රියාත්මක කිරීමට පහත පියවර අනුගමනය කරන්න.
පියවර:
- ආරම්භ කිරීමට, සක්‍රිය මත දකුණු-ක්ලික් කරන්න පත්‍ර ටැබය ' First_Empty '.
- ඊට අමතරව, ' View Code ' විකල්පය තෝරන්න.
<3
- එය හිස් VBA කේත කවුළුවක් විවෘත කරයි. එම කේත කවුළුව විවෘත කිරීමට අපට Alt + F11 ඔබන්න.
- තව, හිස් VBA කේත කවුළුව තුළ පහත කේතය ටයිප් කරන්න:
1222
- ඉන්පසු, කේතය ක්‍රියාත්මක කිරීමට Run මත ක්ලික් කරන්න නැතහොත් F5 යතුර ඔබන්න.
- අවසාන වශයෙන්, ඉහත කේතය E16 කොටුව තුළ ' FirstEmptyCell ' අගය ඇතුල් කරනු ඇත. එය දත්ත කට්ටලයේ භාවිතා කළ පරාසයට පසුව E තීරුවේ පළමු හිස් කොටුව වේ.
වැඩිදුර කියවන්න: Excel VBA වෙත හිස් කොටුව තෙක් පරාසය හරහා ලූප් කරන්න (උදාහරණ 4)
නිගමනය
කෙටියෙන් කිවහොත්, මෙම නිබන්ධනය Excel පත්‍රයක VBA තෝරන්න UsedRange දේපල භාවිතා කිරීමට 8 උදාහරණ පෙන්වයි. පරීක්ෂණයට ඔබේ කුසලතා සැකසීමට, මෙම ලිපිය සඳහා භාවිතා කරන ලද පුහුණු වැඩ පත්රිකාව බාගන්න. ඔබට කිසියම් විමසීමක් ඇත්නම් පහත කොටුවේ අදහස් දැක්වීමට කරුණාකර නිදහස් වන්න. අපගේ කණ්ඩායම හැකි ඉක්මනින් ඔබගේ පණිවිඩයට ප්‍රතිචාර දැක්වීමට උත්සාහ කරනු ඇත. අනාගතයේදී වඩාත් නව්‍ය Microsoft Excel විසඳුම් සඳහා විමසිල්ලෙන් සිටින්න.
