Pada artikel sebelumnya Cara Menyembunyikan Sheet pada saat file di tutup kita telah belajar bersama cara menyembunyikan sheet pada saat file ditutup, dan untuk sekarang kita belajar cara menampilkan sheet pada saat file buka. Cara menampilkan sheet tersebut, ada beberapa cara dan yang kami tahu yaitu bisa membuat kode perintah melalui Modul dan melalui ThisWorkbook. Tapi kodenya agak sedikit berbeda. Selain itu kita juga bisa mengkombinasikannya melalui tombol, seperti tombol “ Login “ yang akan kita bahas pada artikel selanjutnya.
Menampilkan Sheet yang disembunyikan pada saat file di buka
- Masuk ke Microsoft Visual Basic for Applications window dengan menekan tombol Alt + F11 atau anda klik tab "Developer" lalu klik "Visual Basic". Apabila di Office anda belum tampil tab Developer, silahkan baca "Cara Menampilkan Ribbon Developer"
- Kemudian klik 2 kali pada "ThisWorkbook"
- Copy Paste kode berikut di bawah ini dan masukan ke dalam "ThisWorkbook"
- Kode Private Sub Workbook_Open()
Yaitu kode perintah pada saat lembar kerja Excel dibuka - Adapun sheet yang dibuka adalah :
Sheets("Sheet1").Visible = xlSheetVisible Sheets("Sheet2").Visible = xlSheetVisible Sheets("Sheet3").Visible = xlSheetVisible - Kode untuk perintah untuk membuka Sheet yang disembunyikan adalah kode xlSheetVisible
- Simpan file tersebut ke dalam type atau Save as type : Excel Macro-Enabled Workbook atau type Excel Binary Workbook
Kode VBA Excel untuk Menampilkan Sheet yang disembunyikan pada saat file di buka'//baladaka.blogspot.com '============================ Private Sub Workbook_Open() Sheets("Sheet1").Visible = xlSheetVisible Sheets("Sheet2").Visible = xlSheetVisible Sheets("Sheet3").Visible = xlSheetVisible End Sub
Catatan :
Selamat Mencoba
Contoh File Menyembunyikan dan Membuka Sheet
Download Link Alternatif
Jika File tidak ter-download otomatis, silahkan klik Link Alternatif dan lihat hasil download di folder DownloadsCara Unhide Sheet Excel Sekaligus dengan Macro VBA
Jika metode For dan Next (pada posting yang lalu tentang Cara Mengulangi Perintah Yang Sama Beberapa Kali dengan Macro Excel) digunakan dengan cara menentukan dari berapa ke berapa banyaknya jumlah pengulangan perintah, maka metode For Each dan Next hanya memasukkan nama perintahnya saja.
Adapun kode macro yang digunakan contohnya sebagai berikut:
Sub BukaSheet()
Dim buka As Worksheet
For Each buka In Worksheets
buka.Visible = xlSheetVisible
Next buka
End Sub Berikut ini langkah-langkah yang dapat anda ikuti:
- Buat workbook baru dan tambahkan beberapa sheet baru.
- Sembunyikan beberapa sheet yang anda inginkan. Dapat dilakukan dengan cara tekan dan tahan tombol CTRL keyboard sambil klik tab-tab sheet yang akan disembunyikan lalu klik kanan pilih Hide, atau dapat pula dengan cara klik kanan salah satu tab sheet lalu pilih 'Select All Sheets' lalu tekan dan tahan tombol CTRL pada keyboard sambil klik salah satu sheet yang tidak disembunyikan dan klik kanan lalu pilih Hide.
- Tekan ALT+F11 untuk menampilkan VBE.
- Buka menu Insert > Module
- Tulis kode macro di atas pada jendela Module1.
- Buka Excel kembali lalu tekan ALT+F8.
- Pada kotak dialog Macro pilih 'BukaSheet' lalu klik 'Run'.
Terakhir diperbarui tanggal: 29/7/2020