Unhiding Check Boxes in Excel 2002

M

MWL

I've got a number of check boxes which are currently hidden in rows 16:19.

How can you automatically unhide them when another check box (which isn't
hidden) is selected?

I've tried the following code but it objects when it gets to
"ActiveSheet.Shapes("CheckBox12").Select":

Private Sub CheckBox1_Click()

Rows("15:20").Select
Range("A20").Activate
Selection.EntireRow.Hidden = False
ActiveSheet.Shapes("CheckBox12").Select
Selection.Visible = True
ActiveSheet.Shapes("CheckBox13").Select
Selection.Visible = True
ActiveSheet.Shapes("CheckBox14").Select
Selection.Visible = True
ActiveSheet.Shapes("CheckBox15").Select
Selection.Visible = True

End Sub
 
D

Dave Peterson

Me.CheckBox1.Visible = True

This code is in the worksheet module, right?

Me refers to the sheet that owns the code.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top