Jika Anda memiliki buku kerja Excel yang memiliki ratusan lembar kerja, dan sekarang Anda ingin mendapatkan daftar semua nama lembar kerja, Anda bisa merujuk ke artikel ini. Di sini kami akan membagikan 3 metode sederhana dengan Anda.
Terkadang, Anda mungkin diminta untuk membuat daftar semua nama lembar kerja di buku kerja Excel. Jika hanya ada beberapa lembar, Anda dapat menggunakan Metode 1 untuk membuat daftar nama lembar secara manual. Namun, jika buku kerja Excel berisi banyak lembar kerja, Anda sebaiknya menggunakan 2 metode terakhir, yang jauh lebih efisien.
Metode 1: Dapatkan Daftar Secara Manual
- Pertama, buka buku kerja Excel tertentu.
- Kemudian, klik dua kali pada nama sheet di daftar sheet di bagian bawah.
- Selanjutnya, tekan "Ctrl + C" untuk menyalin nama.
- Nanti, buat file teks.
- Kemudian, tekan "Ctrl + V" untuk menempelkan nama sheet.
- Sekarang, dengan cara ini, Anda dapat menyalin nama setiap lembar ke file teks satu per satu.
Metode 2: Daftar dengan Formula
- Pertama-tama, buka tab "Rumus" dan klik tombol "Manajer Nama".
- Selanjutnya, di jendela popup, klik "Baru".
- Di kotak dialog berikutnya, masukkan "ListSheets" di kolom "Name".
- Kemudian, di kolom "Merujuk ke", masukkan rumus berikut:
= REPLACE (GET.WORKBOOK (1), 1, FIND ("]", GET.WORKBOOK (1)), "")
- Setelah itu, klik "OK" dan "Close" untuk menyimpan rumus ini.
- Selanjutnya, buat lembar kerja baru di buku kerja saat ini.
- Lalu, masukkan "1" di Sel A1 dan "2" di Sel A2.
- Setelah itu, pilih dua sel dan seret ke bawah untuk memasukkan 2,3,4,5, dll. Di Kolom A.
- Nanti, letakkan rumus berikut di Cell B1.
= INDEX (ListSheets, A1)
- Sekaligus, nama sheet pertama akan dimasukkan di Cell B1.
- Terakhir, cukup salin rumus ke bawah sampai Anda melihat pesan "#REF!" kesalahan.
Metode 3: Daftar melalui Excel VBA
- Untuk sebagaitart, picu editor VBA Excel sesuai dengan "Cara Menjalankan Kode VBA di Excel Anda".
- Kemudian, masukkan kode berikut ke dalam modul atau proyek.
Sub ListSheetNamesInNewWorkbook () Redupkan objNewWorkbook Sebagai Buku Kerja Dim objNewWorksheet Sebagai Lembar Kerja Set objNewWorkbook = Excel.Application.Workbooks.Add Set objNewWorksheet = objNewWorkbook.Sheets (1) Untuk i = 1 Ke ThisWorkbook.Sheets.Count objNew, 1Cells) = (i i objNewWorksheet.Cells (i, 2) = ThisWorkbook.Sheets (i) .Name Berikutnya i Dengan objNewWorksheet .Rows (1) .Sisipkan .Cells (1, 1) = "INDEX" .Cells (1, 1) .Font. Bold = True .Cells (1, 2) = "NAME" .Cells (1, 2) .Font.Bold = True .Columns ("A: B"). AutoFit Berakhir Dengan End Sub
- Nanti, tekan "F5" untuk menjalankan makro ini sekarang.
- Sekaligus, buku kerja Excel baru akan muncul, di mana Anda dapat melihat daftar nama lembar kerja dari buku kerja Excel sumber.
Perbandingan
| Kelebihan | Kekurangan | |
| Metode 1 | Mudah dioperasikan | Terlalu merepotkan jika lembar kerjanya banyak |
| Metode 2 | Mudah dioperasikan | Menuntut Anda untuk mengetik indeks terlebih dahulu |
| Metode 3 | Cepat dan nyaman | Pengguna harus berhati-hati terhadap makro berbahaya eksternal |
| Mudah bahkan untuk pemula VBA |
Excel Akan Rusak
MS Excel dikenal macet dari waktu ke waktu, sehingga merusak file yang sedang disimpan. Oleh karena itu, sangat disarankan untuk memiliki kekuatan eksternal Perbaikan Excel alat, seperti DataNumen Outlook Repair. Itu karena fitur pemulihan diri di Excel terbukti sering gagal.
Pengantar Penulis:
Shirley Zhang adalah pakar pemulihan data di DataNumen, Inc., yang merupakan pemimpin dunia dalam teknologi pemulihan data, termasuk memperbaiki sql dan produk perangkat lunak perbaikan pandangan. Untuk informasi lebih lanjut kunjungi www.datanumen.com