Excel бағдарламасында бағанды ​​сұрыптау үшін VBA (4 әдіс)

Hugh West

16-10-2023 Макростар & Excel VBA
  • Мұны Бөлісіңіз
Hugh West

Excel бағдарламасында VBA көмегімен сұрыптау үшін Range.Sort әдісін қолдану керек. Бұл мақалада Excel бағдарламасында VBA Range.Sort әдісімен бағанды сұрыптау жолын көрсетеміз.

Жұмыс кітабын жүктеп алу

Тегін тәжірибе Excel жұмыс кітабын осы жерден жүктеп алуға болады.

Бағанды ​​VBA.xlsm арқылы сұрыптау

Excel бағдарламасындағы Range.Sort әдісі VBA

Range.Sort әдісі VBA бағдарламасындағы мәндер ауқымын Excel бағдарламасында сұрыптайды. Мұнда Ауқым - біз өсу немесе кему реті бойынша сұрыптағыңыз келетін ұяшықтар ауқымын көрсететін нысан айнымалысы.

Төменде сізге білу қажет параметрлер берілген. туралы осы әдіспен жұмыс істеу кезінде.

Параметр Міндетті/ Қосымша Дерек түрі Сипаттамасы
Кілт Қосымша Нұсқа Мәндері ауқымды немесе бағанды ​​көрсетеді сұрыптау керек.
Тапсырыс Қосымша XlSortOrder Сұрыптау орындалатын ретті көрсетеді.
  • xlӨсу = Өсу реті бойынша сұрыптау.
  • xlКему = Кему ретімен сұрыптау.
Тақырып Қосымша XlYesNoGuess Бірінші жолда тақырыптардың бар-жоғын анықтайды .
  • xlNo = Бағанда тақырыптар болмаған кезде; Әдепкі мән.
  • xlИә = Қашанбағандарда тақырыптар бар.
  • xlGuess = Excel бағдарламасына тақырыптарды анықтауға мүмкіндік беру.

Excel бағдарламасында бағанды ​​сұрыптау үшін VBA енгізудің 4 әдістері

Бұл бөлімде сіз тақырыбы бар және жоқ бір бағанды , бірнеше бағанды ​​қалай сұрыптау керектігін білесіз. және тақырыптарсыз және Excel бағдарламасында бағандағы тақырыпты екі рет басу арқылы сұрыптау жолы.

1. Excel бағдарламасында тақырыпсыз бір бағанды ​​сұрыптау үшін VBA ендіру

Егер Excel жұмыс парағында VBA коды бар бір бағанды сұрыптағыңыз келсе, келесіні орындаңыз төмендегі қадамдар.

Бұл VBA кодымен сұрыпталатын біздің бағанымыз.

Қадамдар:

  • Пернетақтада Alt + F11 пернелерін басыңыз немесе Әзірлеуші ​​-> қойындысына өтіңіз; Visual Basic Visual Basic өңдегішін ашу үшін.

  • Қалқымалы код терезесінде мәзір жолағынан , Кірістіру -> Модуль .

  • Келесі кодты көшіріп, код терезесіне қойыңыз. 
5185

Сіздің кодыңыз енді іске қосуға дайын.

Мұнда,

  • Кілт1:=Ауқым(“B5”) → Көрсетілген B5 кодқа қай бағанды ​​сұрыптау керектігін білу үшін.
  • Order1:=xlAscending → Бағанды ​​өсу ретімен сұрыптау үшін ретті xlAscending ретінде көрсетті. Бағанды ​​кему ретімен сұрыптағыңыз келсе, оның орнына xlКему бойынша деп жазыңыз.
  • Тақырып:= xlNo →Біздің бағанымызда ешқандай тақырып жоқ, сондықтан біз оны xlNo опциямен белгіледік.

  • F5 пернесін басыңыз. пернетақтада немесе мәзір жолағынан Іске қосу -> Sub/UserForm іске қосыңыз. Сондай-ақ макросты іске қосу үшін ішкі мәзір жолағындағы кіші Ойнату белгішесін басуға болады.

Сіз өзіңіздің баған енді өсу ретімен сұрыпталған .

Бұл жерде деректер ауқымын Ауқым («B5:B15») ретінде қолмен анықтағанымызды ескеріңіз. ) .

Мәндерді қосу немесе жою арқылы деректерді өзгерткіңіз келсе, деректер жиынындағы ұяшықтар негізінде автоматты түрде жаңартылатын келесі кодты іске асыруға болады.

5436

Оның орнына назар аударыңыз диапазонды қолмен Ауқым(“B5:B15”) арқылы анықтау үшін біз Ауқым( “B5”, Ауқым(“B5”). <жаздық. 1>End(xlDown)) .

Бұл бағандағы соңғы рет толтырылған ұяшық негізінде сұрыптайды. Егер бос ұяшықтар болса, деректер тек бірінші бос ұяшыққа дейін қарастырылады.

Толығырақ оқу: Excel бағдарламасындағы кестені сұрыптау үшін VBA (4 әдіс)

2. Тақырыбы бар бір бағанды ​​сұрыптау үшін VBA макросын кірістіру

Алдыңғы бөлімде тақырыбы жоқ бір бағанның деректер жинағы болды, бірақ қазір бізде a бар. тақырыбы бар баған .

Бұл жолы оны VBA макросы арқылы сұрыптауды үйренеміз.

Қадамдар:

  • Бұрынғыдай, Visual Basic редакторын ашыңыз. Әзірлеуші қойындысынан және код терезесінде Кірістіру а Модуль .
  • Код терезесінде келесі кодты көшіріп, қойыңыз. 
