VBA для сартавання табліцы ў Excel (4 метады)

Hugh West

18-06-2023 Макрасы & Excel VBA
  • Падзяліцца Гэтым
Hugh West

Укараненне макраса VBA з'яўляецца найбольш эфектыўным, хуткім і бяспечным метадам выканання любой аперацыі ў Excel. У гэтым артыкуле мы пакажам вам, як сартаваць табліцу ў Excel з дапамогай VBA .

Спампаваць кнігу

Вы можаце спампаваць бясплатную практычную кнігу Excel адсюль.

Сартаваць табліцу з VBA.xlsm

Што трэба ведаць перад укараненнем VBA каб сартаваць табліцу ў Excel

Ёсць некаторыя параметры, якія вам трэба часта выкарыстоўваць падчас працы з метадам Сартаваць VBA . Такім чынам, тут мы абмяркуем некаторыя параметры, каб вы пазнаёміліся падчас напісання кода.

Параметр Абавязковы/ Дадатковы Тып даных Апісанне
Ключ Дадаткова Варыянт Вызначае дыяпазон або слупок, значэнні якога трэба сартаваць.
Парадак Неабавязкова XlSortOrder Вызначае парадак, у якім будзе выконвацца сартаванне.
  • xlAscending = Для сартавання ў парадку ўзрастання.
  • xlDescending = Для сартавання ў парадку змяншэння.
Загаловак Неабавязкова XlYesNoGuess Вызначае, змяшчае першы радок загалоўкі ці не .
  • xlNo = Калі слупок не мае загалоўкаў; Значэнне па змаўчанні.
  • xlYes = Калі слупкі маюць загалоўкі.
  • xlGuess = Каб дазволіць Excelвызначыць загалоўкі.

4 метады ўкаранення VBA для сартавання табліцы ў Excel

У гэтым раздзеле будзе пакажа вам, як сартаваць табліцы Excel з улікам значэння, колераў, значкоў і некалькіх слупкоў з кодам VBA .

1. Убудаваць VBA для сартавання табліцы па значэнні ў Excel

Разглядаючы наступны прыклад, мы будзем сартаваць гэту табліцу па значэннях , якія прысутнічаюць у Марк слупок у парадку змяншэння.

Крокі:

  • Націсніце Alt + F11 на клавіятуры або перайдзіце на ўкладку Распрацоўшчык -> Visual Basic , каб адкрыць Рэдактар ​​Visual Basic .

  • Ва ўсплывальным акне кода з радка меню , націсніце Уставіць -> Модуль .

  • Скапіруйце наступны код і ўстаўце яго ў акно кода. 
9734

Ваш код цяпер гатовы да запуску.

Тут,

  • SortTBL → Пазначце назву табліцы.
  • СартавацьTBL[Маркі] -> Вызначыў імя слупка табліцы для сартавання.
  • Key1:=iColumn → Вызначыў дыяпазон слупкоў, каб код ведаў, які слупок у табліцы сартаваць.
  • Order1:=xlDescending → Вызначыў парадак як xlDescending для сартавання слупка ў парадку змяншэння. Калі вы хочаце адсартаваць слупок у парадку ўзрастання, напішыце xlAscending замест гэтага.
  • Загаловак:= xlYes → Паколькі слупок у гэтай табліцы маезагаловак, таму мы ўказалі яго з дапамогай опцыі xlYes .

  • Націсніце F5 на клавіятуры або з у радку меню абярыце Выканаць -> Запусціце Sub/UserForm . Вы таксама можаце проста націснуць на маленькі значок Play у радку падменю, каб запусціць макрас.

Вы ўбачыце, што слупок у вашай табліцы цяпер адсартаваны ў парадку змяншэння .

Дадатковая інфармацыя: Як сартаваць даныя па значэнні ў Excel (5 простых метадаў )

2. Устаўце макрас VBA для сартавання табліцы па некалькіх слупках

Вы таксама можаце сартаваць табліцу па некалькіх слупках у Excel з дапамогай макраса VBA .

З прыведзенай вышэй табліцы мы адсартуем слупкі Імя і Аддзел у парадку ўзрастання .

Крокі:

  • Такім жа чынам адкрыйце Рэдактар ​​Visual Basic з укладкі Распрацоўшчык і Устаўце Модуль у акне кода.
  • У акне кода скапіруйце наступны код і ўстаўце яго. 
8939

Ваш зараз код гатовы да выканання.

Тут,

  • TableValue → Пазначце назву табліцы.
  • Значэнне табліцы[Імя] -> Вызначана імя першага слупка табліцы для сартавання.
  • TableValue[Department] -> Указана назва другога слупка табліцы для сартавання.
  • Key1:=iColumn1 → Указаны дыяпазон слупкоў, каб код ведаў, што першы слупок у табліцы павінен быцьадсартавана.
  • Key1:=iColumn2 → Вызначаны дыяпазон слупкоў, каб код ведаў, што другі слупок у табліцы трэба адсартаваць.
  • Парадак1: =xlAscending → Вызначыў парадак як xlAscending для сартавання слупка ў парадку змяншэння. Калі вы хочаце адсартаваць слупок у парадку змяншэння, напішыце замест гэтага xlDescending .
  • Загаловак:= xlYes → Паколькі слупкі гэтай табліцы маюць загалоўкі, таму мы ўказалі яго з опцыяй xlYes .

  • Запусціце гэты код, і вы атрымаеце абодва слупкі табліцы адсартаваныя ў парадку ўзрастання.

