Private Sub CheckBox1_Click()
     If (CheckBox1.Value = True) Then
         Sheet2.Visible = xlSheetVisible
     Else
         Sheet2.Visible = xlSheetVeryHidden
     End If
End Sub
Private Sub CheckBox2_Click()
     If (CheckBox2.Value = True) Then
         Sheet3.Visible = xlSheetVisible
     Else
         Sheet3.Visible = xlSheetVeryHidden
     End If
End Sub


On 12/06/2013 11:58, Yusril Ramadani wrote:
> Dear Para pakar
>
> mohon bantuannya untuk case terlampir
>
> saya mau buat sebuah template yg dimana ketika baru buka template 
> tersebut hanya sheet options yg terlihat dan sheet yg lain dipanggil 
> dengan meng click check box atau button
>
> dan ketika close file hanya sheet options dan sheet yg di click 
> tersebut yang visible
>
>
>
> mohon pencerahannya
>
>
> salam
> YR
> 

-- 
*Deny Premordianto
------------------------------------------------------------------------
ICT Department - Network & Infrastructure Division
Technical Support Wilayah 4
* 0821-5701-1683 | [email protected] | 2811084A
Matematika Hidup adalah mengalikan sukacita, mengurangi kesedihan, 
menambahkan semangat, membagi kebahagiaan, dan menguadratkan kasih 
sayang antar sesama

Attachment: Chekbox options.xlsm
Description: application/vnd.ms-excel.sheet.macroenabled.12

Kirim email ke