VBA ដើម្បីតម្រៀបជួរឈរក្នុង Excel (4 វិធីសាស្រ្ត)

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

ដើម្បីតម្រៀបក្នុង Excel ជាមួយ VBA អ្នកត្រូវអនុវត្តវិធីសាស្ត្រ Range.Sort ។ នៅក្នុងអត្ថបទនេះ យើងនឹងបង្ហាញអ្នកពីរបៀប តម្រៀបជួរឈរ ក្នុង Excel ជាមួយនឹងវិធីសាស្ត្រ Range.Sort នៃ VBA

ទាញយកសៀវភៅការងារ

អ្នកអាចទាញយកសៀវភៅលំហាត់ Excel ដោយឥតគិតថ្លៃពីទីនេះ។

តម្រៀបជួរឈរជាមួយ VBA.xlsm

Range.Sort Method ក្នុង Excel VBA

Range.Sort method ក្នុង VBA តម្រៀបជួរតម្លៃក្នុង Excel ។ នៅទីនេះ Range គឺជាអថេរវត្ថុដែលបញ្ជាក់ជួរក្រឡាដែលយើងចង់ តម្រៀបតាមលំដាប់ឡើង ឬចុះ។

ខាងក្រោមគឺជាប៉ារ៉ាម៉ែត្រដែលអ្នកត្រូវដឹង អំពីពេលកំពុងធ្វើការជាមួយនឹងវិធីសាស្ត្រនេះ។

ប៉ារ៉ាម៉ែត្រ ទាមទារ/ស្រេចចិត្ត ប្រភេទទិន្នន័យ ការពិពណ៌នា
គ្រាប់ចុច ជម្រើស វ៉ារ្យង់ បញ្ជាក់ជួរ ឬជួរតម្លៃដែលមានតម្លៃ នឹងត្រូវតម្រៀប។
បញ្ជាទិញ ស្រេចចិត្ត ការបញ្ជាទិញ XlSortOrder បញ្ជាក់លំដាប់ដែលការតម្រៀបនឹងត្រូវបានអនុវត្ត។
  • xlAscending = ដើម្បីតម្រៀបតាមលំដាប់ឡើង។
  • xlDescending = ដើម្បីតម្រៀបតាមលំដាប់ចុះ។
បឋមកថា ជម្រើស XlYesNoGuess បញ្ជាក់ថាតើជួរទីមួយមានបឋមកថាឬអត់ .
  • xlNo = នៅពេលដែលជួរឈរមិនមានបឋមកថាណាមួយ; តម្លៃលំនាំដើម។
  • xlYes = ពេលជួរឈរមានបឋមកថា។
  • xlGuess = ដើម្បីអនុញ្ញាតឱ្យ Excel កំណត់បឋមកថា។

4 វិធីសាស្រ្តក្នុងការអនុវត្ត VBA ដើម្បីតម្រៀបជួរឈរក្នុង Excel

នៅក្នុងផ្នែកនេះ អ្នកនឹងដឹងពីរបៀប តម្រៀបជួរឈរតែមួយដោយមាន និងគ្មានបឋមកថា , ជួរឈរច្រើនជាមួយ និងដោយគ្មានបឋមកថា និងរបៀប តម្រៀបដោយគ្រាន់តែចុចទ្វេដងលើបឋមកថាក្នុងជួរឈរ ក្នុង Excel។

1. បង្កប់ VBA ដើម្បីតម្រៀបជួរឈរតែមួយដោយគ្មានបឋមកថានៅក្នុង Excel

ប្រសិនបើអ្នកចង់ តម្រៀបជួរឈរតែមួយ នៅក្នុងសន្លឹកកិច្ចការ Excel របស់អ្នកជាមួយនឹងកូដ VBA បន្ទាប់មកធ្វើតាម ជំហានខាងក្រោម។

នេះគឺជាជួររបស់យើងដែលយើងនឹងតម្រៀបជាមួយកូដ VBA

ជំហាន៖

  • ចុច Alt + F11 នៅលើក្តារចុចរបស់អ្នក ឬចូលទៅកាន់ផ្ទាំង Developer -> Visual Basic ដើម្បីបើក Visual Basic Editor

  • នៅក្នុងបង្អួចកូដលេចឡើង ពីរបារម៉ឺនុយ ចុច បញ្ចូល -> ម៉ូឌុល

  • ចម្លងកូដខាងក្រោម ហើយបិទភ្ជាប់វាទៅក្នុងបង្អួចកូដ។
5011

លេខកូដរបស់អ្នក ឥឡូវនេះរួចរាល់ដើម្បីដំណើរការហើយ។

