අන්තර්ගත වගුව
මෙම ලිපියෙන්, මම ඔබට Excel හි VBA හි UsedRange ගුණාංගය භාවිතා කළ හැකි ආකාරය පෙන්වන්නම්. සංවෘත පරාසයක් සඳහා, විසිරුණු පරාසයක් සඳහා, අක්‍රිය වැඩ පත්‍රිකාවක් සඳහා සහ අක්‍රිය වැඩපොතක් සඳහා UsedRange දේපල භාවිතා කිරීමට ඔබ ඉගෙන ගනු ඇත.
පුහුණු වැඩපොත බාගන්න
ඔබ මෙම ලිපිය කියවන අතරතුර පුහුණු වීමට මෙම වැඩපොත බාගන්න.
Excel VBA UsedRange.xlsm
UsedRange Property වෙත හැඳින්වීමක් Excel හි VBA
VBA හි UsedRange ගුණාංගය Range වස්තුවක් ලබා දෙයි. එය ආරම්භයේ හිස් පේළියක් ඇතුළුව භාවිතා කර ඇති වැඩ පත්‍රිකාවක ඇති සියලුම සෛල වලින් සමන්විත පරාසයක් ලබා දෙයි.
VBA කේතය තුළ, UsedRange ගුණාංගය වැඩ පත්‍රිකාවේ නම සමඟ භාවිතා කළ යුතුය. එබැවින් සක්‍රිය වැඩ පත්‍රිකාව සඳහා UsedRange ගුණාංගය භාවිතා කිරීම සඳහා පොදු වාක්‍ය ඛණ්ඩය වන්නේ:
Dim Rng As Range
Set Rng = ActiveSheet.UsedRange
⧭ සටහන්:
- මෙහි Rng යනු UsedRange දේපල මගින් ආපසු ලබා දෙන පරාසයේ නමයි. ඔබට ඔබ කැමති ඕනෑම දෙයක් භාවිතා කළ හැක.
- ක්‍රියාකාරී එක හැර වෙනත් වැඩ පත්‍රිකාවක UsedRange දේපල ක්‍රියාත්මක කිරීමට, ඒ වෙනුවට වැඩ පත්‍රිකාවේ නම භාවිතා කරන්න.
උදාහරණයක් ලෙස, එය Sheet1 නම් වැඩ පත්‍රිකාවක යෙදීමට, ඇතුළු කරන්න:
Set Rng = Worksheets("Sheet1").UsedRange
4 ක්‍රම Excel හි VBA හි UsedRange දේපල භාවිතා කිරීමට
මෙන්න වඩාත් පොදු 4 VBA හි UsedRange දේපල භාවිතා කිරීමට ක්‍රම.
1. සංවෘත පරාසයක් සඳහා VBA UsedRange දේපල
මුලින්ම, අපි VBA UsedRange දේපල සංවෘත පරාසයක් සහිත වැඩ පත්‍රිකාවක් සඳහා භාවිතා කරන්නෙමු.
එය' ආරම්භයේ හිස් පේළියක් ඇතුළුව මුළු පරාසයම ආපසු ලබා දෙනු ඇත.
මෙහි අපට Sheet1 නමින් වැඩ පත්‍රිකාවක් ලැබී ඇත, එහි නම්, සම්බන්ධ වන දින සහ වැටුප් ඇතුළත් සංවෘත පරාසයක් අඩංගු වේ. සමාගමක සමහර සේවකයින්.
දැන් ඔබ මෙම වැඩ පත්‍රිකාවේ UsedRange දේපල භාවිතා කරන්නේ නම්, එය B2:C13 පරාසය ආපසු ලබා දෙනු ඇත. (ආරම්භයේ හිස් පේළියක් ඇතුළුව).
Sheet1 සක්‍රිය නම්, ඔබට මෙය භාවිතා කළ හැක:
Dim Rng As Range
Set Rng = ActiveSheet.UsedRange
නැතහොත් ඔබට භාවිතා කළ හැක:
Dim Rng As Range
Set Rng = Worksheets("Sheet1").UsedRange
⧭ ප්‍රතිදානය :
අපි කේතය තුළ Select Range ගුණාංගය භාවිතා කර ඇත. එබැවින්, අපි කේතය ධාවනය කරන්නේ නම්, එය Sheet1 හි B2:D13 පරාසය තෝරන්න.
වැඩිදුර කියවන්න: Excel හි VBA පරාසයේ වස්තුව භාවිතා කරන්නේ කෙසේද (5 ගුණාංග)
2. විසිරුණු පරාසයක් සඳහා VBA UsedRange Property
ඔබට ඕනෑම වැඩ පත්‍රිකාවක විසිරුණු පරාසයක් තිබේ නම්, UsedRange දේපල ඒ අතර ඇති හිස් කොටු ඇතුළු පරාසයක් ලබා දෙයි.
0>දැන්, Sheet1 හි, අපට මුළු වැටුප, ඉහළම වැටුප සහ අඩුම වැටුප B3 කොටුවේ සිට විවිධ ස්ථානවල විසිරී ඇත. G3 , මේ වගේ: 
දැන් UsedRange ගුණාංගය භාවිත කිරීමට කේත පේළි දෙකෙන් ඕනෑම එකක් භාවිත කරන්න.
Dim Rng As Range
Set Rng = ActiveSheet.UsedRange
හෝ
Dim Rng As Range
Set Rng = Worksheets("Sheet1").UsedRange
⧭ ප්‍රතිදානය:
එය හිස් සෛල (ඇතුළුව) Sheet1 හි B2:G3 පරාසය තුළ ඇති සියලුම සෛල ආපසු ලබා දෙයි ආරම්භයේ හිස් පේළියක්). අපි Range හි Select ගුණාංගය භාවිතා කර ඇති බැවින්, එය B2:G3.
පරාසය තෝරනු ඇත. 20>
තවත් කියවන්න: එක්සෙල් හි VBA භාවිතා කරන පරාසයක අවසානය (උදාහරණ සහිතව)
සමාන කියවීම්
- Excel VBA පරාසය වෙනත් පත්‍රයකට පිටපත් කරන්න (පහසුම ක්‍රම 8ක්)
- Excel VBA සමඟින් එක් එක් සෛලය සඳහා පරාසයක් හරහා ලූප් කරන්න (Ultimate මාර්ගෝපදේශය)
- VBA හි Excel Subscript Out of Range Error (විසඳුම් 5ක් සමඟ)
3. අක්‍රිය වැඩ පත්‍රිකාවක් සඳහා VBA UsedRange Property
අපිට UsedRange දේපල අක්‍රිය වැඩ පත්‍රිකාවක් මත ක්‍රියාත්මක කිරීමට අවශ්‍ය නම්, ඔබ මුලදී වැඩ පත්‍රිකාවේ නම සඳහන් කළ යුතුය.
උදාහරණයක් ලෙස, මෙහි මගේ ක්‍රියාකාරී වැඩ පත්‍රිකාව Sheet1 වේ.
Sheet2 හි UsedRange ගුණාංගය භාවිතා කිරීමට, අපට භාවිතා කිරීමට සිදුවේ :
Dim Rng As Range
Set Rng = Worksheets("Sheet2").UsedRange
එය Sheet2 ලෙස හඳුන්වන වැඩ පත්‍රිකාවේ භාවිතා කරන ලද සියලුම සෛල තෝරන්න.
තවත් කියවන්න: VBA පරාසය සැකසීමට Excel (උදාහරණ 7)
4.අක්‍රිය වැඩපොතක් සඳහා VBA UsedRange දේපල
ඔබට සක්‍රිය නොවන වැඩපොතක් සඳහා UsedRange දේපල පවා භාවිතා කළ හැක. වැඩපොතේ නම ඉදිරියෙන් තබන්න.
උදාහරණයක් ලෙස, මෙහි මගේ ක්‍රියාකාරී වැඩපොත වැඩපොත1 වේ. Workbook2 හි Sheet1 ට වඩා UsedRange දේපල ක්‍රියාත්මක කිරීමට, අපට භාවිතා කිරීමට සිදුවේ:
Dim Rng As Range
Set Rng = Workbooks("Workbook2.xlsm").Worksheets("Sheet1").UsedRange
එය <1 හි Sheet1 වැඩ පත්‍රිකාවේ භාවිත පරාසය තෝරනු ඇත>වැඩපොත2 .
වැඩිදුර කියවන්න: එක්සෙල් පරාසයේ එක් එක් සෛල සඳහා VBA (ක්‍රම 3) <3
මතක තබාගත යුතු දේවල්
VBA හි UsedRange ගුණාංගය Range වස්තුවක් ලබා දෙයි. මෙන්න මෙම ලිපියේ, අපි දෘශ්‍යකරණය සඳහා Range object හි Select ගුණාංගය භාවිතා කර ඇත. නමුත් පැහැදිලිවම, ඔබට ඔබගේ පහසුව අනුව පරාසයක වෙනත් ඕනෑම දේපලක් භාවිතා කළ හැක.
නිගමනය
මෙම ක්‍රම භාවිතා කරමින්, ඔබට Excel හි UsedRange දේපල. ඔබට ප්‍රශ්න තිබේද? අපෙන් අසන්න.
