Checkbox for hiding/unhiding data

[pencekj]

Hello,

I've added a checkbox with a macro tied to it but can't seem to get it to work right. Currently I've gotten this part working below (hiding and unhiding a tab) but I also want it to hide/unhide rows 6:11 on a separate sheet labeled "Required Info". I feel like I just can't seem to think straight and can't get this working. What would I add into this code to where the button also hides those rows on a separate sheet? The checkbox is not on the same sheet as any of the ones being referenced in the code.

Thanks


Sub DEPButton()

Dim HideSheet As Boolean
HideSheet = Range("G4")

If HideSheet Then
Sheets("Device Enrollment Program (DEP)").Visible = True
Else
Sheets("Device Enrollment Program (DEP)").Visible = False
End If

End Sub

 

[GWteB]

How about ...

Sub DEPButton()

    Dim HideSheet As Boolean
    HideSheet = Range("G4")

    If HideSheet Then
        Sheets("Device Enrollment Program (DEP)").Visible = True
        Worksheets("Required Info").Rows("6:11").Hidden = False
    Else
        Sheets("Device Enrollment Program (DEP)").Visible = False
        Worksheets("Required Info").Rows("6:11").Hidden = True
    End If

End Sub