Pam ingin mengatur tab lembar kerjanya menurut abjad. Ini bukan perintah di Excel, tetapi menggunakan makro pendek, Anda bisa menambahkannya ke Bilah Alat Akses Cepat.
Menonton video
- Pam ingin mengurutkan tab lembar kerja menurut abjad
- Akan menggunakan makro di buku kerja makro pribadi
- Alt + T + M + S dan ubah keamanan makro untuk mengizinkan makro
- Rekam makro Hello World ke dalam buku kerja makro pribadi
- Ketikkan kode baru ke dalam Personal Macro Workbook
- Tetapkan kode itu ke tombol QAT
Transkrip Video
Belajar Excel dari Podcast, Episode 2084: Mengurutkan Tab Lembar Kerja Menurut Abjad
Hai, selamat datang kembali di netcast, saya Bill Jelen. Pertanyaan hari ini dari Pam: Apakah ada cara untuk menyusun tab lembar kerja menurut abjad? Tidak ada cara built-in untuk melakukan itu tapi kita bisa melakukannya dengan makro. Dan sekarang, ini adalah Makro yang seharusnya ada di buku kerja makro pribadi, oke? Jadi, jika Anda belum pernah melakukan makro sebelumnya, kami akan melakukan Alt + T untuk Tom dan untuk Mary, S untuk Sam. Dan pastikan, Anda berpindah dari Nonaktifkan semua makro tanpa pemberitahuan ke Nonaktifkan makro dengan pemberitahuan.
Baiklah, tekan Alt + F8 dan lihat dan lihat apakah Anda memiliki makro, pastikan untuk memilih makro di: Semua Buku Kerja Terbuka. Jika Anda tidak memiliki apa pun yang dimulai sebagai PERSONAL.XLSB, Anda perlu melakukan langkah opsional ini. Jika Anda sudah memiliki sesuatu dengan PERSONAL.XLSB maka tunggu sebentar, oke?
Jadi, kita akan pergi ke tab View dan kita akan ke Record a New Macro. Ini akan disebut HelloWorld. Tidak ada ruang, tidak ada ruang. Dan kami akan menyimpan makro di Buku Kerja Makro Pribadi, klik OK. Dan ketikkan saja Hello World, seperti itu, lalu turun ke sini di sebelah Siap dan klik Berhenti. Baiklah, sekarang itu akan memaksa Anda untuk memiliki Buku Kerja Makro Pribadi. Baiklah, jika Anda belum pernah menggunakan makro sebelumnya, Anda mungkin tidak memilikinya.
Pada titik ini, kita akan menekan Alt + F11 dan jika Anda belum pernah menggunakan makro, Anda akan mendapatkan layar abu-abu ini di sini. Kami akan pergi ke View, Project Explorer dan kami akan menemukan PERSONAL.XLSB baru. Jika Anda sudah memiliki Modul di sana yang tentu saja Anda akan, tentu ya, buka modul dan klik dua kali Modul 1. Sekarang, saya sudah memiliki beberapa makro di Buku Kerja Makro Pribadi saya tetapi saya akan langsung ke sini untuk baris terakhir, masukkan beberapa spasi.
Baiklah, jadi Anda akan mengetik kode yang saya tempel ini. Dan kita akan membicarakan tentang makro ini saat saya menjalankannya. Jadi, saya akan menjalankannya satu per satu dengan menekan tombol F8. Dan satu hal yang saya pelajari di sini adalah setelah menyelesaikan pengurutan, agak membingungkan untuk berakhir di lembar yang berbeda, jadi saya ingat di lembar mana kita berada, jadi nanti, saya bisa memilihnya tepat sebelum makro selesai.
Oke sekarang, ini dia. Mari kembali ke Excel dan Anda akan melihat bahwa lembar pertama di sana disebut Judul. Kami saat ini berada di lembar yang disebut Pertanyaan. Saya ingin menambahkan lembar baru sebelum Judul, jadi kami mengerjakan Lembar Kerja. Tambahkan dan kemudian saya ingin mengganti namanya. Saat ini hadir dalam Sheet1 sebagai TempSortSheet. Hati-hati, ini harus menjadi nama yang tidak akan pernah Anda gunakan. Seperti, jangan sebut Laporan Pendapatan ini, oke? Cukup gunakan sesuatu yang sangat acak jadi ketika kami- Anda akan mengalami kesalahan jika Anda sudah memiliki lembar bernama TempSortSheet. Dan kemudian yang saya temukan adalah bahwa saya menggunakan Worksheet.Count ini berulang kali, jadi saya hanya akan memasukkannya ke dalam variabel yang lebih mudah dikatakan WSC daripada Worksheets.Count nanti. Jadi kami memiliki 150 lembar kerja dan kami memiliki daftar dari lembar kerja itu.
Baiklah, jadi Anda pertama kali melalui loop di mana saya pergi dari 1 ke 250. Pada pertama kalinya melalui loop ke lembar baru kami yang kami tambahkan, TempSortSheet, di Baris 1 Kolom 1, kami akan pergi untuk meletakkan Nilai itu = ke Lembar Kerja pertama. Baiklah, dan yang seharusnya baik-baik saja, yup, TempSortSheet di sana. Tapi saya akan membiarkan ini berjalan beberapa kali lagi. Saya akan menekan F8 dan Anda akan melihat bahwa kita mendapatkan semua tab lembar dalam urutan yang muncul di buku kerja, dan menganggap saya mulai mendapatkan tab yang memiliki nomor akun, oke. Dan saya akan membiarkan ini berjalan, saya tidak ingin menekan F8 300 kali. Jadi, saya akan klik di sini dan pergi ke Debug, Run To Cursor yaitu Ctrl + F8 yang akan menyelesaikannya. Dan lihat kami memiliki daftar semua tab 150 lembar.Itu luar biasa.
Dan sekarang di sinilah kami memanfaatkan kekuatan Excel. Ada banyak postingan online termasuk di papan pesan, tempat mereka mencoba dan menyortirnya. Mereka menulis jenis mereka sendiri untuk memindahkan lembaran dan kami akan memanfaatkan Excel di sini karena Excel memiliki semacam dan saya menggunakan kode dari Excel 2003. Saya suka kode ini, lebih mudah diingat. Saya akan mulai di A1, Ubah ukurannya menjadi 150 sel tempat saya Menyortirnya. Kuncinya adalah A1. Nah, hanya itu yang bisa terjadi. Urutan akan Naik, dan pastikan untuk menentukan bahwa ada Header, oke? Kami tidak ingin TempSortSheet kami memilah-milah data. Baiklah, langsung saja. BAM! Itu melakukan pengurutan dan kita tidak perlu menulis di sekitar kode pengurutan gelembung. Lalu kita akan pergi dari Baris 2 yaitu A120,sheet yang akan dipindahkan adalah A120. Mengapa " " ? Ahh, jika Anda memiliki nama sheet, seperti yang kami miliki awal minggu ini, seperti sheet bernama 123 yang akan membingungkan Excel. Lalu, kemana kita akan memindahkannya? Kami tidak akan pindah ke Baris 2 tetapi setelah lembar pertama. Jadi MoveAfter menjadi 1. Jadi, kita akan mengambil sheet yang disebut A120 dan memindahkannya setelah sheet pertama seperti itu, F8, dan di sana berhasil. Jalankan ketiga baris itu sekali lagi. A124 datang ke tempat yang tepat.kembali akan mengambil lembar kami yang disebut A120 dan memindahkannya setelah lembar pertama seperti itu, F8, dan di sana berhasil. Jalankan ketiga baris itu sekali lagi. A124 datang ke tempat yang tepat.kembali akan mengambil lembar kami yang disebut A120 dan memindahkannya setelah lembar pertama seperti itu, F8, dan di sana berhasil. Jalankan ketiga baris itu sekali lagi. A124 datang ke tempat yang tepat.
Pada titik ini, sekarang kita tahu itu berfungsi, kita bisa melakukan Ctrl + F8 yang melakukan semua gerakan - 150 gerakan baru saja terjadi di sana. Dan sekarang, saya akan menghapus lembar asli yang merupakan TempSortSheet kami yang telah dihapus. Tetapi sebelum saya menghapusnya, saya tidak ingin mereka memberi tahu siapa pun yang menjalankan kode bahwa kami akan menghapus sheet. Jadi, saya hapus saja lalu pilih lembar asli dan muncul pesan bahwa buku kerja telah diurutkan seperti itu.
Oke, jadi sekarang setelah kami memiliki makro, kami tahu makro berfungsi dan ada di buku kerja makro pribadi, beberapa hal yang ingin kami lakukan: Alt + F11 kembali ke sini dan pastikan Anda berada di makro pribadi buku kerja, klik di sana dan klik Simpan. Jika Anda tidak menyimpannya sekarang, nanti saat Anda menutup Excel, pesan ini akan memunculkan pesan tentang 'Apakah Anda ingin menyimpan perubahan ke PERSONAL.XLSB?' dan Anda akan benar-benar lupa dan tidak menyimpan perubahannya, bukan? Jadi saya selalu memastikan untuk menyimpan perubahan dan kemudian Alt + Tab tempat saya Menyesuaikan Bilah Alat Akses Cepat, pilih dari Makro, temukan yang disebut Lembar Pengurutan, tambahkan ke Bilah Alat Akses Cepat. Saya tidak suka diagram alur jadi kita akan mencari sesuatu yang mengatakan A sampai Z atau Anda tahu, jadi biarkan 's gunakan yang ini dan taruh tab kecil di sana dari Sort Sheets seperti itu, klik OK, klik OK.
Baiklah, sekarang ini tesnya. Saya akan memasukkan buku kerja baru. Saya akan membuat beberapa salinan dari lembaran dan kami akan menaruhnya dalam urutan yang aneh, Z dan kemudian Y dan kemudian M dan kemudian B, seperti itu. Klik Sortir Lembar dan BAM! Mereka kembali ke sini dalam urutan yang benar. Betapa kerennya itu.
Oke, jadi episode hari ini, Pam mau mengurutkan tab lembar kerja menurut abjad. Wow! Kami menggunakan makro. Pertama, ubah keamanan makro dan rekam makro Hello World ke dalam buku kerja makro pribadi, lalu ketikkan kode di Buku Kerja Makro Pribadi dan tetapkan ke tombol Bilah Alat Akses Cepat.
Saya ingin berterima kasih kepada Pam atas pertanyaan itu. Saya ingin mengucapkan terima kasih telah mampir. Sampai jumpa di lain waktu untuk netcast lain dari.
Unduh berkas
Unduh file contoh di sini: Podcast2084.xlsm