4968

Сіздің кодыңыз енді іске қосуға дайын.

Міне,

  • Кілт1:=Ауым(“ B5”) → Кодқа қай бағанды ​​сұрыптау керектігін білу үшін B5 көрсетілген.
  • Red1:=xlКему → Бұл жолы біз бағанды ​​сұрыптаймыз. кему реті ретті xlКему деп көрсетті.
  • Тақырып:= xlYes → Біздің бағанымызда бұл жолы тақырып болғандықтан, оны xlYes арқылы белгіледік. опция.

  • осы кодты орындаңыз және сіз кему ретімен сұрыпталған тақырыбы бар бағанды ​​аласыз .

Толығырақ оқу: Excel бағдарламасында VBA көмегімен тізім терезесін сұрыптау жолы (толық нұсқаулық)

Ұқсас оқулар:

  • Excel бағдарламасында IP мекенжайын сұрыптау әдісі (6 әдіс)
  • [Шешілді!] Excel сұрыптауы жұмыс істемейді (2 шешім)
  • Excel бағдарламасында сұрыптау түймесін қалай қосуға болады (7 әдіс)
  • Сұрыптау диапазоны e Excel бағдарламасында VBA пайдалану (6 мысал)
  • Excel бағдарламасында атау бойынша сұрыптау әдісі (3 мысал)

3. Тақырыбы бар немесе жоқ бірнеше бағандарды сұрыптауға арналған VBA макросы

Сонымен қатар деректер жиынындағы бірнеше бағандарды VBA кодымен сұрыптауға болады.

Қадамдар:

  • Алдында көрсетілгендей, Әзірлеуші қойындысынан Visual Basic редакторын ашыңыз және Кірістіру a Модуль код терезесінде.
  • Код терезесінде келесі кодты көшіріп, қойыңыз. 
5542

Сіздің кодыңыз енді іске қосуға дайын.

Мұнда,

.SortFields.Add Key:=Ауым(“B4”), Рет:=xlӨсу

.SortFields.Add Key:=Ауқым(“C4” ”, Order:=xlAscending

Осы екі жол арқылы біз байланыстырылған екі бағанды ​​сұрыптау үшін B4 және C4 ұяшығын анықтаймыз. оларды өсу ретімен .

Деректер жиынында тақырыптар болғандықтан, біз Тақырып = xlYes белгіледік, әйтпесе Тақырып = деп жазар едік. xlNo код ішінде.

  • осы кодты іске қосыңыз және сіз өсу ретімен сұрыпталған тақырыбы бар бағандарды аласыз. .

4. Excel бағдарламасындағы тақырыпты екі рет басу арқылы деректерді сұрыптау үшін макрос

Егер деректерді тақырыпты екі рет басу арқылы оңай сұрыптағыңыз келсе, мұны <арқылы орындауға болады. 1>VBA коды.

Қадамдар:

  • парақ қойындысында тінтуірдің оң жақ түймешігімен басыңыз .
  • Пайда болған опциялар тізімінен View Code түймесін басыңыз.
  • Код терезесі пайда болады, келесі кодты көшіріп, оны сол жерге қойыңыз. 
7160
  • Сақтау код.

  • Енді қызықтыратын жұмыс парағына оралыңыз және егер сіз тақырыптарды екі рет басыңыз бағандар қайта реттеліп жатқанын көресіз.

Толығырақ: Деректерді сұрыптау және сүзу жолы Excel (толық нұсқаулық)

Есте сақтау керек нәрселер

  • Аталған ауқымды жасауға және оның орнына ұяшық сілтемелерінің ауқымын ішіне өткізген кезде пайдалануға болады. Sort әдісі. Мысалы, A1:A10 ауқымын сұрыптағыңыз келсе, оны код ішінде әр уақытта берудің орнына, оның « SortRange<40» сияқты атаулы ауқымын жасауға болады> ” таңдаңыз және оны Range(“SortRange”) сияқты Range.Sort әдісімен пайдаланыңыз.
  • Деректер жиыныңызда тақырыптар бар-жоғын білмесеңіз Жүйеге оны xlGuess параметрін пайдалану арқылы анықтауға рұқсат бере аласыз.

Қорытынды

Бұл мақала сізге қалай істеу керектігін көрсетті. бағанды ​​ Excel VBA бағдарламасында сұрыптаңыз. Бұл мақала сізге өте пайдалы болды деп үміттенемін. Тақырыпқа қатысты сұрақтарыңыз болса, қоя аласыз.

Алдыңғы пост Excel бағдарламасында қисық астындағы ауданды қалай есептеу керек (2 қолайлы әдіс)
Келесі пост Формула арқылы Excel бағдарламасында бірінші орта және фамилияны қалай бөлуге болады

Хью Уэст – салада 10 жылдан астам тәжірибесі бар жоғары тәжірибелі Excel тренері және талдаушысы. «Бухгалтерлік есеп және қаржы» мамандығы бойынша бакалавр дәрежесі және іскерлік әкімшілендіру магистрі дәрежесі бар. Хью оқытуға құмар және ұстануға және түсінуге оңай бірегей оқыту әдісін әзірледі. Оның Excel бағдарламасындағы сараптамалық білімі бүкіл әлем бойынша мыңдаған студенттер мен мамандарға біліктіліктерін арттыруға және мансаптық жетістіктерге жетуге көмектесті. Блогы арқылы Хью өз білімін әлеммен бөліседі, жеке адамдар мен бизнеске толық әлеуетін ашуға көмектесу үшін тегін Excel оқулықтары мен онлайн тренингтерін ұсынады.