Hey guys, I have these toggle buttons that will hide/unhide certain row when pressed. However the only one that seems to work is the one that unhides the first set of rows, the others wont work unless I have the first one pressed and unhidden. Help?
'Daily Private Sub ToggleButton1_Click() If ToggleButton1.Value = True Then 'This area contains the things you want to happen 'when the toggle button is not depressed Rows("6:35").EntireRow.Hidden = False Else 'This area contains the things you want to happen 'when the toggle button is depressed Rows("6:35").EntireRow.Hidden = True End If End Sub 'Weekly Private Sub ToggleButton3_Click() If ToggleButton1.Value = True Then 'This area contains the things you want to happen 'when the toggle button is not depressed Rows("36:53").EntireRow.Hidden = False Else 'This area contains the things you want to happen 'when the toggle button is depressed Rows("36:53").EntireRow.Hidden = True End If End Sub 'Monthly Private Sub ToggleButton2_Click() If ToggleButton1.Value = True Then 'This area contains the things you want to happen 'when the toggle button is not depressed Rows("54:64").EntireRow.Hidden = False Else 'This area contains the things you want to happen 'when the toggle button is depressed Rows("54:64").EntireRow.Hidden = True End If End Sub
Bookmarks