នៅទីនេះ

  • Key1:=Range(“B5”) → បានបញ្ជាក់ B5 ដើម្បីឱ្យកូដដឹងថាជួរឈរមួយណាដែលត្រូវតម្រៀប។
  • Order1:=xlAscending → បញ្ជាក់លំដាប់ជា xlAscending ដើម្បីតម្រៀបជួរឈរតាមលំដាប់ឡើង។ បើ​អ្នក​ចង់​តម្រៀប​ជួរ​ឈរ​តាម​លំដាប់​ចុះ​បន្ទាប់​មក​សរសេរ xlDescending ជំនួស។
  • Header:= xlNo →ដោយសារជួរឈររបស់យើងមិនមានបឋមកថាទេ ដូច្នេះយើងបានបញ្ជាក់វាជាមួយនឹងជម្រើស xlNo

  • ចុច F5 នៅលើក្តារចុចរបស់អ្នក ឬពីរបារម៉ឺនុយជ្រើសរើស រត់ -> ដំណើរការទម្រង់រង/អ្នកប្រើប្រាស់ ។ អ្នកក៏អាចចុចលើ រូបតំណាង Play តូច នៅក្នុងរបារម៉ឺនុយរង ដើម្បីដំណើរការម៉ាក្រូ។

អ្នកនឹងឃើញថារបស់អ្នក ឥឡូវនេះជួរឈរត្រូវបាន តម្រៀបតាមលំដាប់ឡើង

សូមកត់សម្គាល់ថានៅទីនេះ យើងបានកំណត់ជួរទិន្នន័យដោយដៃជា Range(“B5:B15” ) .

ប្រសិនបើអ្នកចង់ផ្លាស់ប្តូរទិន្នន័យដោយការបន្ថែម ឬលុបតម្លៃ អ្នកអាចអនុវត្តកូដខាងក្រោមដែលធ្វើបច្ចុប្បន្នភាពដោយស្វ័យប្រវត្តិដោយផ្អែកលើក្រឡានៅក្នុងសំណុំទិន្នន័យ។

5113

សូមកត់សម្គាល់វាជំនួសវិញ នៃការកំណត់ជួរដោយដៃដោយ Range(“B5:B15”) យើងបានសរសេរ Range( “B5” Range(“B5”)។ End(xlDown)) .

វានឹងតម្រៀបជួរឈរដោយផ្អែកលើក្រឡាចុងក្រោយដែលបានបំពេញជាប់ៗគ្នានៅក្នុងវា។ ប្រសិនបើមានក្រឡាទទេ ទិន្នន័យនឹងត្រូវបានគិតត្រឹមក្រឡាទទេដំបូងប៉ុណ្ណោះ។

អានបន្ថែម៖ VBA to Sort Table in Excel (4 Methods)

២. បញ្ចូល VBA Macro ដើម្បីតម្រៀបជួរឈរតែមួយជាមួយបឋមកថា

នៅក្នុងផ្នែកមុន យើងមានសំណុំទិន្នន័យនៃជួរឈរតែមួយដោយគ្មានបឋមកថា ប៉ុន្តែឥឡូវនេះយើងមាន a ជួរឈរជាមួយបឋមកថា

លើកនេះយើងនឹងរៀនពីរបៀបតម្រៀបវាជាមួយ ម៉ាក្រូ VBA

ជំហាន៖

  • ដូចមុនដែរ បើក Visual Basic Editor ពីផ្ទាំង Developer និង Insert a Module នៅក្នុងបង្អួចកូដ។
  • នៅក្នុងបង្អួចកូដ សូមចម្លងកូដខាងក្រោម ហើយបិទភ្ជាប់វា។
3151

ឥឡូវនេះ លេខកូដរបស់អ្នករួចរាល់សម្រាប់ដំណើរការហើយ។

នៅទីនេះ

  • Key1:=Range(“ B5”) → បញ្ជាក់ B5 ដើម្បីឲ្យកូដដឹងថាជួរឈរមួយណាដែលត្រូវតម្រៀប។
  • Order1:=xlDescending → លើកនេះយើងនឹងតម្រៀបជួរឈរក្នុង លំដាប់ចុះក្រោម ដូច្នេះបានបញ្ជាក់លំដាប់ថា xlDescending
  • Header:= xlYes → ដោយសារជួរឈររបស់យើងមានបឋមកថានៅពេលនេះ ដូច្នេះយើងបញ្ជាក់វាជាមួយ xlYes option .

អានបន្ថែម៖ របៀបតម្រៀបប្រអប់បញ្ជីជាមួយ VBA ក្នុង Excel (ការណែនាំពេញលេញ)

ការអានស្រដៀងគ្នា៖

  • របៀបតម្រៀបអាសយដ្ឋាន IP នៅក្នុង Excel (6 វិធីសាស្រ្ត)
  • [ដោះស្រាយ!] តម្រៀប Excel មិនដំណើរការ (ដំណោះស្រាយ 2)
  • របៀបបន្ថែមប៊ូតុងតម្រៀបក្នុង Excel (7 វិធីសាស្រ្ត)
  • តម្រៀបជួរ e ការប្រើប្រាស់ VBA ក្នុង Excel (6 ឧទាហរណ៍)
  • របៀបតម្រៀបតាមឈ្មោះក្នុង Excel (ឧទាហរណ៍ 3)

