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

Bagaimana cara membuat daftar dinamis nama lembar kerja di Excel?

Jika Anda memiliki beberapa lembar di buku kerja, dan Anda ingin membuat daftar dinamis dari semua nama lembar di lembar baru di buku kerja, bagaimana Anda bisa melakukannya? Sekarang tutorial ini memperkenalkan beberapa trik untuk menyelesaikan misi ini dengan cepat di Excel.

Buat daftar dinamis nama lembar kerja dengan Tentukan Nama dan Rumus

Buat daftar dinamis nama lembar kerja dengan kode VBA

Buat daftar dinamis nama lembar kerja dengan Kutools for Excel ide bagus3

Tampilkan daftar dinamis nama lembar kerja dengan Kutools for Excel ide bagus3


1. Pilih sel di lembar kosong, di sini saya pilih A1, lalu klik Rumus > Tentukan Nama. lihat tangkapan layar:
doc-dynamic-worksheetname-list-1

2. Kemudian di Nama baru dialog, ketik Seprei ke dalam Nama kotak teks (Anda dapat mengubahnya sesuai kebutuhan), dan ketikkan rumus ini = SUBSTITUTE (GET.WORKBOOK (1), "[" & GET.WORKBOOK (16) & "]", "") ke dalam Mengacu pada kotak teks. Lihat tangkapan layar:
doc-dynamic-worksheetname-list-2

3. klik OK. Masuk ke sel yang dipilih (A1) dan ketikkan rumus ini = INDEX (Spreadsheet, BARIS ($ A $ 1: $ A1)) (A1 adalah sel yang Anda ketikkan rumus ini, "Spreadsheet" adalah nama yang Anda tentukan di Langkah 2) ke dalamnya, lalu seret pegangan IsiOtomatis ke bawah hingga #REF! muncul.
doc-dynamic-worksheetname-list-3

jenis: Jika ada lembar kerja yang dihapus atau ditambahkan, Anda harus pergi ke A1 dan tekan tombol Enter lalu gosok pegangan isi otomatis lagi.
doc-dynamic-worksheetname-list-4


Jika Anda ingin membuat daftar dinamis nama lembar kerja yang dapat ditautkan ke setiap lembar, Anda dapat menggunakan kode VBA.

1. Buat lembar kerja baru dan ubah namanya menjadi Indeks. Lihat tangkapan layar:

doc-dynamic-worksheetname-list-5       doc-dynamic-worksheetname-list-6

2. Klik kanan pada nama sheet Index, pilih Lihat kode dari menu konteks. Lihat tangkapan layar:
doc-dynamic-worksheetname-list-7

3. Di jendela yang muncul, salin dan tempel kode VBA di bawah ini ke dalamnya.

VBA: Buat daftar dinamis nama lembar kerja.

Private Sub Worksheet_Activate()
	'Updateby20150305
	Dim xSheet As Worksheet
	Dim xRow As Integer
	Dim calcState As Long
	Dim scrUpdateState As Long
	Application.ScreenUpdating = False
	xRow                       = 1
	With Me
		.Columns(1).ClearContents
		.Cells(1, 1) = "INDEX"
		.Cells(1, 1).Name = "Index"
	End With
	For Each xSheet In Application.Worksheets
		If xSheet.Name <> Me.Name Then
			xRow                     = xRow + 1
			With xSheet
				.Range("A1").Name = "Start_" & xSheet.Index
				.Hyperlinks.Add anchor: = .Range("A1"), Address: = "", _
				SubAddress:             = "Index", TextToDisplay: = "Back to Index"
			End With
			Me.Hyperlinks.Add anchor: = Me.Cells(xRow, 1), Address: = "", _
			SubAddress: = "Start_" & xSheet.Index, TextToDisplay: = xSheet.Name
		End If
	Next
	Application.ScreenUpdating = True
End Sub

4. klik Run or F5 untuk menjalankan VBA, sekarang daftar dinamis nama lembar kerja dibuat.
doc-dynamic-worksheetname-list-8

olymp trade indonesiaTip:

1. Ketika worksheet dari workbook dihapus atau disisipkan, daftar nama worksheet akan berubah secara otomatis.

2. Anda dapat mengklik nama sheet dari daftar nama untuk pergi ke sheet.

Dengan dua metode di atas tidak cukup nyaman, jika Anda tertarik dengan utilitas baru, Anda dapat melanjutkan dua metode berikutnya yang mungkin membuat tugas ini lebih mudah.


 Jika Anda hanya ingin dengan cepat mencantumkan semua nama lembar kerja dari buku kerja dan menautkannya ke lembar asli, Anda bisa menggunakan Kutools untuk Excel'S Buat Daftar Nama Lembar.

Kutools untuk Excel, dengan lebih dari
300
fungsi praktis, membuat pekerjaan Anda lebih mudah. 

Setelah pemasangan gratis Kutools for Excel, lakukan seperti di bawah ini:

1. klik Kutools Plus > Lembar Kerja > Buat Daftar Nama Lembar. Lihat tangkapan layar:

doc nama lembar kerja dinamis 17

2. Dalam Buat Daftar Nama Lembar dialog:

 doc daftar nama lembar kerja dinamis 2
(1) Periksa gaya indeks yang Anda perlukan Gaya Indeks Lembar bagian;
(2) Beri nama lembar indeks baru dengan mengetik datanya Tentukan nama sheet untuk Sheet Index kolom tulisan;
(3) Tentukan lokasi Anda akan menempatkan lembar indeks yang ditambahkan di Masukkan Indeks Lembar daftar;
(4) Jika Anda ingin menampilkan nama sheet dalam satu daftar, pilih 1 kolom dalam Menampilkan Indeks Lembar menjadi daftar.

