എല്ലാ ഡാറ്റാ സെറ്റിൽ നിന്നും Excel-ൽ VBA ഉപയോഗിച്ച് വരികൾ എങ്ങനെ എണ്ണാമെന്ന് ഇന്ന് ഞാൻ കാണിച്ചുതരാം. ഒരു നിർദ്ദിഷ്‌ട ശ്രേണിയിൽ നിന്നും, തിരഞ്ഞെടുത്ത ശ്രേണിയിൽ നിന്നും, ഒരു നിർദ്ദിഷ്‌ട മാനദണ്ഡം പൊരുത്തപ്പെടുത്തിക്കൊണ്ട്, ഒരു നിർദ്ദിഷ്‌ട ടെക്‌സ്‌റ്റ് മൂല്യം പൊരുത്തപ്പെടുത്തിക്കൊണ്ട്, ശൂന്യമായ സെല്ലുകൾ ഒഴിവാക്കി എങ്ങനെ വരികൾ എണ്ണാമെന്ന് ഞാൻ കാണിച്ചുതരാം.

ഡൗൺലോഡ് പ്രാക്ടീസ് ചെയ്യുക വർക്ക്ബുക്ക്

Excel-ൽ VBA ഉപയോഗിച്ച് വരികൾ എണ്ണാനുള്ള 5 രീതികൾ

സൺഫ്ലവർ കിന്റർഗാർട്ടൻ എന്ന സ്കൂളിലെ ചില വിദ്യാർത്ഥികളുടെ പേരുകളും അവരുടെ മാർക്കുകളും ഇംഗ്ലീഷിലുള്ള ഒരു ഡാറ്റാ സെറ്റ് ഇവിടെയുണ്ട്.

ഇന്ന് ഞങ്ങളുടെ ലക്ഷ്യം ഒരു VBA കോഡ് ഉപയോഗിക്കുന്ന വരികളുടെ ആകെ എണ്ണം.

1. ഒരു പ്രത്യേക ശ്രേണിയിലെ വരികൾ എണ്ണാൻ VBA കോഡ് ഉപയോഗിക്കുക

⧪ ഘട്ടം 1:

➤ <അമർത്തുക നിങ്ങളുടെ കീബോർഡിൽ 1>ALT+F11 . VBA വിൻഡോ തുറക്കും.

⧪ ഘട്ടം 2:

➤ VBA വിൻഡോയിലെ Insert ടാബിലേക്ക് പോകുക.

➤ ഓപ്ഷനുകളിൽ നിന്ന് ലഭ്യമാണ്, മൊഡ്യൂൾ തിരഞ്ഞെടുക്കുക.

I

⧪ ഘട്ടം 3:

➤ “മൊഡ്യൂൾ 1” എന്ന പേരിൽ ഒരു പുതിയ മൊഡ്യൂൾ വിൻഡോ തുറക്കും.

➤ ഇനിപ്പറയുന്ന VBA ചേർക്കുക മൊഡ്യൂളിലെ കോഡ്.

കോഡ്:

5004

കുറിപ്പുകൾ:

• ഈ കോഡ് ഒരു Macro Count_Rows എന്ന് വിളിക്കുന്നു.
• കോഡിന്റെ 3rd വരിയിൽ “ B4:C13″ നിർദ്ദിഷ്‌ട ശ്രേണി അടങ്ങിയിരിക്കുന്നു. ഈ ശ്രേണിയിലെ വരികളുടെ എണ്ണം കണക്കാക്കാൻ ഞാൻ ആഗ്രഹിക്കുന്നു.
• നിങ്ങൾനിങ്ങളുടേത് ഉപയോഗിക്കുക.

⧪ ഘട്ടം 4:

➤ വർക്ക്ബുക്ക് Excel Macro-Enabled Workbook ആയി സംരക്ഷിക്കുക.

⧪ ഘട്ടം 5:

➤ നിങ്ങളുടെ വർക്ക്ഷീറ്റിലേക്ക് മടങ്ങി, നിങ്ങളുടെ കീബോർഡിൽ ALT+F8 അമർത്തുക.

➤ Macro എന്നൊരു ഡയലോഗ് ബോക്സ് തുറക്കും. Count_Rows ( മാക്രോയുടെ പേര്) തിരഞ്ഞെടുത്ത് Run ക്ലിക്ക് ചെയ്യുക.

⧪ ഘട്ടം 6:

➤ മൊത്തം വരികളുടെ എണ്ണം കാണിക്കുന്ന ഒരു ചെറിയ സന്ദേശ ബോക്‌സ് നിങ്ങൾ കണ്ടെത്തും ( 10 ഈ സാഹചര്യത്തിൽ ).

➤ പുറത്തുകടക്കാൻ ശരി ക്ലിക്ക് ചെയ്യുക.

കൂടുതൽ വായിക്കുക: എക്സൽ VBA ഡാറ്റ ഉപയോഗിച്ച് വരികൾ എണ്ണാൻ

2. തിരഞ്ഞെടുത്ത ശ്രേണിയുടെ വരികൾ എണ്ണാൻ Excel VBA കോഡ് പ്രവർത്തിപ്പിക്കുക

മുമ്പത്തെ രീതിയിൽ, ഞങ്ങൾ ഒരു നിർദ്ദിഷ്ട ശ്രേണിയുടെ വരികളുടെ എണ്ണം കണക്കാക്കി ( B4:C13 ).

എന്നാൽ തിരഞ്ഞെടുത്ത ഏതെങ്കിലും ശ്രേണിയിലെ വരികളുടെ എണ്ണം നമ്മുടെ ഇഷ്ടത്തിനനുസരിച്ച് എണ്ണാൻ VBA കോഡ് ഉപയോഗിക്കാം.

ഘട്ടങ്ങളെല്ലാം രീതി 1 ( ഘട്ടം 1-6 ).

⧪ ഘട്ടം 3 -ൽ, മുമ്പത്തെ കോഡിന് പകരം ഈ കോഡ് ചേർക്കുക:

കോഡ്:

6748

ശ്രദ്ധിക്കുക:

• ഈ കോഡ് Count_Selected_Rows എന്നൊരു മൊഡ്യൂൾ സൃഷ്ടിക്കുന്നു.

⧪  കൂടാതെ ഘട്ടം 5 -ൽ, കോഡ് പ്രവർത്തിപ്പിക്കുന്നതിന് മുമ്പ്, ആദ്യം ഒരു ശ്രേണി തിരഞ്ഞെടുക്കുക. ഇവിടെ ഞാൻ എന്റെ മുഴുവൻ ഡാറ്റാ സെറ്റും തിരഞ്ഞെടുത്തു ( കോളം തലക്കെട്ടുകൾ ഇല്ലാതെ ).

⧪ തുടർന്ന് ALT+F8 അമർത്തുക, തിരഞ്ഞെടുക്കുക Count_Selected_Rows , ക്ലിക്ക് ചെയ്യുക Run .

നിങ്ങൾ തിരഞ്ഞെടുത്ത ശ്രേണിയിലെ മൊത്തം വരികളുടെ എണ്ണം കാണിക്കുന്ന ഒരു സന്ദേശ ബോക്‌സ് നിങ്ങൾക്ക് ലഭിക്കും ( 10 ഇതിൽ കേസ്.)

3. Excel-ലെ മാനദണ്ഡങ്ങൾക്കൊപ്പം വരികൾ എണ്ണാൻ VBA കോഡ് ചേർക്കുക

ഒരു നിർദ്ദിഷ്ട മാനദണ്ഡം നിലനിർത്തുന്ന മൊത്തം വരികളുടെ എണ്ണം കണക്കാക്കാൻ ഞങ്ങൾക്ക് ഒരു VBA കോഡും ഉപയോഗിക്കാം.

ഉദാഹരണത്തിന്, നമുക്ക് ഒരു മാക്രോ സൃഷ്ടിക്കാം, അത് 40-ൽ താഴെ മാർക്ക് നേടിയ വിദ്യാർത്ഥികളുടെ എണ്ണം കണക്കാക്കും.

ഘട്ടങ്ങളും എല്ലാം രീതി 1 പോലെയാണ് ( ഘട്ടം 1-6 ).

⧪ ഘട്ടം 3 -ൽ, VBA കോഡ് ഇതിലേക്ക് മാറ്റുക:

കോഡ്:

5983

ശ്രദ്ധിക്കുക:

• ഈ കോഡ് Count_Rows_with_Criteria എന്നൊരു മൊഡ്യൂൾ സൃഷ്ടിക്കുന്നു.
<14 6 വരിയിൽ, ഞങ്ങൾ “<40” ഉപയോഗിച്ചു, കാരണം ഇതാണ് ഞങ്ങൾ ഉപയോഗിക്കുന്ന മാനദണ്ഡം. നിങ്ങളുടെ ആവശ്യത്തിനനുസരിച്ച് നിങ്ങൾ അത് മാറ്റുന്നു.

