តារាងមាតិកា
នៅក្នុង VBA អ្នកអាចប្រើវិធីផ្សេងគ្នាដើម្បីស្វែងរកជួរចុងក្រោយ។ នៅក្នុងអត្ថបទនេះ ខ្ញុំនឹងពន្យល់ពីវិធីសាស្រ្តផ្សេងៗនៃ VBA ស្វែងរកជួរចុងក្រោយក្នុង Excel។
ដើម្បីធ្វើឱ្យការពន្យល់នេះអាចមើលឃើញ ខ្ញុំនឹងប្រើសំណុំទិន្នន័យគំរូ។ មាន 4 ជួរនៅក្នុងសំណុំទិន្នន័យដែលតំណាងឱ្យព័ត៌មាននៃការលក់។ ជួរឈរទាំងនេះគឺ បុគ្គលិកផ្នែកលក់ តំបន់ ផលិតផល និង តម្លៃ ។
ទាញយកដើម្បីអនុវត្ត
VBA Find Last Row.xlsm
វិធីដើម្បី VBA ស្វែងរកជួរចុងក្រោយក្នុង Excel
1. ការប្រើប្រាស់ SpecialCells ដើម្បីស្វែងរកជួរចុងក្រោយ
អ្នកអាចប្រើវិធីសាស្ត្រ SpecialCells ដើម្បីស្វែងរកជួរចុងក្រោយដោយប្រើ VBA ។
ដំបូង សូមបើក អ្នកអភិវឌ្ឍន៍ ផ្ទាំង >> បន្ទាប់មកជ្រើសរើស Visual Basic
បង្អួចថ្មីរបស់ Microsoft Visual Basic for Applications នឹងលេចឡើង។
ឥឡូវនេះ ពី បញ្ចូល >> ជ្រើសរើស Module
A Module នឹងត្រូវបានបើក។
បន្ទាប់មកសរសេរកូដខាងក្រោមនៅក្នុង Module .
7537
នៅទីនេះ ខ្ញុំបានបង្កើតដំណើរការរងមួយហៅថា LastRow_SpecialCells ដែលជាប្រភេទ Long នៃអថេរ LastRow ត្រូវបានប្រកាស។
បន្ទាប់មកកំណត់អថេរដោយប្រើវិធីសាស្ត្រ Range.SpecialCells ។ នៅទីនេះ ខ្ញុំបានប្រើជួរឈរ A ( A:A ) ជាជួរ។ បានផ្តល់ xlCellTypeLastCell ជាប៉ារ៉ាម៉ែត្រប្រភេទនៃ SpecialCells វានឹងត្រឡប់ក្រឡាចុងក្រោយសម្រាប់ជួរ (សម្រាប់ករណីនេះ ពីជួរឈរ A )។
ខ្ញុំបានប្រើប្រអប់សារដើម្បីបង្ហាញលទ្ធផល។
បន្ទាប់ពីនោះ រក្សាទុក លេខកូដ ហើយត្រលប់ទៅ សន្លឹកកិច្ចការ។
ម្តងទៀត បើក មើល ផ្ទាំង >> ពី ម៉ាក្រូ >> ជ្រើសរើស មើលម៉ាក្រូ
បន្ទាប់មក ប្រអប់មួយ នឹងលេចឡើង។
ឥឡូវនេះ ពី ឈ្មោះម៉ាក្រូ ជ្រើសរើស LastRow_SpecialCells ក៏ជ្រើសរើសសៀវភៅការងារនៅក្នុង ម៉ាក្រូក្នុង ។
ជាចុងក្រោយ ដំណើរការ ដែលបានជ្រើសរើស ម៉ាក្រូ ។
ដូច្នេះ វានឹងលេចឡើងប្រអប់សារដែលបង្ហាញលេខជួរចុងក្រោយ។
2. ការប្រើប្រាស់ Rows.Count សម្រាប់ក្រឡាដែលមិនទទេ
អ្នកអាចប្រើវិធីសាស្ត្រ Rows.Count ដើម្បីស្វែងរកជួរចុងក្រោយដោយប្រើ VBA ។
ឥឡូវនេះ សូមបើកផ្ទាំង អ្នកអភិវឌ្ឍន៍ >> បន្ទាប់មកជ្រើសរើស Visual Basic
បង្អួចថ្មីរបស់ Microsoft Visual Basic for Applications នឹងលេចឡើង។
ឥឡូវនេះ ពី បញ្ចូល >> ជ្រើសរើស Module
A Module នឹងត្រូវបានបើក។
បន្ទាប់មកសរសេរកូដខាងក្រោមនៅក្នុង Module .
7270
នៅទីនេះ ខ្ញុំបានបង្កើតដំណើរការរងមួយហៅថា LastRow_NonEmpty ដែលប្រភេទអថេរ Long LastRow ត្រូវបានប្រកាស។
ឥឡូវនេះ CELLS(Rows.Count, 1) នឹងរាប់ចំនួនជួរដេកដែលមាននៅក្នុងជួរទីមួយ។ បន្ទាប់មកបានប្រើ End(xlUp).Row ឥឡូវនេះវានឹងរកឃើញជួរដែលបានប្រើចុងក្រោយក្នុងជួរ Excel។
នៅទីបញ្ចប់ ខ្ញុំបានប្រើប្រអប់សារដើម្បីបង្ហាញលទ្ធផល។
បន្ទាប់មក រក្សាទុក លេខកូដ ហើយត្រឡប់ទៅសន្លឹកកិច្ចការវិញ។
នៅទីនេះ បើក មើល ផ្ទាំង >> ពី ម៉ាក្រូ >> ជ្រើសរើស មើលម៉ាក្រូ
ឥឡូវនេះ ប្រអប់ ប្រអប់ នឹងលេចឡើង។
បន្ទាប់មក ពី ឈ្មោះម៉ាក្រូ ជ្រើសរើស LastRow_NonEmpty ក៏ជ្រើសរើសសៀវភៅការងារនៅក្នុង ម៉ាក្រូក្នុង ។
ជាចុងក្រោយ ដំណើរការ ដែលបានជ្រើសរើស ម៉ាក្រូ ។
ដូច្នេះ វានឹងបង្ហាញប្រអប់សារដែលបង្ហាញលេខជួរចុងក្រោយ។
3. ការប្រើប្រាស់ Rows.Count សម្រាប់ជួរឈរដែលបានជ្រើសរើសណាមួយ
ដោយប្រើជួរឈរដែលបានជ្រើសរើសណាមួយនៅក្នុង VBA អ្នកអាចស្វែងរកជួរចុងក្រោយ។
ដំបូង បើកផ្ទាំង អ្នកអភិវឌ្ឍន៍ >> បន្ទាប់មកជ្រើសរើស Visual Basic
បង្អួចថ្មីរបស់ Microsoft Visual Basic for Applications នឹងលេចឡើង។
ឥឡូវនេះ ពី បញ្ចូល >> ជ្រើសរើស Module
A Module នឹងត្រូវបានបើក។
បន្ទាប់មកសរសេរកូដខាងក្រោមនៅក្នុង Module .
6739
នៅទីនេះ ខ្ញុំបានបង្កើតដំណើរការរងមួយហៅថា LastRow_AnyColumn ដែលប្រភេទអថេរ Long LastRow ត្រូវបានប្រកាស។
បន្ទាប់មក ក្នុង ជួរ បានផ្តល់ជួរឈរ B ជាប៉ារ៉ាម៉ែត្រ ហើយក៏ Rows.Count នេះ នឹងរាប់ចំនួនជួរដេកនៅក្នុងជួរឈរដែលបានផ្ដល់ឱ្យ B ។ បន្ទាប់មកប្រើ End(xlup)។ Row ដែលនឹងរកឃើញជួរដែលបានប្រើចុងក្រោយក្នុងជួរ Excel។
ចុងក្រោយ ខ្ញុំបានប្រើប្រអប់សារដើម្បីបង្ហាញលទ្ធផល។
បន្ទាប់ រក្សាទុក លេខកូដ ហើយត្រឡប់ទៅសន្លឹកកិច្ចការវិញ។
បន្ទាប់មកបើក មើល ផ្ទាំង >> ពី ម៉ាក្រូ >> ជ្រើសរើស មើលម៉ាក្រូ
នៅទីនេះ ប្រអប់មួយ នឹងលេចឡើង។
ឥឡូវនេះ ពី ឈ្មោះម៉ាក្រូ ជ្រើសរើស LastRow_AnyColumn ក៏ជ្រើសរើសសៀវភៅការងារនៅក្នុង ម៉ាក្រូក្នុង ។
ជាចុងក្រោយ ដំណើរការ ដែលបានជ្រើសរើស ម៉ាក្រូ ។
ដូច្នេះ វានឹងលេចឡើងប្រអប់សារដែលបង្ហាញលេខជួរចុងក្រោយ។
ការអានស្រដៀងគ្នា៖
- VBA ស្វែងរកក្នុងជួរឈរក្នុង Excel (7 វិធីសាស្រ្ត)
- ស្វែងរក និងជំនួសដោយប្រើ VBA (11 វិធី)
- ស្វែងរកការផ្គូផ្គងពិតប្រាកដដោយប្រើ VBA ក្នុង Excel (5 វិធី)
- របៀបស្វែងរកខ្សែអក្សរជាមួយ VBA ក្នុង Excel (ឧទាហរណ៍ 8)
4. ការប្រើប្រាស់ UsedRange ដើម្បីស្វែងរកជួរចុងក្រោយ
អ្នកអាចប្រើលក្ខណសម្បត្តិ UsedRange នៃសន្លឹកកិច្ចការដើម្បីស្វែងរកចុងក្រោយ ជួរដេកដោយប្រើ VBA ។
ឥឡូវនេះ សូមបើក អ្នកអភិវឌ្ឍន៍ ផ្ទាំង >> បន្ទាប់មកជ្រើសរើស Visual Basic
បន្ទាប់មក បង្អួចថ្មីរបស់ Microsoft Visual Basic for Applications នឹងលេចឡើង។
ឥឡូវនេះ ពី បញ្ចូល >> ជ្រើសរើស Module
A Module នឹងត្រូវបានបើក។
បន្ទាប់មកសរសេរកូដខាងក្រោមនៅក្នុង ម៉ូឌុល ។
8601
នៅទីនេះ ខ្ញុំបានបង្កើតដំណើរការរងមួយដែលមានឈ្មោះថា LastRow_UsedRange ដែលជាប្រភេទអថេរ Long LastRow ត្រូវបានប្រកាស។
បន្ទាប់ កំណត់ theអថេរដោយប្រើវិធីសាស្ត្រ ActiveSheet.UsedRange.Rows ក៏បានផ្តល់ ActiveSheet.UsedRange.Rows.Count ជាប៉ារ៉ាម៉ែត្រនៃ ActiveSheet.UsedRange.Rows វានឹងត្រឡប់ ជួរចុងក្រោយ។
ខ្ញុំបានប្រើប្រអប់សារដើម្បីបង្ហាញលទ្ធផល។
ឥឡូវនេះ រក្សាទុក លេខកូដ ហើយត្រឡប់ទៅសន្លឹកកិច្ចការវិញ។
បន្ទាប់មកបើក មើល ផ្ទាំង >> ពី ម៉ាក្រូ >> ជ្រើសរើស មើលម៉ាក្រូ
បន្ទាប់ ប្រអប់ ប្រអប់ នឹងលេចឡើង។
បន្ទាប់មក ពី ម៉ាក្រូ ឈ្មោះ ជ្រើសរើស LastRow_UsedRange ក៏ជ្រើសរើសសៀវភៅការងារនៅក្នុង Macros ក្នុង ។
ចុងក្រោយ ដំណើរការ ដែលបានជ្រើសរើស Macro ។>.
ដូច្នេះ វានឹងបង្ហាញប្រអប់សារដែលបង្ហាញលេខជួរចុងក្រោយ។
5. ការប្រើប្រាស់ Range.Find to Find Last ជួរដេក
អ្នកអាចប្រើ Range.Find វិធីសាស្រ្តដើម្បីស្វែងរកជួរចុងក្រោយដោយប្រើ VBA ។
ឥឡូវនេះ សូមបើក អ្នកអភិវឌ្ឍន៍ ផ្ទាំង >> បន្ទាប់មកជ្រើសរើស Visual Basic
នៅទីនេះ បង្អួចថ្មីរបស់ Microsoft Visual Basic for Applications នឹងលេចឡើង។
ឥឡូវនេះ ពី បញ្ចូល >> ជ្រើសរើស Module
A Module នឹងត្រូវបានបើក។
បន្ទាប់មកសរសេរកូដខាងក្រោមនៅក្នុង Module ។
5048
នៅទីនេះ ខ្ញុំបានបង្កើតដំណើរការរងមួយហៅថា Range_Find_Method ដែលប្រភេទអថេរ Long LastRow ត្រូវបានប្រកាស .
បន្ទាប់មកកំណត់អថេរដោយប្រើវិធីសាស្ត្រ Cells.Find ។ នៅទីនេះ ប្រកាស ៧ប៉ារ៉ាម៉ែត្រ។ នៅក្នុង អ្វី ប៉ារ៉ាម៉ែត្រដែលខ្ញុំបានប្រើ (“*”) ដែលនឹងរកឃើញក្រឡាដែលមិនទទេដំបូង។ បានផ្តល់ឱ្យ A1 ជាជួរនៅក្នុង បន្ទាប់ពី ប៉ារ៉ាម៉ែត្រដើម្បីចាប់ផ្តើម។ នៅក្នុង LookAt ប៉ារ៉ាម៉ែត្រដែលបានផ្តល់ xlPart ដើម្បីមើលផ្នែកណាមួយនៃអត្ថបទនៅខាងក្នុងក្រឡា។
LookIn:=xlFormulas ប៉ារ៉ាម៉ែត្រនឹងស្វែងរក រូបមន្តប្រសិនបើមាន។ SearchOrder:=xlByRows ប៉ារ៉ាម៉ែត្រនឹងផ្លាស់ទីពីស្តាំទៅឆ្វេង ហើយក៏រង្វិលជុំឡើងតាមជួរនីមួយៗរហូតដល់វារកឃើញក្រឡាដែលមិនទទេ។
MatchCase:=False ប៉ារ៉ាម៉ែត្រនឹងប្រាប់ Find មិនឱ្យពិចារណាអក្សរធំឬអក្សរតូច។ នៅពេលដែលរកឃើញមិនទទេ វាឈប់ ហើយត្រឡប់លេខជួរដេក។
ខ្ញុំបានប្រើប្រអប់សារដើម្បីបង្ហាញលទ្ធផល។
ឥឡូវនេះ រក្សាទុក លេខកូដ ហើយត្រឡប់ទៅសន្លឹកកិច្ចការវិញ។
នៅទីនេះ បើក មើល ផ្ទាំង >> ពី ម៉ាក្រូ >> ជ្រើសរើស មើលម៉ាក្រូ
ឥឡូវនេះ ប្រអប់ ប្រអប់ នឹងលេចឡើង។
ឥឡូវនេះ ពី ឈ្មោះម៉ាក្រូ ជ្រើសរើស Range_Find_Method ក៏ជ្រើសរើសសន្លឹកកិច្ចការក្នុង ម៉ាក្រូក្នុង ។
ជាចុងក្រោយ ដំណើរការ ដែលបានជ្រើសរើស ម៉ាក្រូ ។
ដូច្នេះ វានឹងលេចឡើងប្រអប់សារដែលបង្ហាញលេខជួរចុងក្រោយ។
សេចក្តីសន្និដ្ឋាន
នៅក្នុងអត្ថបទនេះ ខ្ញុំបានពន្យល់ 5 វិធីដើម្បី VBA ស្វែងរកជួរចុងក្រោយក្នុង Excel ។ អ្នកអាចអនុវត្តតាមវិធីសាស្រ្តណាមួយដើម្បីស្វែងរកជួរចុងក្រោយ។ ក្នុងករណីដែលអ្នកមានការភ័ន្តច្រឡំ ឬចម្ងល់ទាក់ទងនឹងវិធីសាស្ត្រទាំងនេះ អ្នកអាចធ្វើបាន។បញ្ចេញមតិខាងក្រោម។