Ini dia Script Macro VBA Excel untuk menyembunyikan Sheet

Sobat Excel yang sedang belajar Macro, tentu banyak hal yang perlu dipelajari nah kali ini saya akan membagi script VBA untuk macro Excel yang berfungsi untuk menyembunyikan beberapa sheet. Langkahnya cukup sederhana silakan sobat buat 10 sheet dan ganti nama Sheet1 menjadi 1, kemudian ganti kembali sheet2 sampai sheet10 menjadi angka 1-10

Lihat bagaimana cara lain

Menyembuyikan dan Memunculkan Sheet dengan 2 cara

Langkah berikutnya buka macro editor dari menu Developer kemudian klik View Code untuk menampilkan VBA editor. kemudian klik Insert Module dan ketikan script di bawah ini

Tempatkan Script dibawah ini kedalam module1

Sub Sembunyikan()
Sheets("1").Visible = True
Sheets("1").Select
Sheets("2").Visible = xlSheetVeryHidden
Sheets("3").Visible = xlSheetVeryHidden
Sheets("4").Visible = xlSheetVeryHidden
Sheets("5").Visible = xlSheetVeryHidden
Sheets("6").Visible = xlSheetVeryHidden
Sheets("7").Visible = xlSheetVeryHidden
Sheets("8").Visible = xlSheetVeryHidden
Sheets("9").Visible = xlSheetVeryHidden
Sheets("10").Visible = xlSheetVeryHidden
End Sub

Jika sudah selesai silakan buat tombol atau command button pada Sheet satu dengan cara klik Menu Developer dan klik Insert kemudian pilih Command Button

Jika sudah selesai akan muncul jendela seperti gambar dibawah pilih saja pilih Sembunyikan dan klik OK

Jika berhasil Anda akan melihat sebuah tombol command button yang bernama Button1 silakan coba di klik dan perhatikan sheet yang ada dibawah nya jika tombol tersebut di klik maka Sheet2 sampai dengan Sheet10 akan hilang dan yang tampak hanya Sheet1