Color coding report to excel

[Gaupo]

I have a Db in access which I build reports in excel all works well. I have recently come up with the need to color code records based on priority (e.g 1,2, or 3). I am having trouble building the code color code the excel sheet as it builds.

I have been able to allow for color coding using the access report format: Using

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)

If Me.Color = 3 Then
Me.Detail.BackColor = 255
Else
If Me.Color = 2 Then
Me.ForeColor = 16777215
Me.Detail.BackColor = 16711680
Else
If Me.Color = 1 Then
Me.Detail.BackColor = 8454143
Else
Me.Detail.BackColor = 16777215
End If
End If
End If
End Sub

How can I accomplish the same effect crossing from access to excel reports