⧪  കൂടാതെ ഘട്ടം 5 -ൽ, കോഡ് പ്രവർത്തിപ്പിക്കുന്നതിന് മുമ്പ്, സെല്ലുകളുടെ ശ്രേണി തിരഞ്ഞെടുക്കുക മാനദണ്ഡം. ഇവിടെ ഞാൻ തിരഞ്ഞെടുത്തത് C ( C4:C13 ) എന്ന നിര മാത്രമാണ്, കാരണം മാനദണ്ഡം അവിടെയാണ്.

⧪ തുടർന്ന് <1 അമർത്തുക>ALT+F8 , Count_Rows_with_Criteria തിരഞ്ഞെടുത്ത് Run എന്നതിൽ ക്ലിക്ക് ചെയ്യുക.

നിങ്ങൾക്ക് കാണിക്കുന്ന ഒരു സന്ദേശ ബോക്‌സ് ലഭിക്കും നിങ്ങളുടെ മാനദണ്ഡം നിറവേറ്റുന്ന വരികളുടെ ആകെ എണ്ണം ( 3 ഈ സാഹചര്യത്തിൽ.)

സമാന വായനകൾ

4. ഒരു പ്രത്യേക ടെക്‌സ്‌റ്റ് മൂല്യമുള്ള വരികൾ എണ്ണാൻ VBA കോഡ് ഉൾച്ചേർക്കുക

നിങ്ങൾക്ക് ഒരു പ്രത്യേക ടെക്‌സ്‌റ്റ് മൂല്യം ഉൾക്കൊള്ളുന്ന വരികളുടെ എണ്ണം കണക്കാക്കാൻ ഒരു VBA കോഡും ഉപയോഗിക്കാം.

മാർട്ടിൻ ബുക്ക്‌സ്റ്റോർ എന്ന പുസ്തകശാലയുടെ ചില പുസ്തകങ്ങളുടെ ബുക്ക് റെക്കോർഡുകൾ ഞങ്ങളുടെ പക്കലുണ്ട്.

നമുക്ക് ഒരു മാക്രോ സൃഷ്‌ടിക്കാം, അത് ഈ ഡാറ്റാ സെറ്റിൽ നിന്ന് ഒരു നിർദ്ദിഷ്‌ട ടെക്‌സ്‌റ്റ് ഉള്ള പുസ്‌തകങ്ങളുടെ എണ്ണം കണക്കാക്കും.

ഘട്ടങ്ങളും എല്ലാം രീതി 1 ( ഘട്ടം 1-6 ).

⧪ ഘട്ടം 3 -ൽ, VBA കോഡ് ഇതിലേക്ക് മാറ്റുക:

കോഡ്:

6393

ശ്രദ്ധിക്കുക:

• ഈ കോഡ് Count_Rows_with_Specific_Text എന്നൊരു മൊഡ്യൂൾ സൃഷ്ടിക്കുന്നു.

⧪  കൂടാതെ ഘട്ടം 5 -ൽ, കോഡ് പ്രവർത്തിപ്പിക്കുന്നതിന് മുമ്പ്, ടെക്‌സ്‌റ്റ് മൂല്യങ്ങളുള്ള സെല്ലുകളുടെ ശ്രേണി തിരഞ്ഞെടുക്കുക. ഇവിടെ ഞാൻ ശ്രേണി തിരഞ്ഞെടുത്തു B4:B13 ( പുസ്തകങ്ങളുടെ പേര് ).

⧪ തുടർന്ന് ALT+ അമർത്തുക F8 , Count_Rows_with_Specific_Text തിരഞ്ഞെടുത്ത് Run എന്നതിൽ ക്ലിക്ക് ചെയ്യുക.

⧪ ഒരു Input Box നിങ്ങൾ പൊരുത്തപ്പെടുത്താൻ ആഗ്രഹിക്കുന്ന നിർദ്ദിഷ്ട വാചക മൂല്യം നൽകാൻ നിങ്ങളോട് ആവശ്യപ്പെടുന്ന ദൃശ്യമാകും.

ഈ ഉദാഹരണത്തിനായി, ഞാൻ അത് “ചരിത്രം” എന്ന് നൽകി.

