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

Kirim email ke