3. klik Ok. Sekarang Anda dapat melihat nama sheet dicantumkan.
doc kutools membuat daftar sheet 3

Tip:

1. Anda dapat mengklik nama sheet untuk segera beralih ke sheet aslinya.

2. Daftar atau nama sheet tidak dapat diubah secara dinamis dengan sheet yang dimasukkan atau dihapus.

3. Sebenarnya, Anda juga dapat membuat daftar tombol untuk menghubungkan lembar relatif, hanya perlu memeriksa Berisi Tombol dan Makro dalam dialog. lihat screeshshot:
doc kutools membuat daftar sheet 4

Klik di sini untuk mengetahui lebih banyak tentang Membuat Daftar Nama Lembar.


Jika Anda Dengan Kutools untuk Excel, Anda juga bisa menggunakan Navigasi utilitas untuk menampilkan nama lembar kerja yang dapat ditautkan di panel

Setelah pemasangan gratis Kutools for Excel, lakukan seperti di bawah ini:

1. klik Kutools > Navigasi. Klik Buku Kerja & Lembar untuk memperlihatkan buku kerja dan lembar kerja, dan Anda dapat memilih buku kerja, maka lembar kerjanya akan ditampilkan di Navigasi panel. Lihat tangkapan layar:
panel navigasi dokumen 1   

olymp trade indonesiaTip:

Ketika ada lembar kerja yang dihapus atau ditambahkan, Anda dapat mengklik tombol refresh panel navigasi dokumen 2 dalam Navigation untuk menyegarkan nama lembar kerja.

Klik di sini untuk informasi lebih lanjut tentang Navigasi.


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 (11)
Belum ada peringkat. Jadilah yang pertama memberi peringkat!
Komentar ini diminimalkan oleh moderator di situs
Bagaimana cara saya mengedit kode ini untuk menyertakan kotak centang di sebelah kiri tautan yang dapat saya gunakan untuk menyembunyikan baris pada lembar sampul? Juga bagaimana saya bisa menyisipkan baris pada lembar kerja di bawah A1 agar tautan kembali ke indeks muncul di sana?
Komentar ini diminimalkan oleh moderator di situs
Bagaimana cara menghapus tautan ke setiap lembar dan bagaimana cara tidak menyertakan lembar "sheet1" dan "Indeks"? Private Sub Worksheet_Activate() 'Updateby20150305 Redupkan xSheet As Worksheet Dim xRow As Integer Dim calcState Selama Redup scrUpdateState As Long Application.ScreenUpdating = False xRow = 1 With Me .Columns(1).ClearContents .Cells(1, 1) = "INDEX " .Cells(1, 1).Name = "Index" Diakhiri Dengan Untuk Setiap xSheet Di Application.Worksheets If xSheet.Name Me.Name Kemudian xRow = xRow + 1 Dengan xSheet .Range("A1").Name = "Start_ " & xSheet.Index .Hyperlinks.Add anchor: = .Range("A1"), Address: = "", _ SubAddress: = "Index", TextToDisplay: = "Back to Index" End With Me.Hyperlinks.Add anchor : = Me.Cells(xRow, 1), Alamat: = "", _ SubAddress: = "Start_" & xSheet.Index, TextToDisplay: = xSheet.Name End If Next Application.ScreenUpdating = True End Sub
Komentar ini diminimalkan oleh moderator di situs
Terima kasih. Itu sangat berguna. :D
Komentar ini diminimalkan oleh moderator di situs
bagaimana saya bisa menggunakan kode ini untuk membuat daftar lembar kerja dalam urutan horizontal, bukan vertikal? apa itu mungkin?
Komentar ini diminimalkan oleh moderator di situs
Mendefinisikan nama "Spreadsheet" dalam nama yang ditentukan TIDAK BEKERJA. Kotak "merujuk ke" tidak akan menyimpan rumus saat diketik dan mengubahnya menjadi string teks.
Komentar ini diminimalkan oleh moderator di situs
Hanya apa yang saya butuhkan dan bekerja dengan sempurna. Terima kasih!
Komentar ini diminimalkan oleh moderator di situs
Atau Anda cukup mengklik kanan panah gulir tab-horizontal kiri atau kanan di kiri bawah, lalu klik nama lembar kerja (dari daftar vertikal sederhana) yang ingin Anda lompati.
Komentar ini diminimalkan oleh moderator di situs
Terima kasih atas info yang bermanfaat ini. Saya membuat daftar dinamis dengan kode VBA di tab Indeks. Saya menemukan bahwa itu hanya diperbarui ketika saya mengklik kembali ke tab Indeks. Apakah ada cara untuk memastikannya diperbarui secara otomatis segera setelah tab baru dibuat? Saya merujuk ke nama tab di tempat lain di buku kerja dan orang lain akan menggunakannya jadi saya mencoba membuatnya mulus. Terima kasih!
Komentar ini diminimalkan oleh moderator di situs
Maaf, saya tidak menemukan kode itu dapat menyelesaikan pekerjaan Anda.
Komentar ini diminimalkan oleh moderator di situs
Kirimkan ini ke brasileiro, GET.WORKBOOK identificado como uma função no Gerenciador de Nomes para criar o nome "Sheets", atau referensi "Sheets" dengan nomor "#NOME?". Tentei várias vezes, inklusif com a sugestão de traduzir GET.WORKBOOK untuk OBTER.LIVRO mas no funcionou.
Komentar ini diminimalkan oleh moderator di situs
Hai, coba ini: =SUBSTITUIR(INFO.PASTA.TRABALHO(1),"["&INFO.PASTA.TRABALHO(16)&"]","")
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