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
Bookmarks