ഉള്ളടക്ക പട്ടിക
ഈ ലേഖനത്തിൽ, ഒരു സെല്ലിൽ ഒരു മൂല്യം അടങ്ങിയിട്ടുണ്ടെങ്കിൽ, Excel VBA -ലെ സാഹചര്യം നിങ്ങൾക്ക് എങ്ങനെ വിശകലനം ചെയ്യാമെന്ന് ഞാൻ കാണിച്ചുതരാം. ഏത് മൂല്യത്തിനും ഒരു പ്രത്യേക മൂല്യത്തിനും സാഹചര്യം വിശകലനം ചെയ്യാൻ നിങ്ങൾ പഠിക്കും.
Excel VBA വിശകലനം: സെല്ലിൽ ഒരു മൂല്യമുണ്ടെങ്കിൽ (ദ്രുത വീക്ഷണം)
9921
പ്രാക്ടീസ് വർക്ക്ബുക്ക് ഡൗൺലോഡ് ചെയ്യുക
നിങ്ങൾ ഈ ലേഖനം വായിക്കുമ്പോൾ വ്യായാമം ചെയ്യാൻ ഈ പ്രാക്ടീസ് വർക്ക്ബുക്ക് ഡൗൺലോഡ് ചെയ്യുക.
VBA സെല്ലിൽ മൂല്യമുണ്ടെങ്കിൽ Then.xlsm
എക്സൽ വിബിഎ വിശകലനം: സെല്ലിൽ ഒരു മൂല്യമുണ്ടെങ്കിൽ, ഔട്ട്‌പുട്ടുകൾ തിരികെ നൽകുക (ഘട്ടം ഘട്ടമായുള്ള വിശകലനം)
ഇവിടെ ഫിസിക്സ്, കെമിസ്ട്രി എന്നിവയിലെ ചില വിദ്യാർത്ഥികളുടെ മാർക്ക് അടങ്ങിയ ഒരു ഡാറ്റ സെറ്റ് ലഭിച്ചു, സൺഫ്ലവർ കിന്റർഗാർട്ടൻ എന്ന സ്‌കൂളിലെ ഗണിതവും.
ശൂന്യമായ സെല്ലുകൾ അർത്ഥമാക്കുന്നത് വിദ്യാർത്ഥി ഹാജരായില്ല, അതായത് ആ പ്രത്യേക പരീക്ഷയിൽ ഹാജരായില്ല എന്നാണ്. ഈ ഡാറ്റാ സെറ്റ് ഉപയോഗിച്ച് ഒരു സെല്ലിൽ മൂല്യം ഉണ്ടെങ്കിലും ഇല്ലെങ്കിലും സ്ഥിതിഗതികൾ വിശകലനം ചെയ്യാം.
⧪ ഘട്ടം 1: സെൽ പ്രഖ്യാപിക്കുന്നു
ആദ്യം, നമ്മൾ ചെയ്യേണ്ടത് ഞങ്ങൾ വിശകലനം ചെയ്യാൻ ആഗ്രഹിക്കുന്ന സെല്ലിന്റെ മൂല്യം പ്രഖ്യാപിക്കുക. ജെന്നിഫർ മാർലോ ഫിസിക്സ് പരീക്ഷയിൽ പങ്കെടുത്തോ ഇല്ലയോ എന്ന് നമുക്ക് വിശകലനം ചെയ്യാം.
അതിനാൽ, സെല്ലിൽ C12 മൂല്യമുണ്ടോ ഇല്ലയോ എന്ന് പരിശോധിക്കേണ്ടതുണ്ട്.
അത് ചെയ്യാൻ, ആദ്യം, നമ്മൾ സെൽ C12 പ്രഖ്യാപിക്കണം.
ഇത് പൂർത്തിയാക്കുന്നതിനുള്ള കോഡിന്റെ വരി ഇതായിരിക്കും:
8475
⧪ ഘട്ടം 2: സെല്ലിൽ ഉണ്ടോ എന്ന് പരിശോധിക്കുന്നു ഒരു മൂല്യം (ഒരു പ്രത്യേക മൂല്യം ഉൾപ്പെടെ)
അടുത്തതായി, ഞങ്ങൾ പരിശോധിക്കേണ്ടതുണ്ട്സെല്ലിൽ ഒരു മൂല്യം ഉണ്ടോ ഇല്ലയോ. ഞങ്ങൾ ഇത് ഒരു If condition ഉപയോഗിച്ച് നടപ്പിലാക്കും. കോഡിന്റെ വരി ഇതായിരിക്കും:
1898
സെല്ലിൽ എന്തെങ്കിലും മൂല്യമുണ്ടെങ്കിൽ ഈ കോഡ് എക്‌സിക്യൂട്ട് ചെയ്യപ്പെടും. ഒരു മൂല്യം പരിശോധിക്കാൻ (ഉദാഹരണത്തിന്, അതിൽ 100 ഉണ്ടോ ഇല്ലയോ), തുല്യം ചിഹ്നം ഉപയോഗിച്ച് ആ നിർദ്ദിഷ്ട മൂല്യം ഉപയോഗിക്കുക.
1336
⧪ ഘട്ടം 3: ടാസ്‌ക് അനുവദിക്കൽ
അതിനുശേഷം നിങ്ങൾ ഒരു ടാസ്‌ക് സജ്ജീകരിക്കേണ്ടതുണ്ട്, അത് സെല്ലിൽ ഒരു മൂല്യം (അല്ലെങ്കിൽ ഒരു നിർദ്ദിഷ്ട മൂല്യം) അടങ്ങിയിട്ടുണ്ടെങ്കിൽ അത് നടപ്പിലാക്കും.
ഇവിടെ, ഞങ്ങൾ സന്ദേശം പ്രദർശിപ്പിക്കാൻ ആഗ്രഹിക്കുന്നു “ജെന്നിഫർ മാർലോ ഫിസിക്സ് പരീക്ഷയിൽ പങ്കെടുത്തു.” . അതിനാൽ കോഡിന്റെ വരി ഇതായിരിക്കും:
2898
⧪ ഘട്ടം 4: ഇഫ് ബ്ലോക്ക് അവസാനിക്കുന്നു
അവസാനം, If ബ്ലോക്കിന് നിങ്ങൾ അവസാനം പ്രഖ്യാപിക്കണം.
6431
അതിനാൽ പൂർണ്ണമായ VBA കോഡ് ഇതായിരിക്കും:
⧭ VBA കോഡ്:
4729
⧭ ഔട്ട്പുട്ട്:
ടൂൾബാറിലെ Run Sub/UserForm ബട്ടണിൽ ക്ലിക്കുചെയ്‌ത് ഈ കോഡ് പ്രവർത്തിപ്പിക്കുക.
ഇത് “ജെന്നിഫർ മാർലോ ഫിസിക്സ് പരീക്ഷയിൽ പങ്കെടുത്തു.” എന്ന സന്ദേശം പ്രദർശിപ്പിക്കും, കാരണം സെല്ലിൽ C12 50 എന്ന മൂല്യം അടങ്ങിയിരിക്കുന്നു.
0>
ഉദാഹരണങ്ങൾ സെല്ലിൽ ഒരു മൂല്യമുണ്ടെങ്കിൽ Excel VBA ഉള്ള ഒരു നിർദ്ദിഷ്ട ഔട്ട്പുട്ട്
ഒരു സെല്ലിൽ ഒരു മൂല്യം അടങ്ങിയിട്ടുണ്ടോ എന്ന് വിശകലനം ചെയ്യാൻ ഞങ്ങൾ പഠിച്ചു. VBA -ൽ അല്ല. ഇപ്പോൾ, ധാരണ വ്യക്തമാക്കുന്നതിന് നമുക്ക് ചില ഉദാഹരണങ്ങൾ പര്യവേക്ഷണം ചെയ്യാം.
1. ഒരു മൂല്യം ഫിൽട്ടർ ചെയ്യുന്നതിനായി ഒരു മാക്രോ വികസിപ്പിക്കുന്നു, അനുബന്ധ സെല്ലിൽ എന്തെങ്കിലും മൂല്യമുണ്ടെങ്കിൽ Excel VBA ൽ
നമുക്ക് ഒരു വികസിപ്പിക്കാംഓരോ പരീക്ഷയിലും ഹാജരായ വിദ്യാർത്ഥികളെ ഫിൽട്ടർ ചെയ്യാൻ Macro .
അതായത്, ഓരോ വിഷയത്തിന്റെയും മാർക്ക് അടങ്ങിയ സെല്ലുകൾ പരിശോധിച്ച് അവയിൽ ഒരു മൂല്യമുണ്ടോ എന്ന് നോക്കണം. അല്ലെങ്കിൽ ഇല്ല.
അവർ അങ്ങനെ ചെയ്‌താൽ, ഞങ്ങൾ ബന്ധപ്പെട്ട വിദ്യാർത്ഥിയുടെ പേര് സോർട്ട് ചെയ്യേണ്ടതുണ്ട്.
ഇത് പൂർത്തിയാക്കുന്നതിനുള്ള പൂർണ്ണമായ VBA കോഡ് ഇതായിരിക്കും:
⧭ VBA കോഡ്:
3965
⧭ ഔട്ട്പുട്ട്:
ഡാറ്റ സെറ്റ് തിരഞ്ഞെടുക്കുക ( ഹെഡറുകൾ ) ഉൾപ്പെടുത്തി ഈ മാക്രോ റൺ ചെയ്യുക.
ആദ്യം, ആദ്യത്തേതിന്റെ റഫറൻസ് നൽകാൻ നിങ്ങളോട് ആവശ്യപ്പെടും. നിങ്ങൾക്ക് ഫിൽട്ടർ ചെയ്ത ഡാറ്റ ആവശ്യമുള്ള സെൽ. ഞാൻ G3 നൽകി.
തുടർന്ന് ശരി ക്ലിക്ക് ചെയ്യുക. ഓരോ പരീക്ഷയിലും ( ഹെഡറുകൾ ഉൾപ്പെടെ) പങ്കെടുത്ത വിദ്യാർത്ഥികളുടെ പേരുകൾ സെല്ലിൽ G3 ആരംഭിക്കുന്ന ഒരു പുതിയ ഡാറ്റ സെറ്റിൽ നിങ്ങൾക്ക് ലഭിക്കും.
2. ഒരു മൂല്യം ക്രമീകരിക്കുന്നതിന് ഉപയോക്തൃ-നിർവചിക്കപ്പെട്ട ഫംഗ്ഷൻ സൃഷ്‌ടിക്കുന്നു, അനുബന്ധ സെല്ലിൽ ഒരു പ്രത്യേക മൂല്യം ഉണ്ടെങ്കിൽ, Excel VBA-ൽ
ഇപ്പോൾ ഞങ്ങൾ വിദ്യാർത്ഥികളുടെ പേരുകൾ നൽകുന്ന ഒരു ഉപയോക്തൃ-നിർവചിച്ച ഫംഗ്ഷൻ സൃഷ്‌ടിക്കും ഓരോ വിഷയത്തിലും ഒരു പ്രത്യേക മാർക്ക് നേടിയവർ.
നടപടിക്രമം ഏതാണ്ട് മുകളിൽ പറഞ്ഞതിന് സമാനമാണ്. ഓരോ വിഷയത്തിന്റെയും മാർക്കുകൾ അടങ്ങിയ സെല്ലുകൾ ഞങ്ങൾ പരിശോധിച്ച് അവ ഒരു നിർദ്ദിഷ്ട മൂല്യത്തിന് തുല്യമാണോ അല്ലയോ എന്ന് നോക്കേണ്ടതുണ്ട്.
അവയാണെങ്കിൽ, ഞങ്ങൾ ബന്ധപ്പെട്ട വിദ്യാർത്ഥിയുടെ പേര് തിരികെ നൽകും.
VBA കോഡ് ഇതായിരിക്കും:
⧭ VBAകോഡ്:
6697
⧭ ഔട്ട്പുട്ട്:
കോഡ് Cells_with_Values എന്നൊരു ഫംഗ്ഷൻ സൃഷ്‌ടിക്കുന്നു രണ്ട് ആർഗ്യുമെന്റുകൾ എടുക്കുന്നു, ഒരു റേഞ്ച് , ഒരു മൂല്യം .
ഈ ഫംഗ്ഷൻ ഉപയോഗിച്ച് ഓരോ വിഷയത്തിലും 100 നേടിയ വിദ്യാർത്ഥികളെ നമുക്ക് കണ്ടെത്താം.
നിങ്ങളുടെ വർക്ക്ഷീറ്റിലെ സെല്ലുകളുടെ ഒരു ശ്രേണി തിരഞ്ഞെടുത്ത്, ശ്രേണിയുടെ ആദ്യ സെല്ലിൽ ഈ ഫംഗ്ഷൻ നൽകുക:
=Cells_with_Values(B3:E13,100) [ഇവിടെ B3: E3 എന്നത് എന്റെ ഡാറ്റാ സെറ്റാണ് ( ഹെഡറുകൾ ഉൾപ്പെടെ), 100 എന്നത് എന്റെ പൊരുത്തപ്പെടുന്ന മൂല്യമാണ്. നിങ്ങൾ നിങ്ങളുടേത് ഉപയോഗിക്കുക.]
തുടർന്ന് CTRL + SHIFT + ENTER ( അറേ ഫോർമുല ) അമർത്തുക. ഹെഡറുകൾ .
3 ഉൾപ്പെടെ ഓരോ വിഷയത്തിലും 100 നേടിയ വിദ്യാർത്ഥികളുടെ പേരുകൾ അടങ്ങുന്ന ഒരു അറേ അത് തിരികെ നൽകും. Excel VBA-ൽ അനുബന്ധ സെല്ലിൽ എന്തെങ്കിലും മൂല്യം (അല്ലെങ്കിൽ ഒരു പ്രത്യേക മൂല്യം) അടങ്ങിയിട്ടുണ്ടെങ്കിൽ ഒരു മൂല്യം വേർതിരിച്ചെടുക്കാൻ ഒരു ഉപയോക്തൃഫോം വികസിപ്പിക്കുന്നു
അവസാനം, ഞങ്ങൾ ഒരു UserForm വികസിപ്പിക്കും ചില പ്രത്യേക പരീക്ഷകളിൽ പങ്കെടുത്ത (അല്ലെങ്കിൽ നിർദ്ദിഷ്ട മാർക്ക് നേടിയ) വിദ്യാർത്ഥികളുടെ പേരുകൾ.
⧪ ഘട്ടം 1: ഉപയോക്തൃഫോം തുറക്കുന്നു
ഇൻസേർട്ട് > ഒരു പുതിയ UserForm തുറക്കാൻ VBA എഡിറ്ററിലെ UserForm ഓപ്ഷൻ. UserForm1 എന്ന പേരിൽ ഒരു പുതിയ UserForm തുറക്കപ്പെടും.
⧪ ഘട്ടം 2: ഉപയോക്തൃ ഫോമിലേക്ക് ടൂളുകൾ വലിച്ചിടുന്നു<2
UserForm കൂടാതെ, നിങ്ങൾക്ക് Toolbox ലഭിക്കും. നിങ്ങളുടെ കഴ്‌സർ ടൂൾബോക്‌സ് -ന് മുകളിലൂടെ നീക്കി 4 ലേബലുകൾ വലിച്ചിടുക (ലേബൽ1, ലേബൽ2,Label3, Label4) , 3 ListBoxes (ListBox1, ListBox2, ListBox3) ഒപ്പം TextBox1 (TextBox1) UserForm -ന് മുകളിൽ ചതുരാകൃതിയിൽ.
പിന്നെ മറ്റൊരു ലേബൽ (Label5) , ഒരു TextBox (TextBox2) എന്നിവ UserForm -ന്റെ താഴെ ഇടത് കോണിലേക്ക് വലിച്ചിടുക.
അവസാനം, താഴെ വലത് കോണിലേക്ക് ഒരു CommandButton (CommandButton1) വലിച്ചിടുക.
ലേബലുകൾ Lookup Column , <എന്നതിലേക്ക് മാറ്റുക 1>റിട്ടേൺ കോളം , ഏതെങ്കിലും മൂല്യം അല്ലെങ്കിൽ ഒരു നിർദ്ദിഷ്ട മൂല്യം , മൂല്യം, കൂടാതെ ആരംഭിക്കുന്ന സെൽ.
കൂടാതെ, CommandButton1 ന്റെ ഡിസ്പ്ലേ OK എന്നതിലേക്ക് മാറ്റുക.
⧪ ഘട്ടം 3: ListBox3-നുള്ള റൈറ്റിംഗ് കോഡ്
ListBox3 -ൽ ഡബിൾ ക്ലിക്ക് ചെയ്യുക. ListBox3_Click എന്ന് വിളിക്കുന്ന ഒരു സ്വകാര്യ ഉപനടപടി തുറക്കും. താഴെ പറയുന്ന കോഡ് അവിടെ നൽകുക.
8384
⧪ ഘട്ടം 4: CommandButton1-നുള്ള കോഡ് എഴുതുന്നു
തുടർന്ന് CommandButton1-ൽ ഡബിൾ ക്ലിക്ക് ചെയ്യുക . CommandButton1_Click എന്ന് വിളിക്കുന്ന മറ്റൊരു സ്വകാര്യ ഉപപ്രോസീജർ തുറക്കും. താഴെ പറയുന്ന കോഡ് അവിടെ നൽകുക.
3928
⧪ ഘട്ടം 5: യൂസർഫോം പ്രവർത്തിപ്പിക്കുന്നതിനുള്ള കോഡ് റൈറ്റിംഗ്
അവസാനം, <എന്നതിൽ നിന്ന് ഒരു പുതിയ മൊഡ്യൂൾ ചേർക്കുക 1>VBA ടൂൾബാർ തുടർന്ന് ഇനിപ്പറയുന്ന കോഡ് അവിടെ ചേർക്കുക.
5642
⧪ ഘട്ടം 6: ഉപയോക്തൃഫോം പ്രവർത്തിപ്പിക്കുന്നു (അവസാന ഔട്ട്പുട്ട്)
നിങ്ങളുടെ UserForm ഇപ്പോൾ ഉപയോഗിക്കാൻ തയ്യാറാണ്. വർക്ക്ഷീറ്റിൽ നിന്ന് ഡാറ്റ സെറ്റ് തിരഞ്ഞെടുക്കുക ( B3:E13 ഇവിടെ) ( ഹെഡറുകൾ ഉൾപ്പെടെ) കൂടാതെ Run_UserForm എന്ന് വിളിക്കപ്പെടുന്ന Macro പ്രവർത്തിപ്പിക്കുക.
UserForm വർക്ക് ഷീറ്റിൽ ലോഡ് ചെയ്യും. ലുക്ക്അപ്പ് കോളം പട്ടികയിൽ നിന്ന്, ഞാൻ ഫിസിക്സ് , മാത്തമാറ്റിക്‌സ് എന്നിവ തിരഞ്ഞെടുത്തു, കാരണം ഫിസിക്‌സിൽ പ്രത്യക്ഷപ്പെട്ട വിദ്യാർത്ഥികളുടെ പേരുകൾ ലഭിക്കാൻ ഞാൻ ആഗ്രഹിക്കുന്നു കൂടാതെ ഗണിതശാസ്ത്രം പരീക്ഷകൾ.
റിട്ടേൺ കോളം പട്ടികയിൽ നിന്ന്, ഞാൻ വിദ്യാർത്ഥിയുടെ പേര് തിരഞ്ഞെടുത്തു, കാരണം എനിക്ക് വിദ്യാർത്ഥികളുടെ പേരുകൾ ലഭിക്കണം.
ഒപ്പം ഏതെങ്കിലും മൂല്യം അല്ലെങ്കിൽ നിർദ്ദിഷ്ട മൂല്യം പട്ടികയിൽ നിന്ന്, ഞാൻ ഏതെങ്കിലും മൂല്യം തിരഞ്ഞെടുത്തു.
അവസാനം, ആരംഭ സെല്ലിൽ ബോക്‌സ്, ഞാൻ G3 ഇട്ടു.
തുടർന്ന് ശരി ക്ലിക്ക് ചെയ്യുക. സെൽ G3 മുതൽ ആരംഭിക്കുന്ന ഫിസിക്സ് , ഗണിത പരീക്ഷകളിൽ പങ്കെടുത്ത വിദ്യാർത്ഥികളുടെ പേരുകൾ നിങ്ങൾക്ക് ലഭിക്കും.
<3
നിങ്ങൾ ഏതെങ്കിലും മൂല്യം അല്ലെങ്കിൽ നിർദ്ദിഷ്ട മൂല്യം പട്ടികയിൽ നിന്ന് നിർദ്ദിഷ്ട മൂല്യം തിരഞ്ഞെടുത്തിട്ടുണ്ടെങ്കിൽ, നിർദ്ദിഷ്ട മൂല്യം നൽകുന്നതിന് നിങ്ങൾക്ക് മറ്റൊരു ടെക്‌സ്‌റ്റ്ബോക്‌സ് ലഭിക്കുമായിരുന്നു.
ഇവിടെ ഞാൻ 100 നൽകി.
ശരി ക്ലിക്ക് ചെയ്യുക. കൂടാതെ ഫിസിക്സ് , കെമിസ്ട്രി എന്നിവയിൽ 100 നേടിയ വിദ്യാർത്ഥികളെ നിങ്ങൾക്ക് ലഭിക്കും.
ഓർമ്മിക്കേണ്ട കാര്യങ്ങൾ
ഉദാഹരണത്തിൽ വിവരിച്ചിരിക്കുന്ന ഉപയോക്തൃ-നിർവചിക്കപ്പെട്ട ഫംഗ്‌ഷനിലെ 2 എന്നതിലെ വിദ്യാർത്ഥികളുടെ പേരുകൾ തിരികെ നൽകാൻ ഞങ്ങൾ ഒരു ദ്വിമാന അറേ ഉപയോഗിച്ചു.<3
