តារាងមាតិកា
នៅក្នុងអត្ថបទនេះ ខ្ញុំនឹងបង្ហាញអ្នកពីរបៀបដែលអ្នកអាចវិភាគស្ថានភាពនៅក្នុង Excel VBA ប្រសិនបើក្រឡាមានតម្លៃមួយ។ អ្នកនឹងរៀនវិភាគស្ថានភាពសម្រាប់ទាំងតម្លៃណាមួយ និងតម្លៃជាក់លាក់មួយ។
ការវិភាគ Excel VBA៖ ប្រសិនបើក្រឡាមានតម្លៃបន្ទាប់មក (មើលរហ័ស)
6800
ទាញយកសៀវភៅលំហាត់អនុវត្ត
ទាញយកសៀវភៅលំហាត់នេះ ដើម្បីធ្វើលំហាត់ប្រាណ ខណៈពេលដែលអ្នកកំពុងអានអត្ថបទនេះ។
VBA ប្រសិនបើក្រឡាមានតម្លៃបន្ទាប់មក.xlsm
ការវិភាគ Excel VBA៖ ប្រសិនបើក្រឡាមានគុណតម្លៃ នោះត្រឡប់លទ្ធផលវិញ (ការវិភាគជាជំហានៗ)
នៅទីនេះ យើងមានសំណុំទិន្នន័យដែលមានសញ្ញាសម្គាល់របស់សិស្សមួយចំនួននៅក្នុង រូបវិទ្យា គីមីវិទ្យា។ និងគណិតវិទ្យានៅក្នុងសាលាមួយឈ្មោះថា Sunflower Kindergarten។
កោសិកាទទេមានន័យថាសិស្សមិនបានបង្ហាញខ្លួន នោះគឺអវត្តមាននៅក្នុងការប្រឡងពិសេសនោះ។ ឥឡូវនេះ ចូរយើងវិភាគស្ថានភាព ថាតើក្រឡាមួយមានតម្លៃឬអត់ ជាមួយនឹងសំណុំទិន្នន័យនេះ។
⧪ ជំហានទី 1៖ ការប្រកាសក្រឡា
ដំបូង យើងត្រូវ ប្រកាសក្រឡាដែលតម្លៃដែលយើងចង់វិភាគ។ ចូរយើងវិភាគថាតើ Jennifer Marlo បានបង្ហាញខ្លួននៅក្នុងការប្រឡងរូបវិទ្យាឬអត់។
ដូច្នេះ យើងត្រូវពិនិត្យមើលថាតើក្រឡា C12 មានតម្លៃឬអត់។
ដើម្បីធ្វើដូច្នេះបាន ជាដំបូង យើងត្រូវប្រកាសក្រឡា C12 ។
បន្ទាត់នៃកូដដើម្បីសម្រេចវានឹងមាន៖
8121
⧪ ជំហានទី 2៖ ពិនិត្យមើលថាតើក្រឡាមាន តម្លៃមួយ (រួមទាំងតម្លៃពិសេស)
បន្ទាប់ យើងត្រូវពិនិត្យមើលថាតើក្រឡាមានតម្លៃឬអត់។ យើងនឹងប្រតិបត្តិវាដោយប្រើ ប្រសិនបើលក្ខខណ្ឌ ។ បន្ទាត់នៃកូដនឹងមាន៖
4151
កូដនេះនឹងត្រូវបានប្រតិបត្តិប្រសិនបើក្រឡាមានតម្លៃណាមួយ។ ដើម្បីពិនិត្យមើលតម្លៃ (ឧទាហរណ៍ ថាតើវាមាន 100 ឬអត់) សូមប្រើតម្លៃជាក់លាក់នោះជាមួយនឹងនិមិត្តសញ្ញា ស្មើនឹង ។
9559
⧪ ជំហានទី 3៖ ការបែងចែកភារកិច្ច
បន្ទាប់មក អ្នកត្រូវរៀបចំកិច្ចការដែលនឹងត្រូវបានប្រតិបត្តិ ប្រសិនបើក្រឡាមានតម្លៃ (ឬតម្លៃជាក់លាក់)។
នៅទីនេះ យើងចង់បង្ហាញសារ “Jennifer Marlo បានបង្ហាញខ្លួននៅក្នុងការប្រឡងរូបវិទ្យា។” ។ ដូច្នេះបន្ទាត់នៃកូដនឹងមាន៖
5939
⧪ ជំហានទី 4៖ ការបញ្ចប់ If Block
ជាចុងក្រោយ អ្នកត្រូវតែប្រកាសបញ្ចប់ If block។
3999
ដូច្នេះកូដ VBA ពេញលេញនឹងជា៖
⧭ កូដ VBA៖
2947
⧭ លទ្ធផល៖
ដំណើរការកូដនេះដោយចុចលើប៊ូតុង ដំណើរការទម្រង់រង/អ្នកប្រើប្រាស់ នៅលើរបារឧបករណ៍។
វានឹងបង្ហាញសារ “Jennifer Marlo បានបង្ហាញខ្លួននៅក្នុងការប្រឡងរូបវិទ្យា។” ដោយសារក្រឡា C12 មានតម្លៃ 50 ។
ឧទាហរណ៍ដែលពាក់ព័ន្ធនឹងប្រសិនបើក្រឡាមានតម្លៃ នោះលទ្ធផលដែលបានបញ្ជាក់ជាមួយ Excel VBA
យើងបានរៀនដើម្បីវិភាគថាតើក្រឡាមានតម្លៃឬ មិននៅក្នុង VBA ទេ។ ឥឡូវនេះ សូមស្វែងយល់អំពីឧទាហរណ៍មួយចំនួនដើម្បីធ្វើឱ្យការយល់ដឹងច្បាស់។
1. បង្កើតម៉ាក្រូដើម្បីត្រងតម្លៃ ប្រសិនបើក្រឡាដែលត្រូវគ្នាមានតម្លៃណាមួយនោះក្នុង Excel VBA
តោះបង្កើត ម៉ាក្រូ ដើម្បីច្រោះសិស្សដែលបានបង្ហាញខ្លួននៅក្នុងការប្រឡងនីមួយៗ។
នោះគឺយើងត្រូវពិនិត្យមើលក្រឡាដែលមានសញ្ញាសម្គាល់នៃមុខវិជ្ជានីមួយៗ ហើយមើលថាតើវាមានតម្លៃដែរឬទេ។ ឬអត់។
ប្រសិនបើពួកគេធ្វើបាន នោះយើងត្រូវតម្រៀបឈ្មោះសិស្សដែលត្រូវគ្នា។
កូដ VBA ពេញលេញដើម្បីសម្រេចវានឹងមាន៖
⧭ កូដ VBA៖
7130
⧭ លទ្ធផល៖
ជ្រើសរើសសំណុំទិន្នន័យ ( រួមទាំង បឋមកថា ) ហើយដំណើរការ ម៉ាក្រូ នេះ។
ដំបូង អ្នកនឹងត្រូវបានសួរឱ្យបញ្ចូលឯកសារយោងដំបូង។ ក្រឡាដែលអ្នកចង់បានទិន្នន័យដែលបានត្រង។ ខ្ញុំបានបញ្ចូល G3 ។
បន្ទាប់មកចុច យល់ព្រម ។ អ្នកនឹងទទួលបានឈ្មោះសិស្សដែលបានបង្ហាញខ្លួននៅក្នុងការប្រឡងនីមួយៗ (រួមទាំង បឋមកថា ) នៅក្នុងសំណុំទិន្នន័យថ្មីដែលចាប់ផ្តើមពីក្រឡា G3 ។
2. ការបង្កើតអនុគមន៍កំណត់ដោយអ្នកប្រើប្រាស់ដើម្បីតម្រៀបតម្លៃ ប្រសិនបើក្រឡាដែលត្រូវគ្នាមានតម្លៃជាក់លាក់នោះក្នុង Excel VBA
ឥឡូវនេះយើងនឹងបង្កើតមុខងារកំណត់ដោយអ្នកប្រើប្រាស់ដែលនឹងត្រឡប់ឈ្មោះសិស្ស ដែលទទួលបានពិន្ទុជាក់លាក់ក្នុងមុខវិជ្ជានីមួយៗ។
នីតិវិធីគឺស្ទើរតែដូចគ្នាទៅនឹងមុខវិជ្ជាខាងលើ។ យើងត្រូវពិនិត្យមើលក្រឡាដែលមានសញ្ញាសម្គាល់នៃមុខវិជ្ជានីមួយៗ ហើយមើលថាតើវាស្មើនឹងតម្លៃជាក់លាក់មួយឬអត់។
ប្រសិនបើមាន នោះយើងនឹងប្រគល់ឈ្មោះសិស្សដែលត្រូវគ្នាវិញ។
លេខកូដ VBA នឹងជា៖
⧭ VBAលេខកូដ៖
8812
⧭ លទ្ធផល៖
កូដបង្កើតមុខងារមួយហៅថា Cells_with_Values នោះ យកអាគុយម៉ង់ពីរគឺ Range និង Value ។
តោះស្វែងយល់ពីសិស្សដែលទទួលបាន 100 ក្នុងមុខវិជ្ជានីមួយៗដោយប្រើមុខងារនេះ។
ជ្រើសរើសជួរក្រឡាក្នុងសន្លឹកកិច្ចការរបស់អ្នក ហើយបញ្ចូលមុខងារនេះនៅក្នុងក្រឡាទីមួយនៃជួរ៖
=Cells_with_Values(B3:E13,100) [នៅទីនេះ B3៖ E3 គឺជាសំណុំទិន្នន័យរបស់ខ្ញុំ (រួមទាំង បឋមកថា ) និង 100 គឺជាតម្លៃដែលត្រូវគ្នារបស់ខ្ញុំ។ អ្នកប្រើមួយរបស់អ្នក។]
បន្ទាប់មកចុច CTRL + SHIFT + ENTER ( រូបមន្តអារេ )។ វានឹងត្រឡប់អារេដែលមានឈ្មោះសិស្សដែលទទួលបាន 100 ក្នុងមុខវិជ្ជានីមួយៗ រួមទាំង បឋមកថា ។
3. ការបង្កើតទម្រង់អ្នកប្រើប្រាស់ដើម្បីស្រង់ចេញតម្លៃ ប្រសិនបើក្រឡាដែលត្រូវគ្នាមានតម្លៃណាមួយ (ឬតម្លៃជាក់លាក់) នៅក្នុង Excel VBA
ជាចុងក្រោយ យើងនឹងបង្កើត ទម្រង់អ្នកប្រើប្រាស់ ដើម្បីទាញយក ឈ្មោះសិស្សដែលបានបង្ហាញខ្លួន (ឬទទួលបានពិន្ទុជាក់លាក់) នៅក្នុងការប្រឡងជាក់លាក់មួយចំនួន។
⧪ ជំហានទី 1៖ ការបើកទម្រង់អ្នកប្រើប្រាស់
ចូលទៅកាន់ បញ្ចូល > ជម្រើស UserForm នៅក្នុងកម្មវិធីនិពន្ធ VBA ដើម្បីបើក UserForm ថ្មី។ UserForm ថ្មីដែលហៅថា UserForm1 នឹងត្រូវបានបើក។
⧪ ជំហានទី 2៖ អូសឧបករណ៍ទៅទម្រង់អ្នកប្រើប្រាស់
ក្រៅពី ទម្រង់អ្នកប្រើប្រាស់ អ្នកនឹងទទួលបាន ប្រអប់ឧបករណ៍ ។ ផ្លាស់ទីទស្សន៍ទ្រនិចរបស់អ្នកនៅលើ ប្រអប់ឧបករណ៍ ហើយអូស 4 ស្លាក (Label1, Label2,Label3, Label4) និង 3 ListBoxes (ListBox1, ListBox2, ListBox3) និង TextBox (TextBox1) ក្នុងរាងចតុកោណលើ UserForm ។
បន្ទាប់មកអូស Label (Label5) និង TextBox (TextBox2) ទៅជ្រុងខាងក្រោមខាងឆ្វេងនៃ UserForm ។
ចុងក្រោយ អូស CommandButton (CommandButton1) ទៅជ្រុងខាងក្រោមខាងស្តាំ។
ផ្លាស់ប្តូរការបង្ហាញរបស់ Labels ទៅ រកមើល Column , ត្រឡប់ជួរឈរ , តម្លៃណាមួយ ឬតម្លៃជាក់លាក់មួយ , តម្លៃ, និង ក្រឡាចាប់ផ្តើម។
ផងដែរ ផ្លាស់ប្តូរការបង្ហាញ CommandButton1 ទៅ យល់ព្រម ។
⧪ ជំហានទី 3៖ ការសរសេរកូដសម្រាប់ ListBox3
ចុចពីរដងលើ ListBox3 ។ Private Subprocedure ដែលហៅថា ListBox3_Click នឹងបើក។ បញ្ចូលកូដខាងក្រោមនៅទីនោះ។
4654
⧪ ជំហានទី 4៖ ការសរសេរកូដសម្រាប់ CommandButton1
បន្ទាប់មកចុចពីរដងលើ CommandButton1 ។ Private Subprocedure មួយផ្សេងទៀតដែលហៅថា CommandButton1_Click នឹងបើក។ បញ្ចូលកូដខាងក្រោមនៅទីនោះ។
3220
⧪ ជំហានទី 5៖ ការសរសេរកូដសម្រាប់ដំណើរការ UserForm
ជាចុងក្រោយ សូមបញ្ចូល Module ថ្មីពី របារឧបករណ៍ VBA ហើយបញ្ចូលកូដខាងក្រោមនៅទីនោះ។
4818
⧪ ជំហានទី 6៖ ដំណើរការទម្រង់អ្នកប្រើប្រាស់ (លទ្ធផលចុងក្រោយ)
ទម្រង់អ្នកប្រើប្រាស់ របស់អ្នកឥឡូវនេះរួចរាល់ក្នុងការប្រើប្រាស់ហើយ។ ជ្រើសរើសសំណុំទិន្នន័យពីសន្លឹកកិច្ចការ ( B3:E13 នៅទីនេះ) (រួមទាំង បឋមកថា ) និងដំណើរការ Macro ដែលហៅថា Run_UserForm ។
UserForm នឹងត្រូវបានផ្ទុកនៅក្នុងសន្លឹកកិច្ចការ។ ពីតារាង រកមើលជួរឈរ ខ្ញុំបានជ្រើសរើស រូបវិទ្យា និង គណិតវិទ្យា ពីព្រោះខ្ញុំចង់ទទួលបានឈ្មោះសិស្សដែលបានបង្ហាញខ្លួននៅក្នុង រូបវិទ្យា និង គណិតវិទ្យា ប្រឡង។
ពីតារាង ត្រឡប់ជួរឈរ ខ្ញុំបានជ្រើសរើស ឈ្មោះសិស្ស ព្រោះខ្ញុំចង់ទទួលបានឈ្មោះសិស្ស។
ហើយពីតារាង តម្លៃណាមួយ ឬតម្លៃជាក់លាក់ ខ្ញុំបានជ្រើសរើស តម្លៃណាមួយ ។
ជាចុងក្រោយនៅក្នុង Starting Cell ប្រអប់ ខ្ញុំបានដាក់ G3 ។
បន្ទាប់មកចុច យល់ព្រម ។ អ្នកនឹងទទួលបានឈ្មោះសិស្សដែលបានបង្ហាញខ្លួននៅក្នុង រូបវិទ្យា និង គណិតវិទ្យា ការប្រឡងដែលចាប់ផ្តើមពីក្រឡា G3 ។
ប្រសិនបើអ្នកបានជ្រើសរើស តម្លៃជាក់លាក់ ពីតារាង តម្លៃណាមួយ ឬតម្លៃជាក់លាក់ អ្នកនឹងមាន ប្រអប់អត្ថបទ ផ្សេងទៀតដើម្បីបញ្ចូលតម្លៃជាក់លាក់។
នៅទីនេះខ្ញុំបានបញ្ចូល 100 ។
ចុច យល់ព្រម ។ ហើយអ្នកនឹងទទួលបានសិស្សដែលទទួលបាន 100 ក្នុង រូបវិទ្យា និង គីមីវិទ្យា ។
រឿងដែលត្រូវចងចាំ
យើងបានប្រើអារេពីរវិមាត្រដើម្បីត្រឡប់ឈ្មោះសិស្សនៅក្នុង មុខងារកំណត់ដោយអ្នកប្រើប្រាស់ បានពិពណ៌នាក្នុងឧទាហរណ៍ 2 ។
