I am getting an "Object required" Error when I run this code. I want the colorindex of these cells to change before it prints. Is there another way to have this code work? Can I not reference an object on the spreadsheet in the This Workbook section? Thanks in advance. Matt

Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.BlackAndWhite = True
If cbExempt.Value = True Then
Range("C31,E31,G31,I31,K31,M31,O31").Font.ColorInd ex = 2
End If
End Sub