Note: The other languages of the website are Google-translated. Back to English

Bagaimana cara membuat daftar semua nama lembar kerja dari buku kerja?

Misalkan, Anda memiliki buku kerja dengan beberapa lembar kerja, sekarang Anda ingin mencantumkan semua nama lembar di buku kerja saat ini, apakah ada metode cepat untuk membuat daftar nama lembar ini di Excel tanpa mengetiknya satu per satu? Tutorial ini memberikan instruksi tentang cara membuat daftar nama lembar kerja di Excel.


Dapatkan daftar semua nama lembar kerja dari buku kerja secara dinamis dengan rumus

Di Excel, Anda dapat menentukan nama rentang, lalu menerapkan rumus untuk mencantumkan semua nama lembar dari buku kerja saat ini, lakukan dengan langkah-langkah berikut:

1. Pergi ke klik Rumus > Manajer nama, lihat tangkapan layar:

2. di Manajer nama kotak dialog, klik New tombol, lihat tangkapan layar:

3. Di muncul keluar Nama baru dialog, tentukan nama ke dalam Nama kotak teks, lalu salin rumus di bawah ini ke dalam Mengacu pada kotak teks, lihat tangkapan layar:

=GET.WORKBOOK(1)&T(NOW())

4. Lalu klik OK > Penyelesaian untuk menutup kotak dialog, sekarang, silakan masuk ke lembar di mana Anda ingin mencantumkan semua nama lembar, lalu masukkan rumus berikut ke dalam sel kosong:

=IFERROR(INDEX(MID(Sheetnames,FIND("]",Sheetnames)+1,255),ROWS($A$2:A2)),"")

Note: Dalam rumus di atas, Nama lembar adalah nama rentang yang Anda capai di langkah 3.

5. Dan kemudian seret pegangan isian ke sel ketika sel kosong ditampilkan, dan sekarang, semua nama lembar dari buku kerja saat ini telah terdaftar seperti gambar di bawah ini yang ditunjukkan:

6. Jika Anda ingin membuat hyperlink untuk setiap lembar, gunakan rumus di bawah ini:

=HYPERLINK("#'"&A2&"'!A1","Go To Sheet")

Note: Dalam rumus di atas, A2 adalah sel yang berisi nama sheet, dan A1 adalah sel tempat Anda ingin meletakkan sel aktif. Misalnya, jika Anda mengklik teks hyperlink, itu akan menemukan sel A1 dari lembar.

7. Sekarang, ketika Anda mengklik teks hyperlink, itu akan membawa Anda ke sheet itu, lihat demo di bawah ini:

Catatan:
  • 1. Dengan rumus di atas, nama sheet yang dibuat terdaftar secara dinamis, ketika Anda mengubah nama sheet di workbook, nama sheet index akan diperbarui secara otomatis.
  • 2. Anda harus menyimpan file sebagai Buku Kerja Excel dengan Makro Aktif format, jika Anda ingin rumus berfungsi dengan baik setelah file ditutup dan dibuka kembali.

Dapatkan daftar semua nama lembar kerja dari buku kerja dengan kode VBA

Dua kode VBA berikut dapat membantu Anda mencantumkan semua nama lembar kerja di lembar kerja baru. Harap lakukan seperti ini:

1. Tahan ALT + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

2. Klik Menyisipkan > Modul, dan tempel kode berikut di Modul Jendela.

VBA: Cantumkan semua nama lembar kerja dengan hyperlink di lembar kerja baru:

Sub CreateIndex () 'diperbarui oleh Extendoffice
    Dim xAlerts As Boolean Dim I As Long Dim xShtIndex As Worksheet Dim xSht As Variant xAlerts = Application.DisplayAlerts Application.DisplayAlerts = False On Error Resume Next Sheets ("Index"). Hapus Saat Error GoTo 0 Set xShtIndex = Sheets.Add (Sheets (1)) xShtIndex.Name = "Indeks" I = 1 Sel (1, 1) .Value = "INDEX" Untuk Setiap xSht Dalam ThisWorkbook.Sheets Jika xSht.Name <> "Index" Maka I = I + 1 xShtIndex. Hyperlinks.Add Cells (I, 1), "", "'" & xSht.Name & "'! A1",, xSht.Name End If Next Application.DisplayAlerts = xAlerts End Sub

