thanks mas bagus atas scriptnya
cuma pertanyaan saya kalau ada sekitar 30 sheet yang akan ditampilkan sesuai
dengan tombolnya, apakah code sriptnya pada module vba harus ditampilkan semua
sheet ya mas.. atau ada cara lain supaya scriptnya tidak terlalu panjang.
regards
andree
Pada Rabu, 30 Oktober 2013 16:04, Bagus <ba...@kingjim.co.id> menulis:
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
>
