Excel හි VBA සමඟ පේළි ගණන් කරන්නේ කෙසේද (ප්රවේශයන් 5)

Hugh West

16-10-2023 මැක්‍රෝස් සහ amp; එක්සෙල් VBA
  • මේක Share කරන්න
Hugh West

අද මම ඔබට පෙන්වන්නම් ඕනෑම දත්ත කට්ටලයකින් Excel හි VBA සමඟ පේළි ගණන් කළ හැකි ආකාරය. නිශ්චිත පරාසයකින්, තෝරාගත් පරාසයකින්, නිශ්චිත නිර්ණායකයකට ගැළපීමෙන්, නිශ්චිත පෙළ අගයක් ගැළපීමෙන් සහ හිස් කොටු බැහැර කිරීමෙන් පේළි ගණන් කළ හැකි ආකාරය මම ඔබට පෙන්වන්නම්.

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

VBA.xlsm සමඟ පේළි ගණන් කරන්න

5 Excel හි VBA සමඟ පේළි ගණන් කිරීමට ක්‍රම 0>මෙහිදී අපි Sunflower Kindergarten නම් පාසලේ සිසුන් කිහිප දෙනෙකුගේ නම් සහ ඔවුන්ගේ ලකුණු ඉංග්‍රීසි භාෂාවෙන් දත්ත කට්ටලයක් ලබා ගත්තෙමු.

අද අපගේ අරමුණ වන්නේ ගණන් කිරීමයි. VBA කේතය භාවිතා කරන මුළු පේළි ගණන.

1. නිශ්චිත පරාසයක පේළි ගණන් කිරීමට VBA කේතය භාවිතා කරන්න

⧪ පියවර 1:

➤ ඔබන්න <ඔබගේ යතුරුපුවරුවේ 1>ALT+F11 . VBA කවුළුව විවෘත වනු ඇත.

⧪ පියවර 2:

➤ VBA කවුළුවේ Insert ටැබය වෙත යන්න.

➤ විකල්ප වලින් තිබේ, මොඩියුලය තෝරන්න.

I

⧪ පියවර 3:

➤ “මොඩියුලය 1” නමින් නව මොඩියුල කවුළුවක් විවෘත වනු ඇත.

➤ පහත VBA ඇතුළු කරන්න. මොඩියුලයේ කේතය.

කේතය: 

1572