2. Lalu tekan F5 kunci untuk menjalankan kode, dan semua nama lembar kerja di buku kerja aktif telah terdaftar ke dalam lembar kerja baru yang disebut Indeks, dan nama lembar ditautkan ke setiap lembar juga, lihat tangkapan layar:


Dapatkan daftar semua nama lembar kerja dari buku kerja dengan fitur yang berguna

Dengan Buat Daftar Nama Lembar utilitas add-in pihak ketiga Kutools untuk Excel, Anda dapat membuat daftar nama lembar kerja dalam satu klik, dan menautkan ke setiap lembar kerja dengan hyperlink.

Catatan:Untuk menerapkan ini Buat Daftar Nama Lembar, pertama, Anda harus mengunduh Kutools untuk Excel, lalu terapkan fitur dengan cepat dan mudah.

Setelah menginstal Kutools untuk Excel, lakukan seperti ini:

1. Klik Kutools Plus > Lembar Kerja > Buat Daftar Nama Lembar, lihat tangkapan layar:

2. di Buat Daftar Nama Lembar kotak dialog, tentukan pengaturan berikut:

(1.) Pilih gaya indeks lembar Anda suka, Anda bisa membuat nama lembar kerja dengan hyperlink atau dengan tombol makro.

(2.) Masukkan nama lembar kerja untuk indeks lembar.

(3.) Tentukan lokasi indeks lembar kerja.

(4.) Tentukan berapa banyak kolom yang ingin Anda gunakan di lembar kerja baru untuk menampilkan nama lembar kerja.

Klik untuk Mengunduh dan uji coba gratis Kutools for Excel Sekarang!

3. Setelah selesai melakukan setting, selanjutnya klik OK. Semua nama lembar kerja telah dicantumkan dengan tautan di lembar kerja baru dari buku kerja saat ini. Lihat tangkapan layar:

nama lembar kerja dengan hyperlink nama lembar kerja dengan tombol makro

Klik untuk Mengunduh dan uji coba gratis Kutools for Excel Sekarang!


Artikel yang lebih relatif:

  • Cantumkan Semua Nama File Dalam Folder Dan Buat Hyperlink Untuk Mereka
  • Untuk pekerjaan sehari-hari Anda, Anda mungkin perlu mengimpor beberapa nama file dari folder ke lembar kerja, dan membuat hyperlink untuk setiap file sehingga file dapat dibuka dengan cepat dan mudah. Mungkin, Anda dapat menyalin dan menempel nama file dan membuat hyperlink untuk itu satu per satu secara manual, tetapi ini akan membuang banyak waktu jika ada ratusan file di folder tersebut.
  • Salin atau Pindahkan File Dari Satu Folder ke Folder Lain Berdasarkan Daftar
  • Jika Anda memiliki daftar nama file di kolom di lembar kerja, dan file tersebut berada di folder di komputer Anda. Tapi, sekarang, Anda perlu memindahkan atau menyalin file-file ini yang namanya tercantum ke dalam lembar kerja dari folder aslinya ke folder lain seperti gambar berikut yang ditampilkan. Bagaimana Anda bisa menyelesaikan tugas ini secepat mungkin di Excel?
  • Menavigasi Antar Lembar Kerja Dengan Menggunakan Daftar Drop Down
  • Misalkan, Anda memiliki buku kerja yang berisi beberapa lembar kerja, sekarang, Anda perlu membuat daftar drop-down atau kotak kombo yang mencantumkan semua nama lembar dan ketika Anda memilih satu nama lembar dari daftar drop-down, itu akan langsung melompat ke lembar itu. Artikel ini, saya akan memperkenalkan cara menavigasi antar lembar kerja dengan menggunakan daftar drop-down di Excel.

Alat Produktivitas Kantor Terbaik

