අන්තර්ගත වගුව
එක්සෙල් හි VBA සමඟින් වර්ග කිරීමට, ඔබ Range.Sort ක්‍රමය යෙදිය යුතුය. මෙම ලිපියෙන්, අපි ඔබට VBA හි Range.Sort ක්‍රමය සමඟ Excel හි තීරුව වර්ගීකරණය කරන ආකාරය පෙන්වන්නෙමු.
වැඩපොත බාගන්න
ඔබට නොමිලේ පුහුණු Excel වැඩපොත මෙතැනින් බාගත හැක.
තීරුව VBA.xlsm සමගින් වර්ග කරන්න
Range. Excel VBA හි Sort Method
Range.Sort method in VBA Excel හි අගයන් පරාසයක් වර්ග කරයි. මෙහි පරාසය යනු අපට ආරෝහණ හෝ අවරෝහණ අනුපිළිවෙලින් වර්ග කිරීමට අවශ්‍ය සෛල පරාසය සඳහන් කරන වස්තු විචල්‍යයකි.
පහත ඔබ දැනගත යුතු පරාමිති වේ. මෙම ක්‍රමය සමඟ වැඩ කරන අතරතුර ගැන.
| පරාමිතිය | අවශ්‍ය/ විකල්ප | දත්ත වර්ගය | විස්තරය |
|---|---|---|---|
| යතුර | විකල්ප | විචල්‍යය | පරාසය හෝ අගයන් සහිත තීරුව සඳහන් කරයි වර්ග කිරීමට නියමිතය වර්ග කිරීම සිදු කරනු ලබන අනුපිළිවෙල සඳහන් කරයි.
|
| ශීර්ෂකය | විකල්ප | XlYesNoGuess | පළමු පේළියේ ශීර්ෂ තිබේද නැද්ද යන්න සඳහන් කරයි .
|
Excel හි තීරු වර්ග කිරීම සඳහා VBA ක්‍රියාත්මක කිරීමේ ක්‍රම 4
මෙම කොටසේදී, ශීර්ෂයක් සහිත සහ රහිතව තනි තීරුවක් , බහු තීරු සමග වර්ග කරන්නේ කෙසේදැයි ඔබ දැන ගනු ඇත. සහ ශීර්ෂ නොමැතිව සහ Excel හි තීරුවක ඇති ශීර්ෂය දෙවරක් ක්ලික් කිරීමෙන් වර්ග කරන්නේ කෙසේද.
1. Excel හි ශීර්ෂය නොමැතිව තනි තීරුවක් වර්ග කිරීමට VBA කාවද්දන්න
ඔබට තනි තීරුවක් VBA කේතය සමඟින් ඔබේ Excel වැඩ පත්‍රිකාවේ වර්ග කිරීමට අවශ්‍ය නම් අනුගමනය කරන්න පහත පියවර.
මෙය අපගේ තීරුව වන අතර එය අපි VBA කේතය සමඟින් වර්ග කරන්නෙමු.
පියවර:
- ඔබේ යතුරුපුවරුවේ Alt + F11 ඔබන්න නැතහොත් Developer -> Visual Basic Visual Basic Editor විවෘත කිරීමට.
- උත්පතන කේත කවුළුව තුළ, මෙනු තීරුවෙන් , ක්ලික් කරන්න ඇතුළු කරන්න -> මොඩියුලය .
- පහත කේතය පිටපත් කර කේත කවුළුවට අලවන්න.
2450
ඔබේ කේතය දැන් ධාවනය කිරීමට සූදානම්.
මෙහි,
- Key1:=Range(“B5”) → නිශ්චිතව B5 කුමන තීරුව වර්ග කළ යුතුද යන්න කේතයට දැන ගැනීමට සලස්වන්න.
- Order1:=xlAscending → තීරුව ආරෝහණ අනුපිළිවෙලට වර්ග කිරීමට xlAscending ලෙස අනුපිළිවෙල සඳහන් කරන ලදී. ඔබට තීරුව අවරෝහණ අනුපිළිවෙලට වර්ග කිරීමට අවශ්‍ය නම් xlDescending ඒ වෙනුවට ලියන්න.
- ශීර්ෂකය:= xlNo →අපගේ තීරුවේ කිසිදු ශීර්ෂයක් නොමැති බැවින් අපි එය xlNo විකල්පය සමඟින් සඳහන් කළෙමු.
- F5 ඔබන්න ඔබගේ යතුරුපුවරුවේ හෝ මෙනු තීරුවෙන් තෝරන්න Run -> උප/පරිශීලක පෝරමය ධාවනය කරන්න. ඔබට මැක්‍රෝව ක්‍රියාත්මක කිරීමට උප මෙනු තීරුවේ ඇති කුඩා Play නිරූපකය මත ක්ලික් කළ හැකිය.
ඔබට පෙනෙනු ඇත ඔබේ තීරුව දැන් ආරෝහණ අනුපිළිවෙලට වර්ග කර ඇත .
මෙහිදී අපි දත්ත පරාසය පරාසය(“B5:B15” ලෙස අතින් නිර්වචනය කර ඇති බව සලකන්න. ) .
ඔබට අගයන් එකතු කිරීමෙන් හෝ මැකීමෙන් දත්ත වෙනස් කිරීමට අවශ්‍ය නම්, ඔබට දත්ත කට්ටලයේ සෛල මත පදනම්ව ස්වයංක්‍රීයව යාවත්කාලීන වන පහත කේතය ක්‍රියාත්මක කළ හැක.
9011
ඒ වෙනුවට එය සලකන්න පරාසය(“B5:B15”) මගින් අතින් පරාසය නිර්වචනය කිරීම, අපි පරාසය( “B5”, පරාසය(“B5”) ලියා ඇත. 1>End(xlDown)) .
මෙය තීරුව එහි අවසන් වරට පුරවන ලද කොටුව මත පදනම්ව වර්ග කරයි. හිස් කොටු තිබේ නම්, දත්ත සලකා බලනු ලබන්නේ පළමු හිස් කොටුව දක්වා පමණි.
වැඩිදුර කියවන්න: VBA එක්සෙල් හි වගුව වර්ග කිරීමට (ක්‍රම 4)
2. ශීර්ෂකය සමඟ තනි තීරුවක් වර්ග කිරීමට VBA මැක්‍රෝ ඇතුළු කරන්න
පෙර කොටසේ, අපට ශීර්ෂයක් නොමැතිව තනි තීරුවක දත්ත කට්ටලයක් ඇත, නමුත් දැන් අපට a ඇත. ශීර්ෂයක් සහිත තීරුව .
මෙවර අපි එය VBA macro සමඟින් වර්ග කරන්නේ කෙසේදැයි ඉගෙන ගනිමු.
පියවර:
- පෙර ආකාරයටම, දෘශ්‍ය මූලික සංස්කාරකය විවෘත කරන්න සංවර්ධක ටැබයෙන් සහ කේත කවුළුවෙහි ඇතුළු කරන්න මොඩියුලය .
- කේත කවුළුව තුළ, පහත කේතය පිටපත් කර එය අලවන්න.
3305
ඔබගේ කේතය දැන් ක්‍රියාත්මක වීමට සූදානම්ය.
මෙහි,
- Key1:=Range(“ B5”) → කුමන තීරුව වර්ග කළ යුතුද යන්න කේතයට දැන ගැනීමට B5 සඳහන් කර ඇත.
- Order1:=xlDescending → මෙවර අපි තීරුව වර්ග කරන්නෙමු. අවරෝහණ අනුපිළිවෙල xlDescending ලෙස නියම කර ඇත.
- ශීර්ෂකය:= xlYes → අපගේ තීරුවේ මෙවර ශීර්ෂයක් ඇති බැවින් අපි එය xlYes සමඟ සඳහන් කළෙමු විකල්පය.
3>
- මෙම කේතය ක්‍රියාත්මක කරන්න එවිට ඔබට තීරුව අවරෝහණ අනුපිළිවෙලට ශීර්ෂය සමඟ ලැබෙනු ඇත .
තවත් කියවන්න: Excel හි VBA සමඟ ListBox වර්ග කරන්නේ කෙසේද (සම්පූර්ණ මාර්ගෝපදේශයක්)
සමාන කියවීම්:
- Excel හි IP ලිපිනය වර්ග කරන්නේ කෙසේද (ක්‍රම 6)
- [විසඳා ඇත!] Excel වර්ග කිරීම ක්‍රියා නොකරයි (විසඳුම් 2)
- Excel හි වර්ග කිරීමේ බොත්තම එකතු කරන්නේ කෙසේද (ක්‍රම 7)
- Rang වර්ග කරන්න E Excel හි VBA භාවිතා කිරීම (උදාහරණ 6)
- Excel හි නම අනුව වර්ග කරන්නේ කෙසේද (උදාහරණ 3)
3. VBA Macro ශීර්ෂකය සමඟ හෝ රහිතව බහු තීරු වර්ග කිරීමට
ඔබට VBA කේතය සමඟින් ඔබේ දත්ත කට්ටලයේ තීරු කිහිපයක් වර්ග කිරීමටද හැකිය.
පියවර:
- පෙර පෙන්වා ඇති පරිදි, Developer ටැබයෙන් Visual Basic Editor විවෘත කර ඇතුළු කරන්න a මොඩියුලය කේත කවුළුව තුළ.
- කේත කවුළුව තුළ, පහත කේතය පිටපත් කර එය අලවන්න.
6650
ඔබගේ කේතය දැන් ක්‍රියාත්මක වීමට සූදානම්.
මෙහි,
.SortFields.Add Key:=Range(“B4”), Order:=xlAscending
.SortFields.Add Key:=Range(“C4) ”), Order:=xlAscending
මෙම පේළි දෙක මගින්, අපි Cell B4 සහ C4 නිර්වචනය කරන්නේ සම්බන්ධ තීරු දෙක වර්ග කිරීමට ඒවා ආරෝහණ අනුපිළිවෙලින් .
අපගේ දත්ත කට්ටලයේ ශීර්ෂ ඇති බැවින් අපි ශීර්ෂකය = xlYes සඳහන් කළෙමු, එසේ නොමැතිනම් අපි ශීර්ෂය = ලියා ඇත. xlNo කේතය ඇතුලේ.
- මෙම කේතය ක්‍රියාත්මක කරන්න එවිට ඔබට තීරු ඉහළ යන අනුපිළිවෙලට ශීර්ෂය සමඟ ලැබෙනු ඇත. .
4. එක්සෙල් හි ශීර්ෂය මත දෙවරක් ක්ලික් කිරීමෙන් දත්ත අනුපිළිවෙලට සැකසීමට මැක්‍රෝ
ඔබට ශීර්ෂකය මත දෙවරක් ක්ලික් කිරීමෙන් පහසුවෙන් දත්ත වර්ග කිරීමට අවශ්‍ය නම්, ඔබට එය <සමඟ කළ හැක. 1>VBA කේතය.
පියවර:
- දකුණු-ක්ලික් කරන්න පත්‍ර ටැබය .
- පෙනෙන විකල්ප ලැයිස්තුවෙන්, කේතය බලන්න ක්ලික් කරන්න.
- කේත කවුළුව දිස්වනු ඇත, පහත කේතය පිටපත් කර එහි අලවන්න.
2284
- සුරකින්න කේතය.
- දැන් ඔබ කැමති වැඩ පත්‍රිකාව වෙත ආපසු යන්න. ශීර්ෂය මත දෙවරක් ක්ලික් කරන්න තීරු ප්‍රතිසංවිධානය වන බව ඔබට පෙනෙනු ඇත.
තවත් කියවන්න: දත්ත වර්ග කිරීම සහ පෙරීම කරන්නේ කෙසේද එක්සෙල් (සම්පූර්ණ මාර්ගෝපදේශයක්)
මතක තබා ගත යුතු දේවල්
- ඔබට නම් කළ පරාසයක් සාදා ඇතුළත සෛල යොමු පරාසයක් පසු කරන විට ඒ වෙනුවට එය භාවිතා කළ හැක. අනුපිළිවෙල ක්‍රමය. උදාහරණයක් ලෙස, ඔබට A1:A10 පරාසය වර්ග කිරීමට අවශ්‍ය නම්, කේතය තුළ සෑම විටම එය පසුකර යනවා වෙනුවට, ඔබට එහි නම් කළ පරාසයක් සෑදිය හැක, එනම් “ SortRange ” සහ එය Range(“SortRange”) වැනි Range.Sort ක්‍රමය සමඟ භාවිතා කරන්න.
- ඔබගේ දත්ත කට්ටලයේ ශීර්ෂ තිබේදැයි ඔබට විශ්වාස නැතිනම් එසේත් නැතිනම්, ඔබට xlGuess පරාමිතිය භාවිතයෙන් එය තීරණය කිරීමට පද්ධතියට ඉඩ දිය හැක.
නිගමනය
මෙම ලිපිය ඔබට පෙන්වා දුන්නේ කෙසේද තීරුව Excel VBA හි වර්ග කරන්න. මෙම ලිපිය ඔබට ඉතා ප්‍රයෝජනවත් වී ඇතැයි මම බලාපොරොත්තු වෙමි. මාතෘකාව සම්බන්ධයෙන් ඔබට කිසියම් ප්‍රශ්නයක් ඇත්නම් විමසීමට නිදහස් වන්න.
