Bagaimana cara membuat daftar semua lembar yang terlihat atau tersembunyi dari buku kerja?
Jika Anda memiliki buku kerja besar yang berisi beberapa lembar kerja tersembunyi, sekarang, Anda perlu mencantumkan semua lembar yang terlihat dan tersembunyi secara terpisah di lembar kerja seperti gambar berikut yang ditampilkan. Artikel ini, saya akan berbicara tentang cara membuat daftar semua lembar yang terlihat dan tersembunyi di Excel.
Buat daftar semua lembar yang terlihat dan tersembunyi secara terpisah dengan kode VBA
Buat daftar semua lembar yang terlihat di Excel dengan Kutools for Excel
Buat daftar semua lembar yang terlihat dan tersembunyi secara terpisah dengan kode VBA
Untuk mencantumkan nama tab yang terlihat dan tersembunyi di lembar kerja, kode VBA berikut mungkin membantu Anda, 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.
Kode VBA: Cantumkan semua lembar yang terlihat dan tersembunyi secara terpisah:
Sub NameSheets()
'Updateby Extendoffice
Dim x As Long, y As Long, z As Long
Dim ws As Worksheet
Dim shtCnt As Integer
x = 1
y = 1
z = 1
shtCnt = ThisWorkbook.Sheets.Count
On Error Resume Next
Application.ScreenUpdating = False
Sheets.Add After:=Sheets(Sheets.Count)
For i = 1 To shtCnt
If Sheets(i).Visible = xlSheetHidden Then
Cells(x, 2) = Sheets(i).Name
x = x + 1
End If
If Sheets(i).Visible = xlSheetVisible Then
Cells(y, 1) = Sheets(i).Name
y = y + 1
End If
If Sheets(i).Visible = xlSheetVeryHidden Then
Cells(z, 3) = Sheets(i).Name
z = z + 1
End If
Next i
Application.ScreenUpdating = True
End Sub
3. Lalu tekan F5 kunci untuk menjalankan kode ini, semua lembar yang terlihat, tersembunyi, sangat tersembunyi terdaftar di lembar baru secara terpisah seperti gambar berikut yang ditampilkan:
Buat daftar semua lembar yang terlihat di Excel dengan Kutools for Excel
Jika Anda memiliki Kutools untuk Excel, Dengan yang Buat Daftar Nama Lembar fitur, Anda bisa dengan cepat membuat daftar semua lembar yang terlihat dari buku kerja saat ini dengan hyperlink ke setiap tab.
Kutools untuk Excel : dengan lebih dari 300 add-in Excel yang praktis, gratis untuk dicoba tanpa batasan dalam 30 hari. |
Setelah menginstal Kutools untuk Excel, lakukan hal berikut:
1. Klik Kutools Ditambah > Lembar Kerja > Buat Daftar Nama Lembar, lihat tangkapan layar:
2. di Buat Daftar Nama Lembar kotak dialog:
(1.) Pilih Berisi daftar hyperlink bawah Gaya Indeks Lembar bagian;
(2.) Masukkan nama lembar kerja untuk indeks lembar.
(3.) Tentukan lokasi indeks lembar kerja.
(4.) Tentukan berapa banyak kolom yang Anda inginkan untuk menampilkan nama lembar kerja dalam indeks lembar.
3. Dan kemudian klik Ok tombol, semua lembar yang terlihat telah terdaftar ke dalam lembar baru mengecualikan lembar tersembunyi, lihat tangkapan layar:
Klik Unduh dan uji coba gratis Kutools untuk Excel Sekarang!
Alat Produktivitas Kantor Terbaik
Tingkatkan Keterampilan Excel Anda dengan Kutools for Excel, dan Rasakan Efisiensi yang Belum Pernah Ada Sebelumnya. Kutools for Excel Menawarkan Lebih dari 300 Fitur Lanjutan untuk Meningkatkan Produktivitas dan Menghemat Waktu. Klik Di Sini untuk Mendapatkan Fitur yang Paling Anda Butuhkan...
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!