Kutools for Excel Memecahkan Sebagian Besar Masalah Anda, dan Meningkatkan Produktivitas Anda hingga 80%

  • Reuse: Masukkan dengan cepat rumus, bagan yang kompleks dan apa pun yang pernah Anda gunakan sebelumnya; Enkripsi Sel dengan kata sandi; Buat Milis dan mengirim email ...
  • Bilah Formula Super (dengan mudah mengedit beberapa baris teks dan rumus); Membaca Tata Letak (membaca dan mengedit sel dalam jumlah besar dengan mudah); Tempel ke Rentang yang Difilter...
  • Gabungkan Sel / Baris / Kolom tanpa kehilangan Data; Pisahkan Konten Sel; Gabungkan Baris / Kolom Duplikat... Mencegah Sel Duplikat; Bandingkan Rentang...
  • Pilih Duplikat atau Unik Baris; Pilih Baris Kosong (semua sel kosong); Temukan Super dan Temukan Fuzzy di Banyak Buku Kerja; Pilih Acak ...
  • Salinan Tepat Beberapa Sel tanpa mengubah referensi rumus; Buat Referensi Otomatis ke Beberapa Lembar; Sisipkan Poin, Kotak Centang, dan lainnya ...
  • Ekstrak Teks, Tambahkan Teks, Hapus berdasarkan Posisi, Hapus Space; Membuat dan Mencetak Subtotal Paging; Konversi Konten Antar Sel dan Komentar...
  • Filter Super (simpan dan terapkan skema filter ke sheet lain); Penyortiran Lanjutan menurut bulan / minggu / hari, frekuensi dan lainnya; Filter Khusus dengan huruf tebal, miring ...
  • Gabungkan Workbooks dan WorkSheets; Gabungkan Tabel berdasarkan kolom kunci; Pisahkan Data menjadi Beberapa Lembar; Konversi Batch xls, xlsx dan PDF...
  • Lebih dari 300 fitur canggih. Mendukung Office / Excel 2007-2021 dan 365. Mendukung semua bahasa. Penerapan yang mudah di perusahaan atau organisasi Anda. Fitur lengkap Uji coba gratis 30 hari. Jaminan uang kembali 60 hari.
tab kte 201905

Tab Office Membawa antarmuka Tab ke Office, dan Membuat Pekerjaan Anda Jauh Lebih Mudah

  • Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
  • Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
  • Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!
