Color coding calendar report for a checkbox field

I have a calendar report that uses the following formula: Case(true,[Date of Event]=Today(), "#2f9d66", [Date of Event]<=Today(),"pink", [Date of Event]>=Today(),"#ffffb3",) This works well. I w...