Cara Menyembunyikan Sheet pada saat file di tutup

Kali ini kami akan berbagi kembali tentang kode-kode VBA Macro Excel. Kali ini kita akan mencoba membuat kode untuk menyembunyikan sheet-sheet pada saat file tersebut ditutup atau di Close.

Menyembunyikan Sheet pada saat file di tutup

• 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 VBA Excel untuk Menyembunyikan Sheet pada saat file di tutup

'https://baladaka.blogspot.com
'============================

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Sheets("Home").Select

Call Proteksi

End Sub

Sub Proteksi()

Sheets("Sheet1").Visible = xlSheetVeryHidden
Sheets("Sheet2").Visible = xlSheetVeryHidden
Sheets("Sheet3").Visible = xlSheetVeryHidden

End Sub




Catatan :


• Kode Sheets("Home").Select
  Artinya bahwa pada saat file tersebut ditutup maka akan masuk ke sheet Home.
• Kode Call Proteksi
  Yaitu memanggil perintah Proteksi sedangkan perintah proteksi tersebut berada di Sub Proteksi()
• Adapun sheet yang diproteksi tersebut adalah :
  Sheets("Sheet1").Visible = xlSheetVeryHidden Sheets("Sheet2").Visible = xlSheetVeryHidden Sheets("Sheet3").Visible = xlSheetVeryHidden
• Kode untuk perintah proteksi atau menyembunyikan Sheet adalah kode xlSheetVeryHidden
• Simpan file tersebut ke dalam type atau Save as type : Excel Macro-Enabled Workbook atau type Excel Binary Workbook

Untuk contoh File saya gabung dengan file Cara Menampilkan Sheet Pada Saat File dibuka yang dibahas berikutnya

Selamat Mencoba