Urutkan Range Excel pada Double-Click - dummies

Saat Anda mendistribusikan laporan Excel ke pelanggan Anda, sering kali bagus untuk menambahkan beberapa lonceng dan peluit. Salah satu perangkat tambahan yang lebih mudah diterapkan adalah kemampuan untuk menyortir saat tajuk kolom diklik dua kali. Meski kedengarannya rumit, ini relatif mudah dengan makro ini.

Anda dapat mendownload contoh kerja teknik klik ganda ini di Excel.

Bagaimana makro bekerja

Dalam makro ini, pertama-tama Anda menemukan baris terakhir yang tidak kosong. Anda kemudian menggunakan nomor baris tersebut untuk menentukan rentang target baris yang perlu Anda urut. Dengan menggunakan metode Sortir, Anda mengurutkan baris target berdasarkan kolom yang Anda klik dua kali.

Private Sub Worksheet_BeforeDoubleClick (ByVal Target As Range, Cancel As Boolean) 'Langkah 1: Deklarasikan Variabel Anda Dim LastRow As Long' Langkah 2: Temukan baris terakhir yang tidak kosong LastRow = Sel (Baris., 1). Akhir (xlUp). Baris 'Langkah 3: Urutkan naik pada baris kolom klik ganda ("6:" & LastRow). Sort_ Key1: = Sel (6, ActiveCell. Column), _ Order1: = xlAscending End Sub

Pada Langkah 1, Anda mendeklarasikan variabel Long Integer yang disebut LastRow untuk menahan nomor baris terakhir yang tidak kosong.

Pada Langkah 2, Anda menangkap baris terakhir yang tidak kosong dengan memulai pada baris terakhir di lembar kerja dan menggunakan properti Akhir untuk melompat ke sel nonempty pertama (setara dengan pergi ke sel A1048576 dan menekan Ctrl + Shift + panah atas).

Perhatikan bahwa Anda perlu mengubah nomor kolom di sel ini menjadi satu yang sesuai untuk kumpulan data Anda. Misalnya, jika tabel Anda dimulai pada Kolom J, Anda perlu mengubah pernyataan pada langkah 2 ke Sel (Baris. Hitung, 10). Akhir (xlUp). Baris karena kolom J adalah kolom ke 10 di lembar kerja.

Pada Langkah 3, Anda menentukan rentang baris total untuk data Anda. Ingatlah bahwa rentang baris harus dimulai dengan baris data pertama (tidak termasuk header) dan diakhiri dengan baris terakhir yang tidak kosong. Dalam kasus ini, kumpulan data Anda dimulai pada baris 6, jadi Anda menggunakan metode Sortir pada Baris ("6:" & LastRow).

Argumen Kunci memberitahu Excel yang bisa dipilah-pilah. Sekali lagi, Anda akan ingin memastikan bahwa rentang yang Anda gunakan dimulai dengan baris data pertama (tidak termasuk tajuk).

Cara menggunakan makro

Untuk menerapkan makro ini, Anda perlu menyalin dan menempelkannya di jendela kode acara Worksheet_BeforeDoubleClick. Menempatkan makro di sini memungkinkannya berjalan setiap kali Anda mengklik dua kali lembar tersebut:

1. Aktifkan Editor Visual Basic dengan menekan ALT + F11.

2. Di jendela Proyek, temukan nama proyek / buku kerja Anda dan klik tanda plus di sebelahnya untuk melihat semua lembar.

3. Klik lembar dimana Anda ingin memicu kode.

4. Di kotak drop-down Acara, pilih acara BeforeDoubleClick.

5. Ketik atau tempelkan kode.