Dear Andre Berikutnya mohon dipatuhi peraturan milis mengenai besarnya file yg dilampirkan ya. Mengikuti aturan itu indah loh hehehehe Biar sheet yg ga di klik ga muncul, sebaiknya disembunyikan sheet selain daftar laporan terlebih dahulu. Bisa menggunakan sub berikut: Sub HideAllSheets() Dim w As Worksheet Sheets("Daftar_Laporan").Visible = -1 For Each w In Worksheets If w.Name <> "Daftar_Laporan" Then w.Visible = 2 Next w End Sub
Kemudian jangan lupa tiap kliknya disisipkan sub tersebut Sub Info_Pelapor() HideAllSheets Sheets("Info_Pelapor").Visible = xlSheetVisible Sheets("Info_Pelapor").Select End Sub Selebihnya tinggal disisipkan hideallsheetnya Wassalam, On Wednesday, October 30, 2013 1:55 PM, Andre Rahmaidy Teeza <andre_teeza...@yahoo.com> wrote: 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