അവസാനം, നിർദ്ദിഷ്ട വാചകം അടങ്ങിയിരിക്കുന്ന മൊത്തം വരികളുടെ എണ്ണം കാണിക്കുന്ന ഒരു സന്ദേശ ബോക്‌സ് നിങ്ങൾക്ക് ലഭിക്കും ( 3 ഈ സാഹചര്യത്തിൽ.)

കൂടുതൽ വായിക്കുക: എങ്ങനെ വരികൾ എണ്ണാംExcel

5. Excel-ലെ VBA ഉപയോഗിച്ച് ശൂന്യമായ സെല്ലുകളുള്ള വരികൾ എണ്ണുക

അവസാനം, ഒരു ഡാറ്റാ സെറ്റിൽ നിന്ന് ശൂന്യമായ സെല്ലുകൾ ഒഴികെയുള്ള മൊത്തം വരികളുടെ എണ്ണം കണക്കാക്കുന്ന ഒരു മാക്രോ ഞങ്ങൾ വികസിപ്പിക്കും.

നോക്കുക. ഈ പുതിയ ഡാറ്റാ സെറ്റ്.

അപെക്‌സ് ഗ്രൂപ്പ് എന്ന കമ്പനിയുടെ റിക്രൂട്ട്‌മെന്റ് ടെസ്റ്റിലെ ചില ഉദ്യോഗാർത്ഥികളുടെ മാർക്ക് ഞങ്ങളുടെ പക്കലുണ്ട്.

പക്ഷേ, നിർഭാഗ്യവശാൽ, ചില ഉദ്യോഗാർത്ഥികൾക്ക് പരീക്ഷയിൽ ഹാജരാകാൻ കഴിഞ്ഞില്ല, അവരുടെ മാർക്കിന്റെ സ്ഥാനത്ത് ശൂന്യമായ സെല്ലുകളുണ്ട്.

ശൂന്യമായ സെല്ലുകൾ ഒഴികെയുള്ള മൊത്തം വരികളുടെ എണ്ണം കണക്കാക്കുന്ന ഒരു മാക്രോ നമുക്ക് വികസിപ്പിക്കാം.

അതായത്, എത്ര ഉദ്യോഗാർത്ഥികൾ ടെസ്റ്റിൽ പ്രത്യക്ഷപ്പെട്ടു.

ഘട്ടങ്ങളെല്ലാം രീതി 1 ( ഘട്ടം 1-6 ) പോലെയാണ്.

കോഡ്:

4070

ശ്രദ്ധിക്കുക:

• ഈ കോഡ് Count_Rows_with_Blank_Cells എന്നൊരു മൊഡ്യൂൾ സൃഷ്ടിക്കുന്നു.

⧪ ഘട്ടം 5 -ൽ, കോഡ് പ്രവർത്തിപ്പിക്കുന്നതിന് മുമ്പ്, ശൂന്യമായ സെല്ലുകളുള്ള സെല്ലുകളുടെ ശ്രേണി തിരഞ്ഞെടുക്കുക. ഇവിടെ ഞാൻ ശ്രേണി തിരഞ്ഞെടുത്തു C4:C13 ( ടെസിലെ മാർക്ക് t).

⧪ തുടർന്ന് ALT അമർത്തുക +F8 , Count_Rows_with_Blank_Cells തിരഞ്ഞെടുത്ത് Run ക്ലിക്ക് ചെയ്യുക.

നിങ്ങളെ കാണിക്കുന്ന ഒരു സന്ദേശ ബോക്‌സ് നിങ്ങൾക്ക് ലഭിക്കും ശൂന്യമായ സെല്ലുകൾ ഒഴികെയുള്ള മൊത്തം വരികളുടെ എണ്ണം ( 7 ഈ സാഹചര്യത്തിൽ.)

ഉപയോഗം

ഉപയോഗിക്കുന്നു ഈ രീതികൾ, നിങ്ങൾക്ക് ഒരു ഡാറ്റയിൽ നിന്ന് VBA ഉപയോഗിച്ച് വരികൾ എണ്ണാംവിവിധ വ്യവസ്ഥകളുമായി പൊരുത്തപ്പെടുന്ന Excel-ൽ സജ്ജമാക്കുക. നിങ്ങൾക്ക് എന്തെങ്കിലും പ്രശ്നമുണ്ടോ? ഞങ്ങളോട് ചോദിക്കാൻ മടിക്കേണ്ടതില്ല.