3. ម៉ាក្រូ VBA ដើម្បីតម្រៀបជួរឈរច្រើនដោយមាន ឬគ្មានបឋមកថា

អ្នកក៏អាច តម្រៀបជួរឈរច្រើននៅក្នុងសំណុំទិន្នន័យរបស់អ្នកដោយប្រើកូដ VBA ។

ជំហាន៖

  • ដូចដែលបានបង្ហាញពីមុន បើក Visual Basic Editor ពីផ្ទាំង អ្នកអភិវឌ្ឍន៍ ហើយ បញ្ចូល a ម៉ូឌុល នៅក្នុងបង្អួចកូដ។
  • នៅក្នុងបង្អួចកូដ សូមចម្លងកូដខាងក្រោម ហើយបិទភ្ជាប់វា។
1594

ឥឡូវនេះ លេខកូដរបស់អ្នករួចរាល់ដើម្បីដំណើរការហើយ។

នៅទីនេះ។

.SortFields.Add Key:=Range(“B4”), Order:=xlAscending

.SortFields.Add Key:=Range(“C4 ”), Order:=xlAscending

ដោយបន្ទាត់ទាំងពីរនេះ យើងកំពុងកំណត់ Cell B4 និង C4 ដើម្បីតម្រៀបជួរ ពីរដែលភ្ជាប់ជាមួយ ពួកគេ ក្នុង លំដាប់ឡើង

ដូចដែលយើងមានបឋមកថានៅក្នុងសំណុំទិន្នន័យរបស់យើង ដូច្នេះយើងបានបញ្ជាក់ Header = xlYes បើមិនដូច្នេះទេ យើងនឹងសរសេរ Header = xlNo នៅខាងក្នុងកូដ។

  • ដំណើរការ កូដនេះ ហើយអ្នកនឹងទទួលបាន ជួរឈរដែលមានបឋមកថាបានតម្រៀបតាមលំដាប់ឡើង។ .

4. ម៉ាក្រូដើម្បីតម្រៀបទិន្នន័យដោយចុចពីរដងលើបឋមកថាក្នុង Excel

ប្រសិនបើអ្នកចង់តម្រៀបទិន្នន័យដោយងាយស្រួលដោយគ្រាន់តែ ចុចពីរដងលើបឋមកថា អ្នកអាចធ្វើវាបានជាមួយ VBA code។

ជំហាន៖

  • ចុចខាងស្តាំ នៅលើ ផ្ទាំងសន្លឹក .
  • ពីបញ្ជីជម្រើសដែលបានបង្ហាញ សូមចុច មើលកូដ
  • បង្អួចកូដនឹងលេចឡើង ចម្លងកូដខាងក្រោម ហើយបិទភ្ជាប់វានៅទីនោះ។
8193
  • រក្សាទុក លេខកូដ។

  • ឥឡូវត្រឡប់ទៅសន្លឹកកិច្ចការដែលអ្នកចាប់អារម្មណ៍ ហើយប្រសិនបើអ្នក ចុចពីរដងលើបឋមកថា អ្នកនឹងឃើញជួរឈរកំពុងរៀបចំឡើងវិញ។

អានបន្ថែម៖ របៀបតម្រៀប និងត្រងទិន្នន័យក្នុង Excel (ការណែនាំពេញលេញ)

អ្វីដែលត្រូវចងចាំ

  • អ្នកអាចបង្កើតជួរដែលមានឈ្មោះ ហើយប្រើវាជំនួសវិញ នៅពេលអ្នកឆ្លងកាត់ជួរនៃសេចក្តីយោងក្រឡានៅខាងក្នុង តម្រៀប វិធីសាស្រ្ត។ ឧទាហរណ៍ ប្រសិនបើអ្នកចង់តម្រៀបជួរ A1:A10 ជំនួសឱ្យការឆ្លងកាត់វារាល់ពេលដែលនៅក្នុងកូដ អ្នកអាចបង្កើតជួរដែលមានឈ្មោះរបស់វា ដូចជា “ SortRange ” ហើយប្រើវាជាមួយវិធីសាស្ត្រ Range.Sort ដូចជា Range(“SortRange”)
  • ប្រសិនបើអ្នកមិនប្រាកដថាតើសំណុំទិន្នន័យរបស់អ្នកមានបឋមកថាឬអត់ ឬអត់ អ្នកអាចអនុញ្ញាតឱ្យប្រព័ន្ធកំណត់វាដោយប្រើ xlGuess ប៉ារ៉ាម៉ែត្រ។

សេចក្តីសន្និដ្ឋាន

អត្ថបទនេះបង្ហាញអ្នកពីរបៀប តម្រៀបជួរឈរ ក្នុង Excel VBA ។ ខ្ញុំសង្ឃឹមថាអត្ថបទនេះមានប្រយោជន៍ច្រើនសម្រាប់អ្នក។ រីករាយក្នុងការសួរប្រសិនបើអ្នកមានសំណួរណាមួយទាក់ទងនឹងប្រធានបទ។

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