CheckBox state not passing to the sub - Please Help

If it's a Forms checkbox then your code will not work. That code is for an ActiveX checkbox. You have two options. My personal favorite is delete your checkbox then create an ActiveX checkbox and name it CheckBox9. Use the same code.

Second option is modify your code. Note that you must make it Public and then do Assign Macro for the checkbox to assign it to this code:

Public Sub CheckBox9_Click()
   '
   ' Macro1 Macro

   
   
   If Sheet1.CheckBoxes("check box 9") = 1 Then
      ActiveSheet.Tab.ColorIndex = 35
   Else
      'If CheckBox9 = False Then
      ActiveSheet.Tab.ColorIndex = 15
   End If
   
   
   '
End Sub