Дадатковая інфармацыя: Як аўтаматычна сартаваць некалькі слупкоў у Excel (3 спосабы)

Падобныя чытанні

  • Як сартаваць унікальны спіс у Excel (10 карысных метадаў)
  • Сартаванне масіва з дапамогай Excel VBA (як па ўзрастанні, так і па змяншэнні)
  • Як сартаваць і фільтраваць даныя ў Excel (поўнае кіраўніцтва)
  • Аўтаматычнае сартаванне Excel пры змене даных (9 прыкладаў)
  • Выпадковае сартаванне ў Excel (формулы + VBA)

3. Рэалізуйце макрас для сартавання табліцы па колеры ячэйкі ў Excel

Вы таксама можаце сартаваць табліцу ў адпаведнасці з колерам ячэйкі , які яна змяшчае.

На прыведзенай вышэй табліцы ў якасці прыкладу мы пакажам вам, як сартаваць яе на аснове колераў, якія змяшчае гэтая табліца.

Крокі:

  • Як было паказана раней, адкрыйце Visual BasicРэдактар з укладкі Распрацоўшчык і Устаўце Модуль у акне кода.
  • У акне кода скапіруйце наступны код і ўстаўце яго. 
6306

Ваш код гатовы да запуску.

Вось коды RGB , якія мы далі , вы можаце знайсці яго ці любы іншы код RGB , які вам патрэбны, прытрымліваючыся gif-файла, прыведзенага ніжэй.

  • Проста націсніце на каляровую ячэйку .
  • На ўкладцы Галоўная націсніце на стрэлку побач з Колер залівання , затым выберыце Іншыя колеры . Вы ўбачыце коды RGB ва ўкладцы Карыстальніцкія ўсплывальнага акна Колеры , якое з'явілася.

  • Запусціце гэты код, і ваша табліца будзе адсартаваная па колерах .

Дадатковая інфармацыя: Як сартаваць па колеры ў Excel (4 крытэрыі)

4. Ужывайце VBA для сартавання табліцы Excel па значку

Выкажам здагадку, што табліца з наборам даных мае значкі для лепшай чытальнасці. Вы можаце сартаваць табліцу на аснове значкоў у Excel з дапамогай макраса VBA .

Паглядзіце на прыведзены вышэй набор даных. Тут табліца мае значкі побач з лікавымі значэннямі ў слупках Адзнакі , каб мы маглі зразумець, у якога вучня добрыя, дрэнныя або сярэднія вынікі.

Звярніце ўвагу, што, калі вы не ведаеце, як можна ўставіць значок у ячэйку, вы можаце проста зрабіць гэта з дапамогай функцыі Умоўнае фарматаванне ў Excel.

  • Выбраць ўвесь дыяпазон абослупок.
  • Перайсці да Умоўнае фарматаванне -> Наборы значкоў . Затым выберыце любы набор значкоў, які вам патрэбны.

Крокі для сартавання табліцы на аснове значкоў прыведзены ніжэй.

Крокі:

  • Адкрыйце Рэдактар ​​Visual Basic з укладкі Распрацоўшчык і Устаўце Модуль у акне кода.
  • У акне кода скапіруйце наступны код і ўстаўце яго. 
9972

Цяпер ваш код гатовы да выканання.

Тут,

  • xl5Arrows -> Мы выбралі набор з 5 стрэлак з опцыі ў Умоўным фарматаванні .
  • Элемент (1) -> Вызначаны першы тып значка стрэлкі.
  • Элемент (2) -> Вызначаны другі тып значка стрэлкі.
  • Элемент (3) -> Вызначаны трэці тып значка стрэлкі.
  • Элемент (4) -> Вызначаны чацвёрты тып значка стрэлкі.
  • Элемент (5) -> Вызначаны пяты тып значка стрэлкі.

  • Запусціце гэты код, і табліца будзе адсартавана на аснове значкоў .

Дадатковая інфармацыя: Як аўтаматычна сартаваць табліцу ў Excel (5 метадаў)

Выснова

Гэты артыкул паказаў, як сартаваць табліцу ў Excel VBA . Я спадзяюся, што гэты артыкул быў для вас вельмі карысным. Не саромейцеся пытацца, калі ў вас ёсць якія-небудзь пытанні па тэме.

Папярэдняя публікацыя Як скапіяваць і ўставіць без змены фармату ў Excel
Наступны пост Як знайсці крытычнае значэнне ў Excel (2 карысныя метады)

Х'ю Уэст з'яўляецца вельмі дасведчаным трэнерам і аналітыкам Excel з больш чым 10-гадовым вопытам работы ў галіны. Ён мае ступень бакалаўра ў галіне бухгалтарскага ўліку і фінансаў і ступень магістра дзелавога адміністравання. Х'ю захапляецца навучаннем і распрацаваў унікальны падыход да навучання, які лёгка прытрымлівацца і зразумець. Яго экспертныя веды Excel дапамаглі тысячам студэнтаў і спецыялістаў па ўсім свеце палепшыць свае навыкі і атрымаць поспех у сваёй кар'еры. Праз свой блог Х'ю дзеліцца сваімі ведамі з усім светам, прапаноўваючы бясплатныя падручнікі па Excel і онлайн-трэнінгі, каб дапамагчы прыватным асобам і прадпрыемствам цалкам раскрыць свой патэнцыял.