Is there a simple way to hide columns and a checkbox at the same time using an additional checkbox?

I already have the following working to hide the columns with a checkbox, but the checkbox with in the column seems to stay and I can't seem to get it to hide as well.

Sub RiskAssess_Click()
Columns("C:G").EntireColumn.Hidden = Not Range("A4").Value
End Sub