officetab bawah
Urutkan komentar berdasarkan
komentar (19)
Belum ada peringkat. Jadilah yang pertama memberi peringkat!
Komentar ini diminimalkan oleh moderator di situs
Hebat - tetapi bagaimana saya melakukan ini di Visio yaitu untuk indeks lembar kerja di visio?
Komentar ini diminimalkan oleh moderator di situs
Bagaimana cara membuat daftar Sheetname dari sub WB dan mencantumkannya di WB Utama?
Komentar ini diminimalkan oleh moderator di situs
Langkah 'Rentang' di makro ListWorkSheetNames Anda menghasilkan kesalahan runtime 1004: rentang metode objek global gagal. Saya telah menyimpannya dalam modul PERSONAL.XLSB, berjalan dari spreadsheet berkemampuan makro di Office10. Apa yang saya lewatkan? Sub ListWorkSheetNames() For i = 1 To Sheets.Count Range(”A” & i) = Sheets(i).Name Next i End Sub
Komentar ini diminimalkan oleh moderator di situs
yang terbaik itu bekerja seperti pesona
Komentar ini diminimalkan oleh moderator di situs
itu bagus bekerja seperti pesona
Komentar ini diminimalkan oleh moderator di situs
Kode VBA berfungsi dengan baik untuk menghemat waktu, Terima kasih banyakaaaaaaaaaaaaaaaaaaaa
Komentar ini diminimalkan oleh moderator di situs
Hai Saya ingin tahu bagaimana cara membuat daftar warna tab di sebelah nama tab di makro ini? Misalnya dalam daftar lembar KutoolsforExcel: Kolom A Kolom B TabName1 Kuning
Komentar ini diminimalkan oleh moderator di situs
TERIMA KASIH BANYAK! Saya sangat menyukai situs web Anda. Dalam hitungan menit saya telah menghemat banyak waktu dengan dua bagian situs ini termasuk yang ini. Suka!
Komentar ini diminimalkan oleh moderator di situs
sangat membantu, bekerja seperti yang diharapkan!!!!! terima kasih
Komentar ini diminimalkan oleh moderator di situs
Bekerja dengan baik!! Terima kasih!!!!
Komentar ini diminimalkan oleh moderator di situs
Terima kasih banyak, ini bekerja dengan baik.
Komentar ini diminimalkan oleh moderator di situs
Menyebabkan masalah ketika perlindungan dokumen diaktifkan melalui email atau kebijakan perusahaan
Komentar ini diminimalkan oleh moderator di situs
CEMERLANG!! Terima kasih banyak! 😊
Komentar ini diminimalkan oleh moderator di situs
Saya mencoba yang ini dan berhasil. Tetapi ketika saya menutup dan membuka file lagi semua nilai dalam nama lembar saya kosong dan hilang tetapi rumusnya masih ada. Saya mencoba memasukkan rumus yang sama lagi tetapi tidak menunjukkan nilainya lagi
Komentar ini diminimalkan oleh moderator di situs
Saya menutup dan membuka dokumen saya dan semua nilai di kolom nama lembar saya semuanya hilang dan kosong tetapi rumusnya masih ada. Saya mencoba memasukkan rumus yang sama tetapi tidak menunjukkan nilainya lagi
Komentar ini diminimalkan oleh moderator di situs
Halo, Anne,
Maaf karena terlambat membalas, setelah membuat nama rentang dan rumus, Anda harus menyimpan buku kerja sebagai Buku Kerja Excel dengan Makro Aktif format, jadi lain kali, saat Anda membuka file Excel, rumusnya bisa bekerja dengan baik.
Silakan dicoba, semoga bisa membantu Anda!
Komentar ini diminimalkan oleh moderator di situs
Halo,

je viens de tester la méthode melalui makro (formula dinamis avec) et a marche au poil donc je tiens vraiment remercier l'auteur de cet article parce que a va vraiment m'aider dans mon travail ! Juste, je me permet de corriger les formules pour la version française. Et alors je ne sais pas si c'est parce que je suis sous la version 2019 mais Excel rouspète quand il n'y a pas d'argument en 3ème position de la fonction STXT ("MID" en version anglaise) donc obligé d' en rajouter un. Donc voilà ce que a donne :

=LIRE.CLASSEUR(1)&T(MAINTENANT())

=SIERREUR(INDEX(STXT(nomsFeuilles;TROUVE("]";nomsFeuilles)+1,255;20);LIGNES($A$2:A2));"")

Selamat berjuang tous ! ;-)
Komentar ini diminimalkan oleh moderator di situs
Halo, Gizmil
Terima kasih atas komentar Anda, ada beberapa fungsi yang hanya tersedia untuk bahasa Inggris di Excel.
Formula Anda dapat membantu orang lain.
Terima kasih lagi!
Komentar ini diminimalkan oleh moderator di situs
Pertama, terima kasih kepada penulis. Dan menambahkan versi Ceko.

tp 3. =O.KNIZE(1)&T(NYNÍ())
tp 4. =IFERROR(INDEX(ČÁST(nazvylistu;NAJÍT("]";nazvylistu)+1;255);ŘÁDKY($A$2:A4));"")
Belum ada komentar yang diposting di sini
Tinggalkan komentar anda
Posting sebagai Tamu
×
Beri peringkat pos ini:
0   Karakter
Lokasi yang Disarankan

Ikuti kami

Hak Cipta © 2009 - www.extendoffice.com. | Seluruh hak cipta. Dipersembahkan oleh ExtendOffice. | Peta Situs
Microsoft dan logo Office adalah merek dagang atau merek dagang terdaftar dari Microsoft Corporation di Amerika Serikat dan / atau negara lain.
Dilindungi oleh Sectigo SSL