සටහන්:

  • මෙම කේතය නිෂ්පාදනය කරයි මැක්‍රෝ Count_Rows ලෙස හැඳින්වේ.
  • කෝඩ් එකේ 3වන පේළියේ “ B4:C13″ නිශ්චිත පරාසය අඩංගු වේ. මට මෙම පරාසයේ ඇති පේළි ගණන ගණන් කිරීමට අවශ්‍යයි.
  • ඔබඔබගේ එක භාවිතා කරන්න> වැඩපොත Excel Macro-Enabled Workbook ලෙස සුරකින්න.

    ⧪ පියවර 5:

    ➤ ඔබේ වැඩ පත්‍රිකාව වෙත ආපසු ගොස් ඔබේ යතුරුපුවරුවේ ALT+F8 ඔබන්න.

    ➤ Macro නමින් සංවාද කොටුවක් විවෘත වේ. Count_Rows ( Macro හි නම) තෝරන්න සහ Run මත ක්ලික් කරන්න.

    ⧪ පියවර 6:

    ➤ සම්පූර්ණ පේළි ගණන පෙන්වන කුඩා පණිවිඩ පෙට්ටියක් ඔබට හමුවනු ඇත ( 10 මෙම අවස්ථාවේදී ).

    ➤ පිටවීමට හරි ක්ලික් කරන්න.

    තවත් කියවන්න: Excel VBA දත්ත සමඟ පේළි ගණන් කිරීමට

    2. තෝරාගත් පරාසයක පේළි ගණන් කිරීමට Excel VBA කේතය ධාවනය කරන්න

    පෙර ක්‍රමයේදී, අපි නිශ්චිත පරාසයක පේළි ගණන ගණන් කළෙමු ( B4:C13 ).

    නමුත් අපට අවශ්‍ය පරිදි තෝරාගත් ඕනෑම පරාසයක පේළි ගණන ගණන් කිරීමට VBA කේතයක් භාවිතා කළ හැක.

    පියවර සියල්ලම ක්‍රමය 1<ට සමාන වේ. 2> ( පියවර 1-6 ).

    ⧪ පියවර 3 හි, පෙර කේතය වෙනුවට, මෙම කේතය ඇතුළු කරන්න:

    කේතය: 

    9743

    සටහන:

    • මෙම කේතය Count_Selected_Rows නමින් මොඩියුලයක් සාදයි.

    ⧪  සහ පියවර 5 හි, කේතය ධාවනය කිරීමට පෙර, පළමුව පරාසයක් තෝරන්න. මෙන්න මම මගේ සම්පූර්ණ දත්ත කට්ටලය තෝරාගෙන ඇත ( තීරු ශීර්ෂ නොමැතිව).

    ⧪ ඉන්පසු ALT+F8 ඔබන්න, තෝරන්න Count_Selected_Rows , සහ මත ක්ලික් කරන්න ධාවනය .

    ඔබ තෝරාගත් පරාසයේ ඇති මුළු පේළි ගණන පෙන්වන පණිවිඩ පෙට්ටියක් ඔබට ලැබෙනු ඇත ( 10 මෙහි නඩුව.)

    3. Excel හි නිර්ණායක සමඟ පේළි ගණන් කිරීමට VBA කේතය ඇතුළත් කරන්න

    නිශ්චිත නිර්ණායකයක් පවත්වා ගෙන යන මුළු පේළි ගණන ගණන් කිරීමට අපට VBA කේතයක් ද භාවිතා කළ හැක.

    උදාහරණයක් ලෙස, 40 ට අඩු ලකුණු ලබාගත් සිසුන් සංඛ්‍යාව ගණනය කරන මැක්‍රෝ එකක් නිර්මාණය කරමු.

    පියවර සියල්ලම ක්‍රමය 1 ට සමාන වේ. පියවර 1-6 ).

    ⧪ පියවර 3 තුළ, VBA කේතය මෙයට වෙනස් කරන්න:

    කේතය: 

    4607

    සටහන:

    • මෙම කේතය Count_Rows_with_Criteria නමින් මොඩියුලයක් සාදයි.
      • <14 6 පේළියේ, අපි “<40” භාවිත කළේ අප භාවිතා කරන නිර්ණායකය මෙය වන බැවිනි. ඔබ එය ඔබගේ අවශ්‍යතාවයට අනුව වෙනස් කරන්න.

⧪  සහ පියවර 5 හි, කේතය ධාවනය කිරීමට පෙර, සෛල පරාසය තෝරන්න නිර්ණායක. මෙහි නිර්ණායකය පවතින නිසා මම තෝරාගෙන ඇත්තේ C ( C4:C13 ) තීරුව පමණි.

⧪ ඉන්පසු <1 ඔබන්න>ALT+F8 , Count_Rows_with_Criteria තෝරන්න, Run මත ක්ලික් කරන්න.

ඔබට පෙන්වන පණිවිඩ පෙට්ටියක් ලැබෙනු ඇත. ඔබ ඔබේ නිර්ණායකය සම්පූර්ණ කරන මුළු පේළි ගණන ( 3 මෙම අවස්ථාවෙහිදී.)

සමාන කියවීම්

