តារាងមាតិកា
នៅពេលដែលយើងមានសំណុំទិន្នន័យធំនៅក្នុងសៀវភៅការងារ Excel របស់យើង ពេលខ្លះវាងាយស្រួលប្រសិនបើយើងអាចធ្វើរង្វិលជុំតាមជួរដើម្បីទាញយកលទ្ធផលជាក់លាក់ដែលយើងចង់ទទួលបាន។ ការអនុវត្ត VBA គឺជាវិធីសាស្ត្រដ៏មានប្រសិទ្ធភាព លឿនបំផុត និងសុវត្ថិភាពបំផុត ដើម្បីដំណើរការប្រតិបត្តិការណាមួយនៅក្នុង Excel។ នៅក្នុងអត្ថបទនេះ យើងនឹងបង្ហាញអ្នកនូវវិធីសាស្រ្តចំនួន 11 ផ្សេងគ្នាអំពីរបៀប រង្វិលជុំតាមជួរដេកនៃតារាង ក្នុង Excel ជាមួយ VBA macro ។
ទាញយក Workbook
អ្នកអាចទាញយកសៀវភៅលំហាត់ Excel ដោយឥតគិតថ្លៃពីទីនេះ។
Loop through Rows of Table with VBA.xlsm
11 វិធីសាស្រ្តជាមួយ VBA ដើម្បីរង្វិលជុំតាមជួរដេកនៃតារាងក្នុង Excel
ដោយធ្វើតាមផ្នែកនេះ អ្នកនឹងរៀនពីរបៀប រង្វិលជុំតាមជួរដេកនៃតារាង ជាមួយនឹងវិធីសាស្រ្ត 11 ផ្សេងគ្នា។ ដូចជារង្វិលជុំតាមជួរដេករហូតដល់ក្រឡាទទេ ធ្វើរង្វិលជុំតាមជួរដេករហូតដល់តម្លៃជាក់លាក់ត្រូវបានរកឃើញ រង្វិលជុំតាមជួរដេក និងពណ៌ក្រឡាជាក់លាក់មួយ។>
ខាងលើគឺជាសំណុំទិន្នន័យឧទាហរណ៍ដែលអត្ថបទនេះនឹងធ្វើតាមដើម្បីពិពណ៌នាអំពីវិធីសាស្រ្ត។
1. បង្កប់ VBA ដើម្បីរង្វិលជុំតាមក្រឡានីមួយៗក្នុងជួរនីមួយៗនៃតារាងដោយលេខយោងក្រឡា
ប្រសិនបើអ្នកចង់ រង្វិលជុំតាមក្រឡានីមួយៗក្នុងគ្រប់ជួរនៃតារាង ក្នុងសន្លឹកកិច្ចការ Excel របស់អ្នក ហើយទទួលបាន លេខយោងក្រឡាជាតម្លៃត្រឡប់ បន្ទាប់មកធ្វើតាមជំហានដែលបានពិភាក្សាខាងក្រោម។
ជំហាន៖
- នៅដើមដំបូង ចុច Alt + F11 នៅលើក្តារចុចរបស់អ្នក ឬទៅអថេរ។
6347
បំណែកនៃកូដនេះគឺនៅទីនេះសម្រាប់រង្វិលជុំតាមជួរពី 1 ដល់ 15។ ប្រសិនបើវារកឃើញពាក្យជាក់លាក់ “ គែម ” នោះវានឹងពណ៌ក្រឡាដែលកាន់ពាក្យ។ វាបន្តធ្វើដូចនេះរហូតដល់វាបញ្ចប់ការស្កេនតាមទិន្នន័យទាំងអស់ពីជួរទី 1 ដល់ទី 15 ក្នុងការស្វែងរកពាក្យ។
អានបន្ថែម៖ របៀបប្រើអារេតារាង VLOOKUP ដោយផ្អែកលើ តម្លៃក្រឡានៅក្នុង Excel
ការអានស្រដៀងគ្នា
- តើមុខងារតារាងមាននៅក្នុង Excel ទេ?
- របៀបបំប្លែងតារាងទៅជាតារាងក្នុង Excel (3 វិធីរហ័ស)
- បំលែងជួរទៅជាតារាងក្នុង Excel (5 វិធីងាយៗ)
- ប្រើរូបមន្តក្នុងតារាង Excel ប្រកបដោយប្រសិទ្ធភាព (មាន 4 ឧទាហរណ៍)
- ឈ្មោះតារាង Excel៖ អ្វីដែលអ្នកត្រូវដឹង
7. អនុវត្ត VBA ដើម្បីរង្វិលជុំតាមជួរនីមួយៗ និងពណ៌រាល់ជួរសេសក្នុង Excel
ពីផ្នែកមុន យើងបានរៀនពីរបៀបដាក់ពណ៌ក្រឡាដែលមានតម្លៃជាក់លាក់មួយ។ ក្នុងផ្នែកនេះ យើងនឹងរៀនពីរបៀប រង្វិលជុំតាមជួរដេកនីមួយៗនៃតារាង និងពណ៌គ្រប់ជួរដេកសេស ជាមួយ VBA macro ក្នុង Excel។
ជំហានដើម្បីប្រតិបត្តិដំណើរការ ត្រូវបានពិពណ៌នាខាងក្រោម។
ជំហាន៖
- ដូចដែលបានបង្ហាញពីមុន សូមបើក កម្មវិធីនិពន្ធ Visual Basic ពី អ្នកអភិវឌ្ឍន៍ ផ្ទាំង និង បញ្ចូល មួយ ម៉ូឌុល នៅក្នុងបង្អួចកូដ។
- បន្ទាប់មក ចម្លង កូដខាងក្រោម ហើយ បិទភ្ជាប់ វាទៅក្នុង បង្អួចកូដ។
8462
ឥឡូវនេះលេខកូដរបស់អ្នករួចរាល់ដើម្បីដំណើរការហើយ។
- ឥឡូវនេះ រត់ ម៉ាក្រូ ហើយមើលរូបភាពខាងក្រោមដើម្បីមើលលទ្ធផល។
ទាំងអស់ ជួរដែលមានលេខសេសមានពណ៌ បន្ទាប់ពីធ្វើរង្វិលជុំតាមជួរដេកទាំងអស់ដែលស្ថិតនៅក្នុងតារាងនៃសន្លឹកកិច្ចការ។
ការពន្យល់កូដ VBA
2623
កំណត់អថេរ។
9770
កំណត់ជួរដែលយើងនឹងធ្វើការជាមួយ។
6491
ផ្នែកនៃកូដនេះសំដៅលើការសរសេរឡើងវិញតាមរយៈជួរទាំងអស់ ដោយចាប់ផ្តើមពីជួរបន្ទាប់នៃជួរបច្ចុប្បន្ន B4<២៥>។ ប្រសិនបើ mod នៃការបែងចែកលេខជួរដេកដោយ 2 គឺស្មើនឹងលេខជួរដេកដែលបានត្រឡប់មកវិញដែលត្រូវបានរក្សាទុកក្នុងប្រភេទចំនួនគត់ នោះលេខកូដនេះពណ៌ជួរដេកទាំងអស់ដែលត្រូវបានស្រង់ចេញដោយការគណនាជាមួយនឹងសន្ទស្សន៍ពណ៌ដែលបានផ្តល់នៅក្នុងកូដ។ វាបន្តផ្លាស់ទីតាមជួរទាំងអស់រហូតដល់វាឈានដល់ចុងបញ្ចប់នៃជួរ។
8. អនុវត្ត VBA ដើម្បីធ្វើរង្វិលជុំតាមជួរដេក និងពណ៌គ្រប់ជួរនីមួយៗក្នុង Excel
នៅក្នុងផ្នែកមុន យើងបានរៀនពីរបៀបដាក់ពណ៌គ្រប់ជួរសេសនៃតារាង។ នៅក្នុងផ្នែកនេះ យើងនឹងរៀនពីរបៀប រង្វិលជុំតាមជួរនីមួយៗនៃតារាង និងពណ៌នីមួយៗជាជួរ ជាមួយម៉ាក្រូ VBA ក្នុង Excel។
ជំហានដើម្បីប្រតិបត្តិដំណើរការត្រូវបានពិភាក្សាខាងក្រោម។
ជំហាន៖
- ដំបូង បើក កម្មវិធីនិពន្ធមូលដ្ឋានរូបភាព ពីផ្ទាំង អ្នកអភិវឌ្ឍន៍ ហើយ បញ្ចូល a ម៉ូឌុល នៅក្នុងបង្អួចកូដ។
- បន្ទាប់មក ចម្លង កូដខាងក្រោម ហើយ បិទភ្ជាប់ វាទៅក្នុងបង្អួចកូដ។
4898
លេខកូដរបស់អ្នកឥឡូវនេះរួចរាល់ហើយ។រត់។
- បន្ទាប់ រត់ ម៉ាក្រូ ហើយមើលរូបភាពខាងក្រោមដើម្បីមើលលទ្ធផល។
ទាំងអស់ ជួរដេកលេខគូមានពណ៌ បន្ទាប់ពីធ្វើរង្វិលជុំតាមជួរដេកទាំងអស់ដែលស្ថិតក្នុងតារាងនៃសន្លឹកកិច្ចការ។
ការពន្យល់កូដ VBA
5284
កំណត់អថេរ។
1565
កំណត់ជួរដែលយើងនឹងធ្វើការជាមួយ។
7987
បំណែកនៃកូដនេះចាប់ផ្តើមធ្វើម្តងទៀតបន្ទាប់ពី ជួរទាំងបីពីជួរបច្ចុប្បន្ន B4 ។ វាដាក់ពណ៌វាជាមុនសិន បន្ទាប់មកបង្កើនចំនួនជួរដេកដោយ 2 ហើយបន្តពណ៌វារហូតដល់វាឈានដល់ជួរចុងក្រោយនៃសំណុំទិន្នន័យ។
9 ។ អនុវត្តម៉ាក្រូដើម្បីធ្វើឡើងវិញតាមជួររហូតដល់ក្រឡាទទេក្នុង Excel
ប្រសិនបើអ្នកចង់ឱ្យកូដរបស់អ្នកដំណើរការដូចវានឹង រង្វិលជុំតាមជួរដេកទាំងអស់នៃតារាង ហើយឈប់នៅពេលវាទៅដល់ក្រឡាទទេ បន្ទាប់មកផ្នែកនេះគឺសម្រាប់អ្នក។ អ្នកអាចប្រតិបត្តិកិច្ចការនោះទាំងពីរជាមួយ FOR Loop និង Do-Until Loop ក្នុង Excel VBA ។
9.1. ជាមួយ FOR Loop
ជំហានទៅ រង្វិលជុំតាមជួរដេកក្នុងតារាងរហូតដល់ក្រឡាទទេដែលមាន FOR Loop ក្នុង VBA Excel ត្រូវបានផ្តល់ឱ្យខាងក្រោម។
ជំហាន៖
- ដំបូង សូមបើក កម្មវិធីនិពន្ធ Visual Basic ពីផ្ទាំង អ្នកអភិវឌ្ឍន៍ ហើយ បញ្ចូល ម៉ូឌុល នៅក្នុងបង្អួចកូដ។
- បន្ទាប់ពីនោះ ចម្លង កូដខាងក្រោម ហើយ បិទភ្ជាប់ វាទៅក្នុងបង្អួចកូដ។
4999
ឥឡូវនេះ លេខកូដរបស់អ្នករួចរាល់សម្រាប់ដំណើរការហើយ។
- បន្ទាប់មក ដំណើរការ theម៉ាក្រូ ហើយលទ្ធផលត្រូវបានបង្ហាញក្នុង gif ខាងក្រោម។
បន្ទាប់ពីដំណើរការម៉ាក្រូ វា ចាប់ផ្តើមរង្វិលជុំតាមជួរទាំងអស់ ក្នុងតារាង ហើយនៅពេលដែលវាទៅដល់ ក្រឡាទទេ ក្រឡា B8 វា បានបញ្ឈប់ការធ្វើម្តងទៀត ។
ការពន្យល់កូដ VBA
7386
កំណត់អថេរ។
7614
បិទព្រឹត្តិការណ៍អាប់ដេតអេក្រង់។
7563
រក្សាទុកជួរទាំងអស់ដែលចាប់ផ្តើមពី ក្រឡា B4 រហូតដល់លេខចុងក្រោយ។
1568
ជ្រើសរើស Cell B4 ។
8219
កូដនេះចាប់ផ្តើមរង្វិលជុំតាមជួរទាំងអស់។ នៅពេលដែលវារកឃើញក្រឡាទទេក្នុងជួរដេកមួយ បន្ទាប់មកជ្រើសរើសវា ហើយបន្តស្កេនជួររហូតដល់វាដល់ទីបញ្ចប់។
6645
បើកព្រឹត្តិការណ៍អាប់ដេតអេក្រង់។
9.2. ជាមួយ Do-Until Loop
ជំហានដើម្បី រង្វិលជុំតាមជួររហូតដល់ក្រឡាទទេដែលមាន Do-Until loop ក្នុង VBA ត្រូវបានផ្តល់ឱ្យខាងក្រោម។
ជំហាន៖
- ដំបូង បើក កម្មវិធីនិពន្ធ Visual Basic ពីផ្ទាំង អ្នកអភិវឌ្ឍន៍ ហើយ បញ្ចូល a ម៉ូឌុល នៅក្នុងបង្អួចកូដ។
- បន្ទាប់មក ចម្លង កូដខាងក្រោម ហើយ បិទភ្ជាប់ វាទៅក្នុងបង្អួចកូដ។
2513
ឥឡូវនេះ លេខកូដរបស់អ្នករួចរាល់ដើម្បីដំណើរការហើយ។
- នៅពេលក្រោយ រត់ ម៉ាក្រូ។ លទ្ធផលត្រូវបានបង្ហាញក្នុង gif ខាងក្រោម។
បន្ទាប់ពីដំណើរការម៉ាក្រូ វាចាប់ផ្តើម រង្វិលជុំតាមជួរទាំងអស់ ក្នុងតារាង ហើយម្តង វាបានទៅដល់ ក្រឡាទទេ ក្រឡា B8 វា បានបញ្ឈប់ការធ្វើឡើងវិញ ។
កូដ VBAការពន្យល់
7359
ជ្រើសរើសក្រឡាដែលយើងនឹងដំណើរការពី។
6040
ចាប់ផ្តើម និងបន្តរង្វិលជុំរហូតដល់ក្រឡាទទេត្រូវបានរកឃើញ។
8904
នៅពេលដែលក្រឡាទទេមួយគឺ រកឃើញក្នុងជួរដេក បន្ទាប់មកជ្រើសវា ហើយបញ្ឈប់ការធ្វើដដែលៗ។
10. ម៉ាក្រូ VBA ដើម្បីធ្វើវាតាមជួររហូតដល់ក្រឡាទទេច្រើនក្នុង Excel
នៅក្នុងផ្នែកមុន អ្នកបានរៀនពីវិធីបញ្ឈប់រង្វិលជុំនៅពេលរកឃើញក្រឡាទទេ។ ប៉ុន្តែចុះយ៉ាងណាបើអ្នកមិនចង់បញ្ឈប់ការសរសេរឡើងវិញរហូតដល់ក្រឡាទទេជាច្រើនត្រូវបានរកឃើញជំនួសឱ្យតែមួយ។
ជំហានដើម្បី រង្វិលជុំតាមជួររហូតដល់ក្រឡាទទេជាច្រើន ត្រូវបានរកឃើញនៅក្នុងតារាងមួយ។ ជាមួយ VBA Excel ត្រូវបានបង្ហាញខាងក្រោម។
ជំហាន៖
- ដំបូង សូមបើក កម្មវិធីនិពន្ធ Visual Basic ពី ផ្ទាំង Developer និង Insert a Module នៅក្នុងបង្អួចកូដ។
- បន្ទាប់មក ចម្លង កូដខាងក្រោម និង paste វាចូលទៅក្នុងបង្អួចកូដ។
8148
ឥឡូវនេះលេខកូដរបស់អ្នករួចរាល់ដើម្បីដំណើរការហើយ។
- ឥឡូវនេះ រត់ ម៉ាក្រូ ហើយមើល gif ខាងក្រោមសម្រាប់លទ្ធផល។
បន្ទាប់ពីដំណើរការម៉ាក្រូ វា មិនឈប់នៅលើ ក្រឡាទទេដំបូង ក្រឡា B8 ។ វាឈប់នៅពេលវារកឃើញ ក្រឡាទទេពីរជាប់គ្នានៅលើក្រឡា B16 ។
ការពន្យល់កូដ VBA
7109
ជ្រើសរើសក្រឡា ដែលយើងនឹងដំណើរការពី។
3216
ចាប់ផ្តើម និងបន្តរង្វិលជុំរហូតដល់កោសិកាទទេពីរជាប់គ្នាត្រូវបានរកឃើញ។
9073
នៅពេលរកឃើញក្រឡាទទេពីរជាប់គ្នា បន្ទាប់មកជ្រើសរើសវា ហើយបញ្ឈប់ការធ្វើម្តងទៀត។
11. បង្កប់ VBA ដើម្បីរង្វិលជុំតាមជួរដេក ដោយភ្ជាប់ជួរឈរទាំងអស់រហូតដល់ទទេក្នុង Excel
ផ្នែកនេះនឹងបង្ហាញអ្នកពីរបៀប រង្វិលជុំតាមជួរដេកទាំងអស់ក្នុងតារាងមួយ ហើយភ្ជាប់ជួរឈរទាំងអស់រហូតដល់ក្រឡាទទេ។ ត្រូវបានរកឃើញជាមួយ VBA Excel។
តោះរៀនពីរបៀបធ្វើវាជាមួយ VBA macro ក្នុង Excel។
ជំហាន៖
- ដំបូង បើក Visual Basic Editor ពីផ្ទាំង Developer ហើយ Insert a Module នៅក្នុងបង្អួចកូដ។
- បន្ទាប់មក ចម្លង កូដខាងក្រោម ហើយ បិទភ្ជាប់ វាទៅក្នុងបង្អួចកូដ។
9125
លេខកូដរបស់អ្នក ឥឡូវនេះរួចរាល់ដើម្បីដំណើរការហើយ។
- នៅពេលក្រោយ រត់ ម៉ាក្រូ ហើយមើល gif ខាងក្រោមសម្រាប់លទ្ធផល។
ដូចដែលអ្នកអាចមើលឃើញពី gif ខាងលើគឺមានលេចឡើង MsgBox ដែលបង្ហាញអ្នកនូវ តម្លៃរួមនៃជួរឈរទាំងអស់ដែលស្ថិតនៅក្នុងរាល់ ជួរដេក ពីតារាងនៃសន្លឹកកិច្ចការ Excel របស់អ្នក។ ប៉ុន្តែវា បានបញ្ឈប់នៅពេលដែលវាទៅដល់ក្រឡាទទេ ។
ការពន្យល់កូដ VBA
7515
កំណត់អថេរ។
3324
កំណត់ឈ្មោះសន្លឹកដែលយើងនឹងធ្វើការជាមួយ (“ ConcatenatingAllColUntilBlank ” គឺជាឈ្មោះសន្លឹកនៅក្នុងសៀវភៅការងារ)
3163
កំណត់ជួរដែលយើងនឹងធ្វើការជាមួយ។
4596
បំណែកនៃកូដនេះចាប់ផ្តើមរង្វិលជុំជាមួយអារេ។ វាបន្តរង្វិលជុំរហូតដល់វាត្រឡប់ subscript ធំបំផុតនៃអារេ និងព្រំដែនខាងក្រោមនៃវិមាត្រទីមួយ។ បន្ទាប់មកវាចូលទៅក្នុងការធ្វើឡើងវិញនៃការស្រង់ចេញនូវព្រំដែនទាបនៃវិមាត្រទីពីរ។ បន្ទាប់ពីនោះ វាឆ្លងកាត់តម្លៃដែលបានស្រង់ចេញទាំងអស់នៅក្នុងអថេរ iResult ដោយភ្ជាប់ពួកវា ហើយបោះលទ្ធផលទៅក្នុង MsgBox ។ វាបន្តធ្វើដូច្នេះរហូតដល់វារកឃើញក្រឡាទទេ។
សេចក្តីសន្និដ្ឋាន
ដើម្បីបញ្ចប់ អត្ថបទនេះបានបង្ហាញអ្នកនូវវិធីសាស្រ្តដ៏មានប្រសិទ្ធភាពចំនួន 11 អំពីរបៀប រង្វិលជុំតាមជួរ នៃតារាង ក្នុង Excel ជាមួយ ម៉ាក្រូ VBA ។ ខ្ញុំសង្ឃឹមថាអត្ថបទនេះមានប្រយោជន៍ច្រើនសម្រាប់អ្នក។ រីករាយក្នុងការសួរសំណួរណាមួយទាក់ទងនឹងប្រធានបទ។
ទៅកាន់ផ្ទាំង អ្នកអភិវឌ្ឍន៍ -> Visual Basicដើម្បីបើក Visual Basic Editor។
- បន្ទាប់ នៅក្នុងបង្អួចកូដលេចឡើង ពី របារម៉ឺនុយ ចុច បញ្ចូល -> ម៉ូឌុល ។
- បន្ទាប់មក ចម្លង កូដខាងក្រោម ហើយ បិទភ្ជាប់ វាទៅក្នុងកូដ បង្អួច។
1474
ឥឡូវនេះ លេខកូដរបស់អ្នករួចរាល់ដើម្បីដំណើរការហើយ។
- ឥឡូវនេះ ចុច F5 នៅលើរបស់អ្នក ក្តារចុច ឬពីរបារម៉ឺនុយជ្រើសរើស រត់ -> ដំណើរការទម្រង់រង/អ្នកប្រើប្រាស់ ។ អ្នកក៏អាចចុចលើ រូបតំណាង Play តូច នៅក្នុងរបារម៉ឺនុយរង ដើម្បីដំណើរការម៉ាក្រូ។
- ឬទៅ មើលឃើញដោយមើលឃើញ ហើយប្រៀបធៀបសំណុំទិន្នន័យ និងលទ្ធផល អ្នកអាច រក្សាទុក កូដ ហើយ ត្រឡប់ទៅសន្លឹកកិច្ចការ ចំណាប់អារម្មណ៍។
- ពីទីនោះ អ្នកអាចចុច ម៉ាក្រូ ពីផ្ទាំង អ្នកអភិវឌ្ឍន៍ ជ្រើសរើសឈ្មោះម៉ាក្រូ ហើយបន្ទាប់មកចុច រត់ ។
បន្ទាប់ពីដំណើរការកូដដោយជោគជ័យ សូមមើល gif ខាងលើដើម្បីមើលលទ្ធផល។ វានឹងមានលេចឡើង MsgBox ដែលបង្ហាញអ្នកនូវ លេខយោងក្រឡានៃគ្រប់ក្រឡាពីជួរនីមួយៗ ពីតារាងក្នុងសន្លឹក Excel របស់អ្នក។
ការពន្យល់កូដ VBA
3055
ដើម្បីទទួលបានលេខជួរចុងក្រោយក្នុងតារាងដោយស្វែងរកជួរ B.
5220
កំណត់លេខជួរទី 4 ពីកន្លែងដែលទិន្នន័យរបស់យើងចាប់ផ្តើម។
7535
ដើម្បីរង្វិលជុំពីជួរទីមួយ។
6903
កំណត់ជួរលេខ 2 ពីកន្លែងដែលទិន្នន័យរបស់យើងចាប់ផ្តើម។
2897
ចាប់ផ្តើមរង្វិលជុំតាមជួរដើម្បីទទួលបានចុងក្រោយលេខជួរឈរដោយវាយតម្លៃជួរបច្ចុប្បន្នរហូតដល់ជួរចុងក្រោយ។
5928
បង្កើនរង្វិលជុំជួរឈរពីជួរទីមួយរហូតដល់ជួរចុងក្រោយ។
8532
បំណែកនៃកូដនេះដំណើរការ បង្កើនបន្ទាប់ពីនីមួយៗ ការធ្វើឡើងវិញ និងបង្ហាញលទ្ធផលនៃកូដ។
អានបន្ថែម៖ របៀបបន្ថែមជួរដេកថ្មីដោយស្វ័យប្រវត្តិក្នុងតារាង Excel
2 . អនុវត្ត VBA ដើម្បីរង្វិលជុំតាមក្រឡានីមួយៗក្នុងជួរនីមួយៗដោយតម្លៃ
ប្រសិនបើអ្នកចង់ រង្វិលជុំតាមក្រឡានីមួយៗក្នុងជួរនីមួយៗនៃតារាង ហើយបោះតម្លៃដែលស្ថិតនៅក្នុងក្រឡាជាតម្លៃត្រឡប់ បន្ទាប់មកផ្នែកនេះនឹងជួយអ្នកស្វែងយល់ពីរបៀបធ្វើវាជាមួយ VBA Excel។
អ្នកអាចធ្វើវាបានជាមួយ ListObject និងជាមួយ DataBodyRange ទ្រព្យសម្បត្តិនៃ VBA ។ យើងនឹងបង្ហាញអ្នកនូវកូដម៉ាក្រូទាំងវត្ថុ និងលក្ខណសម្បត្តិ។
2.1. ជាមួយ ListObject
ជំហានដើម្បី រង្វិលជុំតាមក្រឡានីមួយៗក្នុងជួរនីមួយៗនៃតារាងដោយតម្លៃក្រឡាជាមួយ ListObject ក្នុង VBA Excel ត្រូវបានផ្តល់ឱ្យខាងក្រោម។
ជំហាន៖
- ដូចមុនដែរ បើក Visual Basic Editor ពីផ្ទាំង អ្នកអភិវឌ្ឍន៍ ហើយ បញ្ចូល a ម៉ូឌុល នៅក្នុងបង្អួចកូដ។
- បន្ទាប់មក នៅក្នុងបង្អួចកូដ ចម្លង កូដខាងក្រោម ហើយ បិទភ្ជាប់ វា។
3507
ឥឡូវនេះ លេខកូដរបស់អ្នករួចរាល់ដើម្បីដំណើរការហើយ។
- បន្ទាប់ពីនោះ រត់ ម៉ាក្រូ ដូចដែលយើងបានបង្ហាញអ្នកនៅក្នុងផ្នែកខាងលើ។ លទ្ធផលត្រូវបានបង្ហាញនៅក្នុង gifខាងក្រោម។
វានឹងមានការលេចឡើង MsgBox បង្ហាញអ្នកនូវតម្លៃ ដែលផ្ទុកដោយគ្រប់ក្រឡាពីជួរនីមួយៗ ពីតារាងក្នុងសន្លឹក Excel របស់អ្នក។
ការពន្យល់កូដ VBA
9898
កំណត់អថេរ។
6216
បំណែកនេះ។ នៃកូដដំបូងចាប់ផ្ដើមរង្វិលជុំតាមជួរដេកក្នុងតារាង (“ TblStudents ” ជាឈ្មោះតារាងរបស់យើង)។ បន្ទាប់មកបញ្ចូលជួរឈរសម្រាប់ជួរនីមួយៗ។ បន្ទាប់ពីនោះហុចតម្លៃនៃក្រឡាក្នុង MsgBox ។ បន្ទាប់មកទៅកាន់ជួរឈរបន្ទាប់។ បន្ទាប់ពីបញ្ចប់ការធ្វើឡើងវិញតាមជួរទាំងអស់នៃជួរដេកមួយ បន្ទាប់មកវាទៅជួរបន្ទាប់ ហើយបន្តដំណើរការម្តងទៀតរហូតដល់ជួរចុងក្រោយ។
2.2. ជាមួយនឹង DataBodyRange Property
ដើម្បីឱ្យកាន់តែជាក់លាក់ជាមួយនឹងទិន្នន័យដែលបានស្រង់ចេញពីតារាង អ្នកអាចប្រើប្រាស់ទ្រព្យសម្បត្តិ DataBodyRange នៃ ListObject ។ លក្ខណសម្បត្តិ DataBodyRange នឹងបោះឱ្យអ្នកនូវលទ្ធផលដែលមានជួរពីបញ្ជីរវាងជួរបឋមកថា និងជួរបញ្ចូល។
ជំហានអំពីរបៀបដែលអ្នកអាច រង្វិលជុំតាមក្រឡានីមួយៗក្នុងជួរនីមួយៗ។ នៃតារាងតាមតម្លៃក្រឡាដែលមាន DataBodyRange ក្នុង VBA Excel ត្រូវបានផ្តល់ឱ្យខាងក្រោម។
ជំហាន៖
- ដូចដែលបានបង្ហាញ ពីមុន បើក Visual Basic Editor ពីផ្ទាំង Developer ហើយ Insert a Module នៅក្នុងបង្អួចកូដ។
- បន្ទាប់មក , ចម្លង កូដខាងក្រោម ហើយ បិទភ្ជាប់ វាទៅក្នុងបង្អួចកូដ។
3073
ឥឡូវនេះ លេខកូដរបស់អ្នករួចរាល់ដើម្បីដំណើរការហើយ។
- ពេលក្រោយ រត់ ម៉ាក្រូ ហើយមើល gif ខាងក្រោមដើម្បីមើលលទ្ធផល។
វានឹងមានលេចចេញមក MsgBox បង្ហាញអ្នកនូវ តម្លៃដែលអនុវត្តដោយគ្រប់ក្រឡាពីជួរនីមួយៗ ពីតារាងក្នុងសន្លឹក Excel របស់អ្នក។
ការពន្យល់កូដ VBA
5881
កំណត់អថេរ។
6890
បំណែកនៃកូដនេះដំបូងចាប់ផ្តើមរង្វិលជុំតាមជួរក្នុងតារាង (“ TblStdnt ” គឺជាឈ្មោះតារាងរបស់យើង) ហើយត្រឡប់ជួរតម្លៃដែលមិនរាប់បញ្ចូល ជួរបឋមកថានៃតារាង។ បន្ទាប់មកឆ្លងកាត់តម្លៃនៃជួរនៅក្នុង MsgBox ។ បន្ទាប់មកវាទៅជួរបន្ទាប់ដើម្បីស្រង់ជួរ ហើយបន្តដំណើរការដដែលៗរហូតដល់ជួរចុងក្រោយ។
3. អនុវត្តម៉ាក្រូ VBA ដើម្បីធ្វើឡើងវិញតាមជួរដេកដោយការភ្ជាប់ជួរឈរក្នុង Excel
ផ្នែកនេះនឹងបង្ហាញពីរបៀប រង្វិលជុំតាមជួរដេកក្នុងតារាងដោយភ្ជាប់ជួរឈរជាមួយជួរឈរដំបូង ពីសំណុំទិន្នន័យរបស់អ្នក នៅក្នុង Excel។
ឧទាហរណ៍ សម្រាប់សំណុំទិន្នន័យរបស់យើង ជាដំបូង យើងនឹងធ្វើម្តងទៀតតាមរយៈ John in Cell B5 និង 101 នៅក្នុង Cell C5 ដោយភ្ជាប់ពួកវា ហើយបន្ទាប់មកធ្វើម្តងទៀតតាមរយៈ John in Cell B5 និង 89 ក្នុង Cell D5 ដោយភ្ជាប់ពួកវាពី ជួរដេក 5 ។
អនុញ្ញាតឱ្យយើងបង្ហាញអ្នកពីរបៀបដែលអ្នកអាចធ្វើបានជាមួយ VBA ម៉ាក្រូក្នុង Excel។
ជំហាន៖
- ដំបូង សូមបើក Visual Basic Editor ពី Developer tab និង Insert a Module នៅក្នុងបង្អួចកូដ។
- ទីពីរ នៅក្នុងបង្អួចកូដ ចម្លង ខាងក្រោម កូដហើយ បិទភ្ជាប់ វា។
2441
ឥឡូវនេះលេខកូដរបស់អ្នករួចរាល់ដើម្បីដំណើរការហើយ។
- ទីបី ដំណើរការ ម៉ាក្រូ។ សូមក្រឡេកមើល gif ខាងក្រោមដើម្បីមើលលទ្ធផល។
វានឹងមានលេចចេញមក MsgBox ដែលបង្ហាញអ្នកនូវតម្លៃ នៃក្រឡាពីជួរទីមួយ និងទីពីរ ( ចនក្នុងក្រឡា B5 ពីជួរ B និង 101 ក្នុងក្រឡា C5 ពីជួរ C ) ហើយបន្ទាប់មក តម្លៃភ្ជាប់ នៃក្រឡាពីជួរទីមួយ និងទីបី ( ចនក្នុងក្រឡា B5 ពីជួរ B និង 89 ក្នុងក្រឡា D5 ពីជួរ D ) នៃ លេខជួរដេក 5 ពីសំណុំទិន្នន័យរបស់អ្នក។ ហើយប្រតិបត្តិការនៃការភ្ជាប់គ្នានេះនឹងបន្តរហូតដល់វាឈានដល់ជួរចុងក្រោយនៃតារាង។
ការពន្យល់កូដ VBA
9584
កំណត់អថេរ។
4577
បន្ទាប់មកលេខកូដជ្រើសរើសតារាងពីសន្លឹកសកម្ម (“ TblConcatenate ” នៅក្នុងឈ្មោះតារាងរបស់យើង)។
9068
បន្ទាប់ពីនោះ ចាប់ផ្តើមធ្វើឡើងវិញជួរនីមួយៗដោយមិនរាប់បញ្ចូលបឋមកថានៃ ជួរឈរ។ ប្រសិនបើការនិយាយឡើងវិញរកឃើញការផ្គូផ្គងក្នុងចន្លោះរវាងបឋមកថាជួរឈរ និងជួរ នោះវារក្សាទុកតម្លៃនៅក្នុងអថេរ iValue ។
2601
ប្រសិនបើលក្ខខណ្ឌខាងលើមិនត្រូវបានបំពេញ នោះ លេខកូដបោះតម្លៃក្នុង MsgBox ហើយបញ្ចប់លក្ខខណ្ឌ។ បន្ទាប់ពីនោះ វាបន្តទៅរង្វិលជុំក្នុងជួរផ្សេងទៀត ហើយបន្តធ្វើម្តងទៀតរហូតដល់ជួរចុងក្រោយ។ នៅពេលដែលវាទៅដល់ជួរចុងក្រោយ ម៉ាក្រូនឹងបញ្ចប់ការប្រតិបត្តិកូដ។
4. បង្កប់ម៉ាក្រូទៅ Iterateតាមរយៈជួរដេកដោយការភ្ជាប់ជួរឈរទាំងអស់ក្នុងតារាងក្នុង Excel
នៅក្នុងផ្នែកនេះ យើងនឹងរៀនពីរបៀប ភ្ជាប់ជួរឈរទាំងអស់ដែលជួរដេកនីមួយៗមាន ក្នុងសំណុំទិន្នន័យជាមួយ VBA macro ក្នុង Excel។
ជំហានដើម្បីប្រតិបត្តិដែលបង្ហាញខាងក្រោម។
ជំហាន៖
- ដំបូងបើក កម្មវិធីនិពន្ធ Visual Basic ពីផ្ទាំង អ្នកអភិវឌ្ឍន៍ ហើយ បញ្ចូល មួយ ម៉ូឌុល នៅក្នុងបង្អួចកូដ។
- បន្ទាប់មក ចម្លង កូដខាងក្រោម ហើយ បិទភ្ជាប់ វាទៅក្នុងបង្អួចកូដ។
3179
ឥឡូវនេះលេខកូដរបស់អ្នករួចរាល់ដើម្បីដំណើរការហើយ។
<3
- បន្ទាប់ ដំណើរការ កូដម៉ាក្រូ។
ដូចដែលអ្នកឃើញពី gif ខាងលើគឺថាមាន ប្រអប់លេចឡើង MsgBox បង្ហាញអ្នកនូវតម្លៃភ្ជាប់ នៃជួរឈរទាំងអស់ដែលស្ថិតនៅក្នុងជួរនីមួយៗ ពីតារាងនៃសន្លឹកកិច្ចការ Excel របស់អ្នក។
ការពន្យល់កូដ VBA
9852
កំណត់អថេរ។
3743
កំណត់ឈ្មោះសន្លឹកដែលយើងនឹងធ្វើការជាមួយ (“ ConcatenatingAllCol ” គឺជាឈ្មោះសន្លឹក នៅក្នុងសៀវភៅការងារ)
9662
ដេ ពិន័យឈ្មោះតារាងដែលយើងនឹងធ្វើការជាមួយ (“ TblConcatenateAll ” គឺជាឈ្មោះតារាងនៅក្នុងសំណុំទិន្នន័យរបស់យើង)។
5287
ចាប់ផ្តើមការធ្វើឡើងវិញតាមជួរនីមួយៗនៃតារាង។
8915
ចាប់ផ្តើមការសរសេរឡើងវិញតាមរយៈជួរឈរនីមួយៗនៃជួរនីមួយៗនៃតារាង។
3058
រក្សាទុកលទ្ធផលដោយប្រសព្វគ្នានឹងតម្លៃនៃជួរនីមួយៗនៃជួរនីមួយៗ។ បន្ទាប់ពីស្កេនតាមជួរឈរទាំងអស់ដែលស្ថិតនៅក្នុងជួរនីមួយៗ វាបានឆ្លងកាត់លទ្ធផលនៅក្នុង MsgBox ។ បន្ទាប់មកម្តងទៀតចាប់ផ្តើមរង្វិលជុំនៅជួរបន្ទាប់ ហើយបន្តរង្វិលជុំរហូតដល់វាទៅដល់ជួរចុងក្រោយនៃតារាង។
អានបន្ថែម៖ របៀបតម្រៀបជួរជាច្រើននៃតារាងជាមួយ Excel VBA (2 វិធីសាស្រ្ត)
5. បញ្ឈប់ការធ្វើឡើងវិញ ប្រសិនបើតម្លៃបានរកឃើញដោយការរង្វិលជុំតាមជួរដេកនៃតារាងជាមួយ VBA Macro
ឧបមាថាអ្នកចង់ រង្វិលជុំតាមជួរដេកនៃតារាងរបស់អ្នកមាន ហើយបញ្ឈប់ការរង្វិលជុំនៅពេលវារកឃើញតម្លៃជាក់លាក់<២>។ អ្នកអាចធ្វើវាបានដោយគ្រាន់តែប្រើកូដម៉ាក្រូសាមញ្ញ។
តោះរៀនពីរបៀបធ្វើវា VBA ក្នុង Excel។
ជំហាន៖
- ដំបូង បើក កម្មវិធីនិពន្ធ Visual Basic ពីផ្ទាំង Developer ហើយ Insert a Module នៅក្នុងបង្អួចកូដ។
- បន្ទាប់មក នៅក្នុងបង្អួចកូដ ចម្លង កូដខាងក្រោម ហើយ បិទភ្ជាប់ វា។
2513
លេខកូដរបស់អ្នកឥឡូវនេះរួចរាល់ដើម្បីដំណើរការ
- នៅពេលក្រោយ ដំណើរការ ម៉ាក្រូ។
- វានឹង ចាប់ផ្តើមរង្វិលជុំ ហើយបញ្ឈប់វានៅពេលវា ស្វែងរកតម្លៃជាក់លាក់ (“ គែម ”) ក្នុងជួរ ហើយបោះលទ្ធផល នៅក្នុង MsgBox ។
ដូចដែលអ្នកអាចមើលឃើញពីរូបភាពខាងលើ មានប្រអប់លេចឡើងបង្ហាញអ្នកនូវ អាសយដ្ឋានក្រឡា $B$10 ដែលយើងរកឃើញ តម្លៃដែលបានបញ្ជាក់ “ គែម ” ។
ការពន្យល់កូដ VBA
4887
កំណត់ អថេរ។
7334
បំណែកនៃកូដនេះគឺនៅទីនេះសម្រាប់រង្វិលជុំតាមជួរពី 1 ដល់ 15។ ប្រសិនបើវារកឃើញពាក្យជាក់លាក់“ គែម ” បន្ទាប់មកវាហុចលទ្ធផលជាមួយនឹងអាសយដ្ឋានក្រឡាដែលកាន់ពាក្យ។ វាបន្តធ្វើដូចនេះរហូតដល់វាបញ្ចប់ការស្កេនតាមទិន្នន័យទាំងអស់ពីជួរទី 1 ដល់ទី 15 ក្នុងការស្វែងរកពាក្យ។
អានបន្ថែម៖ របៀបបញ្ចូល ឬលុបជួរដេក និងជួរពីតារាង Excel
6. VBA ដើម្បីរង្វិលជុំតាមជួរនីមួយៗ ហើយពណ៌តម្លៃជាក់លាក់នៅក្នុង Excel
ចុះយ៉ាងណាបើអ្នកមិនចង់បោះអាសយដ្ឋានក្រឡានៃតម្លៃដែលបានបញ្ជាក់នៅក្នុង MsgBox? អ្នកប្រហែលជាចង់ ពណ៌ក្រឡាដែលផ្ទុកតម្លៃ ដែលអ្នកកំពុងស្វែងរក។
តោះរៀនពីរបៀបធ្វើវាជាមួយ VBA ម៉ាក្រូ។
ជំហាន៖
- ដូចមុនដែរ បើក Visual Basic Editor ពីផ្ទាំង Developer ហើយ Insert ម៉ូឌុល នៅក្នុងបង្អួចកូដ។
- បន្ទាប់មក ចម្លង កូដខាងក្រោម ហើយ បិទភ្ជាប់ វាទៅក្នុងបង្អួចកូដ។
6733
ឥឡូវនេះលេខកូដរបស់អ្នករួចរាល់ដើម្បីដំណើរការហើយ។
- បន្ទាប់ពីនោះ រត់ ម៉ាក្រូ។
- វានឹង ចាប់ផ្តើមរង្វិលជុំ ហើយបញ្ឈប់វានៅពេលដែលវារកឃើញតម្លៃជាក់លាក់ (“ គែម ”) នៅក្នុងជួរ និង ពណ៌ក្រឡា ជាមួយនឹង សន្ទស្សន៍ពណ៌ ដែលអ្នកបានផ្តល់នៅក្នុងលេខកូដ។
ដូចដែលអ្នកអាចឃើញពីរូបភាពខាងលើ C ell B10 ដែលជាកន្លែងដែលយើងបានរកឃើញតម្លៃដែលបានបញ្ជាក់ “ គែម ” មានពណ៌ បន្ទាប់ពីការប្រតិបត្តិកូដ។
ការពន្យល់កូដ VBA
9413
កំណត់