Tanner_2004
Well-known Member
- Joined
- Jun 1, 2010
- Messages
- 616
This code works great...UNLESS, I protect the worksheet. I need to protect the worksheet because it contains cells with formulaes. My assumption is that the hiding of row 27 upon clicking the check box is giving me the trouble - the code is opened asking me to debug. Any ideas/solutions would be greatly appreciated. Thank you!
Private Sub CheckBox1_Click()
Application.ScreenUpdating = False
If CheckBox1.Value = True Then
Rows(27).EntireRow.Hidden = False
Worksheets("Scenarios").Visible = True
Worksheets("Scenario Charts").Visible = True
Else
Rows(27).EntireRow.Hidden = True
Worksheets("Scenarios").Visible = False
Worksheets("Scenario Charts").Visible = False
Private Sub CheckBox1_Click()
Application.ScreenUpdating = False
If CheckBox1.Value = True Then
Rows(27).EntireRow.Hidden = False
Worksheets("Scenarios").Visible = True
Worksheets("Scenario Charts").Visible = True
Else
Rows(27).EntireRow.Hidden = True
Worksheets("Scenarios").Visible = False
Worksheets("Scenario Charts").Visible = False