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
<[email protected]> 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
