Checkboxes to enable button

Hey community,

First time posting here and its been a couple days trying to figure this macro out. Before flaming, I'm pretty new at VBA/Macros and have done extensive research. I have a series of 4 checkboxes that needs to be checked off before a button is enabled to be pushed. For some reason I cant find the resolution or make this work.

This is what I have so far:

Private Sub CheckBox1_Click()
    If CheckBox1 Then
    ActiveSheet.Button4.Enabled = True
 Else
    If Not CheckBox2 And Not CheckBox3 Then
    ActiveSheet.Button4.Enabled = False
 End If
 End Sub
 Private Sub CheckBox2_Click()
    If CheckBox1 Then
    ActiveSheet.Button4.Enabled = True
 Else
    If Not CheckBox3 And Not CheckBox4 Then
    ActiveSheet.Button4.Enabled = False
 End If
 End Sub
 Private Sub CheckBox3_Click()
    If CheckBox1 Then
    ActiveSheet.Button4.Enabled = True
 Else
    If Not CheckBox4 And Not CheckBox1 Then
    ActiveSheet.Button4.Enabled = False
 End If
 End Sub
 Private Sub CheckBox4_Click()
    If CheckBox1 Then
    ActiveSheet.Button4.Enabled = True
 Else
    If Not CheckBox1 And Not CheckBox2 Then
    ActiveSheet.Button4.Enabled = False
 End If
 End Sub

With that...Flame suit on!

Thanks for your help.

-Ryan