Re: [belajar-excel] Macro Excel

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_bn@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

__._,_.___

=====================================================================
Untuk memudahkan tim penyusun materi Belajar Excel yang lebih sesuai kebutuhan member, silakan ungkapkan permasalahan yang kerap ditemui dalam menggunakan Excel sehari-hari atau hal-hal yang ingin dipelajari dalam jangka dekat ini. Mohon diprioritaskan dari yang sering ditemui sampai yang ingin dipelajari.
Isi sesuai kelompoknya (fitur-fitur, formula-formula tertentu yang masih membingungkan, otomasi atau pemrograman dalam Excel [Macro - VBA], hal lainnya yang membuat Anda kesulitan dalam mempelajari Excel).
Boleh mengisi berulang kali untuk menambah uneg-uneg yang ingin diungkapkan.
Link untuk menuangkan seluruh uneg-uneg tersebut ada di :
http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3
=====================================================================
Langkah kecil Anda dalam mengisi database bisa menjadi langkah pertama yang bermanfaat besar untuk kita semua.
=====================================================================

---------------------------------------------------------------------
bergabung ke milis (subscribe), kirim mail kosong ke:
belajar-excel-subscribe@yahoogroups.com

posting ke milis, kirimkan ke:
belajar-excel@yahoogroups.com

berkunjung ke web milis
http://tech.groups.yahoo.com/group/belajar-excel/messages

melihat file archive / mendownload lampiran
http://www.mail-archive.com/belajar-excel@yahoogroups.com/
atau (sejak 25-Apr-2011) bisa juga di :
http://milis-belajar-excel.1048464.n5.nabble.com/

menghubungi moderators & owners: belajar-excel-owner@yahoogroups.com

keluar dari membership milis (UnSubscribe):
kirim mail kosong ke  belajar-excel-unsubscribe@yahoogroups.com
---------------------------------------------------------------------

Your email settings: Individual Email|Traditional
Change settings via the Web (Yahoo! ID required)
Change settings via email: Switch delivery to Daily Digest | Switch to Fully Featured
Visit Your Group | Yahoo! Groups Terms of Use | Unsubscribe

__,_._,___