Julat Susun Excel VBA
Menyusun julat dalam VBA dilakukan dengan kaedah range.sort, ini adalah sifat kaedah julat dengan mana pengguna dapat menyusun julat mengikut urutan, argumen untuk fungsi ini adalah Key1, Order1, Key2, Type, Order2, Key3 , Order3, Header, OrderCustom, MatchCase, Orientation, SortMethod, DataOption1, DataOption2, DataOption3, semua argumen untuk fungsi ini adalah pilihan.
Sebagai sebahagian daripada penyusunan data atau penataan data, penting untuk menyusun data dan membuatnya tersusun. Perkara serupa juga terdapat di VBA, jadi soalan umum mengenai pelajar baru VBA adalah bagaimana kita dapat menggunakan pilihan semacam ini sebagai sebahagian daripada automasi VBA, dan artikel ini membimbing anda melalui rangkaian Urutan VBA secara terperinci.
Dengan cemerlang, kita semua biasa dengan pilihan jenis yang tersedia di bawah tab DATA.
Isih Pilihan di VBA
Untuk menggunakan pilihan pengurutan, pertama, kita harus memutuskan apa julat data kita dan menyebut rentang data yang sama dengan menggunakan objek RANGE di VBA, maka hanya kita yang dapat mengakses pilihan "Urutkan" di VBA. Sebagai contoh, anggap julat data saya dari A1 hingga D10, maka kami dapat memberikan julat data seperti berikut.
Kod:
Sub Susun_Rentang_Contoh () Julat ("A1: D10") Sub Akhir
Sekarang letakkan titik dan pilih kaedah "SORT".
Kod:
Sub Sort_Range_Contoh () Julat ("A1: D10"). Susun Sub Sub
Di bawah ini adalah sintaks kaedah Jangkauan. Walaupun sintaks mempunyai argumen yang berbeza, kami tidak memerlukan semuanya untuk pengekodan VBA kami, jadi kami hanya memerlukan beberapa elemen.
(Kunci1): Dalam julat data yang kami urutkan , kami perlu menentukan lajur mana yang perlu kami urutkan . Sebagai contoh, dalam julat data A1: D10, jika kita ingin menyusun data berdasarkan lajur B, maka (Kunci1) akan menjadi Rentang (“B1”) .
(Urutan1): Kolom yang disebutkan dalam argumen (Key1) harus disusun mengikut urutan apa. Kita boleh memilih dua pilihan di sini "xlAscending" atau "xlDescending."
Header: Julat data yang disebutkan mempunyai header atau tidak. Sekiranya ya, kami dapat membekalkan "xlYa" atau yang lain kami dapat membekalkan "xlNo."
Contoh Jangkauan Susun dalam VBA
Mari kita ambil contoh rangkaian jenis VBA excel untuk memahami perkara ini dengan lebih baik.
Contohnya, lihat struktur data di bawah.
Kami mempunyai data dari A1 hingga E17, jadi pertama, kami akan menyusun data berdasarkan "Country-bijaksana." Ikuti langkah-langkah di bawah untuk menulis kod untuk menyusun data.
Langkah 1: Mulakan prosedur makro excel.
Kod:
Sub Susun_Rentang_Contoh () Akhir Sub
Langkah 2: Pertama, sebutkan julat data dengan menggunakan objek RANGE .
Kod:
Sub Susun_Rentang_Contoh () Julat ("A1: E17") Sub Akhir
Langkah 3: Sekarang pilih kaedah " Urutkan " objek Range.
Kod:
Sub Sort_Range_Contoh () Julat ("A1: E17"). Susun Akhir Sub
Langkah 4: Oleh kerana kami menyusun data berdasarkan "Country-bijaksana", lajur argumen Kunci 1 kami adalah Range ("B1").
Kod:
Sub Susun_Rentang_Contoh () Julat ("A1: E17"). Kekunci Urut1: = Julat ("B1"), Sub Akhir
Langkah 5: Setelah kolom yang diperlukan disebutkan, kita perlu menyebutkan urutan apa yang kita perlukan untuk menyusun data, dan "Order1" akan menjadi urutan "xlAscending" .
Kod:
Sub Susun_Rentang_Contoh () Julat ("A1: E17"). Kekunci Urut1: = Julat ("B1"), Urutan1: = xlMenaik, Sub Akhir
Langkah 6: Data kami mempunyai tajuk, jadi Header akan menjadi "xlYa."
Kod:
Sub Sort_Range_Example () Range ("A1: E17"). Sort Key1: = Range ("B1"), Order1: = xlAscending, Header: = xlYa Sub Akhir
We have mentioned all the elements which are required to sort the data. Execute the code by pressing the F5 function and key and see the result.
Output:
Data has been sorted based on Country names in the order of A to Z.
Now assume we need to sort the data based on Country-wise also we need to sort the “Gross Sales” from highest to lowest. In such cases, we need to make use of Key2 and Order2 arguments as well.
After mentioning Key1 & Order1, let’s choose Key2.
Code:
Sub Sort_Range_Example() Range("A1:E17").Sort Key1:=Range("B1"), Order1:=xlAscending,Key2:= End Sub
Since we are sorting the data based on the “Gross Sales” column, our Key2 column name will be Range(“D1”).
Code:
Sub Sort_Range_Example() Range("A1:E17").Sort Key1:=Range("B1"), Order1:=xlAscending,Key2:=Range("D1"), End Sub
Once the Key2 is specified, we need to decide on the sorting patter of whether it is ascending order or descending order in Order2 argument. Since we are sorting the sales value from largest to smallest, we can choose “xlDescending” order.
Code:
Sub Sort_Range_Example() Range("A1:E17").Sort Key1:=Range("B1"), Order1:=xlAscending, Key2:=Range("D1"), Order2:=xlDescending, Header:=xlYes End Sub
After that, mention the Header argument as “xlYes.” Now run the code and see what happens.
Output:
Previously it has sorted based only on “Country-wise” but this time it has sorted based on “Country-wise” first and then also on “Gross Sales” from highest to lowest.
Seperti ini, kita boleh menggunakan " Jenis " kaedah dalam VBA untuk menganjurkan data.
Perkara yang Perlu diingat mengenai Julat Urutan Excel VBA
- Urutan adalah kaedah yang terdapat di VBA, dan untuk mengakses kaedah ini, kita perlu menentukan julat sel yang akan kita urutkan.
- Sekiranya rentang data termasuk header, maka kita harus memilih opsi header sebagai "xlYa", jika tidak, kita dapat memilih "xlNo."
