Halo sahabat-sahabat berkreasi kali ini admin akan berbagi kode vba Bagaimana menampilkan semua sheet tersembunyi. Fitur ini akan sangat berguna apabila kita menggunakan kode sebelumnya kita bahas yaitu menyembunyikan semua sheet kecuali aktif.
Jika kita hanya memiliki beberapa sifat mungkin kode ini tidak seberapa terasa tapi jika kita memiliki banyak sheet misalkan sampai 50 sheet untuk menampilkan 1 per 1 maka akan membuang waktu, kode ini akan sangat berguna bagi kita yang ingin bekerja dengan cepat menggunakan Excel.
Berikut adalah kode yang kita gunakan untuk menampilkan semua sheet yang tersembunyi.
Sub TampilkanSemuaSheetTersembunyi() Dim ws As Worksheet For Each ws In ActiveWorkbook.Worksheets ws.Visible = xlSheetVisible Next ws End Sub
Download File Contoh
Tampilkan Semua Sheet Tersembunyi - OK.zip
Semoga bermanfaat,
Salam ALMaS.
Kantor berkreasi.net
Alamat :
Pens Sky Venture - Sukolilo Surabaya
Jl. Cilincing jakarta utara
Email : Alamat email ini dilindungi dari robot spam. Anda memerlukan Javascript yang aktif untuk melihatnya.
Alamat email ini dilindungi dari robot spam. Anda memerlukan Javascript yang aktif untuk melihatnya. Form Kontak : Klik Disini
WA : 085 331 270 386 im3 (CS / Ali)
Bank BNI Cab. Jember
No.rek. 019 598 5992
Atas nama Sdri IMAS KHASANAH
Bank BRI Cab. Wonokromo
No.rek. 0976 01 004629 50 8
Atas nama IMAS KHASANAH
Dr. Nugroho Eko Putro, M.Pd.
Amien sawedi, S.Pd.
Aries Eko Wibowo, S.Pd. MM.
Fauzan, M.Kom.
Sahrudin, M.Pd.
Budi Prasetya, ST., MM.
Muhammad Risal Maros, M.Pd.
Didik P Wicaksono, M.Pd.
Wayan Mulyana, M.Pd.
Patrick A. Kembuan, S.Kom
Ali, M.Pd.