13>
  • Excel Count දෘශ්‍ය පේළි (සූත්‍රය සහ VBA කේතය)
  • Excel අගය සමඟ පේළි ගණන් කරන ආකාරය (8මාර්ග)

    • 4. නිශ්චිත පෙළ අගයක් ඇති පේළි ගණන් කිරීමට VBA කේතය ඇතුළත් කරන්න

    ඔබට නිශ්චිත පෙළ අගයක් අඩංගු පේළි ගණන ගණන් කිරීමට VBA කේතයක් ද භාවිත කළ හැක.

    0>මෙම නව දත්ත කට්ටලය දෙස බලන්න.

    මාටින් පොත් සාප්පුව නම් පොත් සාප්පුවක පොත් කිහිපයක පොත් වාර්තා අප සතුව ඇත.

    අපි මෙම දත්ත කට්ටලයෙන් නිශ්චිත පෙළක් ඇති පොත් ගණන ගණන් කරන මැක්‍රෝ නිර්මාණය කරමු.

    පියවර සියල්ලම ක්‍රමය 1 ( පියවර 1-6 ).

    ⧪ පියවර 3 හි, VBA කේතය මෙයට වෙනස් කරන්න:

    කේතය: 

    1628

    සටහන:

    • මෙම කේතය Count_Rows_with_Specific_Text නමින් මොඩියුලයක් සාදයි.

    ⧪  සහ පියවර 5 හි, කේතය ධාවනය කිරීමට පෙර, පෙළ අගයන් සහිත කොටු පරාසය තෝරන්න. මෙන්න මම පරාසය තෝරාගෙන ඇත B4:B13 ( පොත්වල නම ).

    ⧪ ඉන්පසු ALT+ ඔබන්න F8 , Count_Rows_with_Specific_Text තෝරන්න, Run මත ක්ලික් කරන්න.

    ⧪ Input Box ඔබට ගැළපීමට අවශ්‍ය නිශ්චිත පෙළ අගය ඇතුළත් කිරීමට ඔබෙන් අසනු ඇත.

    මෙම උදාහරණය සඳහා, මම එය “ඉතිහාසය” ලෙස ඇතුළත් කර ඇත.

    0>

    අවසාන වශයෙන්, ඔබට නිශ්චිත පෙළ අඩංගු මුළු පේළි ගණන පෙන්වන පණිවිඩ පෙට්ටියක් ඔබට ලැබෙනු ඇත ( 3 මෙම අවස්ථාවේදී.)

    තවත් කියවන්න: පෙළ සමඟ පේළි ගණන් කරන ආකාරයExcel

    5. Excel හි VBA භාවිතා කරමින් හිස් සෛල සහිත පේළි ගණන් කරන්න

    අවසානයේ, අපි දත්ත කට්ටලයකින් හිස් කොටු හැර මුළු පේළි ගණන ගණන් කරන මැක්‍රෝ එකක් සංවර්ධනය කරන්නෙමු.

    බලන්න. මෙම නව දත්ත කට්ටලය.

    ඇපෙක්ස් ගෲප් නම් සමාගමක බඳවා ගැනීමේ පරීක්ෂණයක දී සමහර අපේක්ෂකයින්ගේ ලකුණු අප සතුව ඇත.

    නමුත් අවාසනාවකට, සමහර අයදුම්කරුවන්ට පරීක්ෂණයට පෙනී සිටීමට නොහැකි වූ අතර ඔවුන්ගේ ලකුණු වෙනුවට හිස් කොටු ඇත.

    හිස් කොටු හැර මුළු පේළි ගණන ගණන් කරන මැක්‍රෝ එකක් සංවර්ධනය කරමු.

    ඒ කියන්නේ, පරීක්ෂණයට අපේක්ෂකයින් කී දෙනෙක් පෙනී සිටියාද.

    පියවර සියල්ලම ක්‍රමය 1 ( පියවර 1-6 ) ට සමාන වේ.

    0>⧪ යන්තම් පියවර 3තුළ, පෙර එක වෙනුවට මෙම VBAකේතය ඇතුළත් කරන්න:

    කේතය: 

    2773

    සටහන:

    • මෙම කේතය Count_Rows_with_Blank_Cells නමින් මොඩියුලයක් නිර්මාණය කරයි.

    ⧪ පියවර 5 හි, කේතය ධාවනය කිරීමට පෙර, හිස් කොටු සහිත සෛල පරාසය තෝරන්න. මෙන්න මම පරාසය තෝරාගෙන ඇත C4:C13 ( Tes හි ලකුණු t).

    ⧪ ඉන්පසු ALT ඔබන්න +F8 , Count_Rows_with_Blank_Cells තෝරන්න, Run මත ක්ලික් කරන්න.

    ඔබට පෙන්වන පණිවිඩ පෙට්ටියක් ඔබට ලැබෙනු ඇත හිස් කොටු හැර මුළු පේළි ගණන ( 7 මෙම අවස්ථාවෙහිදී.)

    නිගමනය

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

    කලින් පෝස්ට් එක Excel හි දින පරාසය සඳහා COUNTIF භාවිතා කරන්නේ කෙසේද (සුදුසු ප්‍රවේශයන් 6ක්)
    ඊළඟ පෝස්ට් එක Excel හි INDEX MATCH Formula භාවිතා කරන්නේ කෙසේද (උදාහරණ 9)

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