VBA ស្វែងរកជួរចុងក្រោយក្នុង Excel (5 វិធី)

  • ចែករំលែកនេះ។
Hugh West

នៅក្នុង 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 ។ អ្នកអាចអនុវត្តតាមវិធីសាស្រ្តណាមួយដើម្បីស្វែងរកជួរចុងក្រោយ។ ក្នុងករណីដែលអ្នកមានការភ័ន្តច្រឡំ ឬចម្ងល់ទាក់ទងនឹងវិធីសាស្ត្រទាំងនេះ អ្នកអាចធ្វើបាន។បញ្ចេញមតិខាងក្រោម។

Hugh West គឺជាគ្រូបណ្តុះបណ្តាល Excel ដែលមានបទពិសោធន៍ខ្ពស់ និងជាអ្នកវិភាគដែលមានបទពិសោធន៍ជាង 10 ឆ្នាំនៅក្នុងឧស្សាហកម្មនេះ។ លោកបានបញ្ចប់ថ្នាក់បរិញ្ញាបត្រផ្នែកគណនេយ្យ និងហិរញ្ញវត្ថុ និងបរិញ្ញាបត្រជាន់ខ្ពស់ផ្នែកគ្រប់គ្រងពាណិជ្ជកម្ម។ Hugh មានចំណង់ចំណូលចិត្តក្នុងការបង្រៀន ហើយបានបង្កើតវិធីសាស្រ្តបង្រៀនពិសេសមួយ ដែលងាយស្រួលធ្វើតាម និងយល់។ ចំណេះដឹងជំនាញ Excel របស់គាត់បានជួយសិស្សានុសិស្ស និងអ្នកជំនាញរាប់ពាន់នាក់នៅទូទាំងពិភពលោកបង្កើនជំនាញ និងពូកែក្នុងអាជីពរបស់ពួកគេ។ តាមរយៈប្លុករបស់គាត់ លោក Hugh ចែករំលែកចំណេះដឹងរបស់គាត់ជាមួយពិភពលោក ដោយផ្តល់ជូននូវការបង្រៀន Excel ដោយឥតគិតថ្លៃ និងការបណ្តុះបណ្តាលតាមអ៊ីនធឺណិត ដើម្បីជួយបុគ្គល និងអាជីវកម្មឈានដល់សក្តានុពលពេញលេញរបស់ពួកគេ។