Dear Andre; Coba pada module1
Sub Info_Pelapor() Sheets("Info_Jaringan_Kantor").Visible = xlSheetVeryHidden Sheets("Info_Manajemen").Visible = xlSheetVeryHidden Sheets("Info_Ketenagakerjaan").Visible = xlSheetVeryHidden Sheets("Info_Debitur").Visible = xlSheetVeryHidden Sheets("Info_Pelapor").Visible = xlSheetVisible Sheets("Info_Pelapor").Select End Sub Sub Info_Jaringan_Kantor() Sheets("Info_Pelapor").Visible = xlSheetVeryHidden Sheets("Info_Manajemen").Visible = xlSheetVeryHidden Sheets("Info_Ketenagakerjaan").Visible = xlSheetVeryHidden Sheets("Info_Debitur").Visible = xlSheetVeryHidden Sheets("Info_Jaringan_Kantor").Visible = xlSheetVisible Sheets("Info_Jaringan_Kantor").Select End Sub Sub Info_Manajemen() Sheets("Info_Pelapor").Visible = xlSheetVeryHidden Sheets("Info_Jaringan_Kantor").Visible = xlSheetVeryHidden Sheets("Info_Ketenagakerjaan").Visible = xlSheetVeryHidden Sheets("Info_Debitur").Visible = xlSheetVeryHidden Sheets("Info_Manajemen").Visible = xlSheetVisible Sheets("Info_Manajemen").Select End Sub Sub Info_Ketenagakerjaan() Sheets("Info_Manajemen").Visible = xlSheetVeryHidden Sheets("Info_Pelapor").Visible = xlSheetVeryHidden Sheets("Info_Jaringan_Kantor").Visible = xlSheetVeryHidden Sheets("Info_Debitur").Visible = xlSheetVeryHidden Sheets("Info_Ketenagakerjaan").Visible = xlSheetVisible Sheets("Info_Ketenagakerjaan").Select End Sub Sub Info_Debitur() Sheets("Info_Ketenagakerjaan").Visible = xlSheetVeryHidden Sheets("Info_Manajemen").Visible = xlSheetVeryHidden Sheets("Info_Pelapor").Visible = xlSheetVeryHidden Sheets("Info_Jaringan_Kantor").Visible = xlSheetVeryHidden Sheets("Info_Debitur").Visible = xlSheetVisible Sheets("Info_Debitur").Select End Sub Wassalam ~ Bagus ~ ----- Original Message ----- From: Andre Rahmaidy Teeza To: belajar-excel@yahoogroups.com Sent: Wednesday, October 30, 2013 1:55 PM Subject: [belajar-excel] Macro Excel [1 Attachment] Dear Be Exceller saya mau tanya mengenai coding vba untuk vba yang saya buat. di kertas kerja excel saya ada sekitar 5 tombol ketika saya mengklik tombol 1 akan muncul sheet yang diinginkan, setelah itu klik tombol 2 muncul sheet yang di inginkan, tapi sheet dengan tombol 1 tadi masih muncul. yang mau saya tanyakan gimana kode vbanya ketika tombol 2 di clik yang muncul hanya sheet yang sesuai dengan tombol 2 ,sedang kan sheet yang sesuai dengan tombol 1 tidak muncul (file terlampir). wassalam Andree