CSS in VBA, CSS in VBA Opcje

[forestq]

czesc,

mam taki kod ktory dziala OK:

[HTML] pobierz, plaintext 
  Email_Body = Email_Body & "<BR>" & _
            "<ol><li style=""list-style-type: disc""><B>" & Incident_Sev_3_WS.Cells(i, 6).Value & " - " & Incident_Sev_3_WS.Cells(i, 5) & "</B>" & _
            "<ul><li style=""list-style-type: circle""><B>Date: </B>" & Incident_Sev_3_WS.Cells(i, 1).Value & "</li>" & _
            "<li style=""list-style-type: circle""><B>Businesses Affected: </B>" & Incident_Sev_3_WS.Cells(i, 22).Value & "</li>" & _
            "<li style=""list-style-type: circle""><B>Regions Impacted: </B>" & Incident_Sev_3_WS.Cells(i, 15).Value & "</li>" & _
            "<li style=""list-style-type: circle""><B>Business Impact: </B>" & Incident_Sev_3_WS.Cells(i, 23).Value & "</li>" & _
            "<li style=""list-style-type: circle""><B>Incident Description: </B>" & Incident_Sev_3_WS.Cells(i, 4).Value & "</li>" & _
            "<li style=""list-style-type: circle""><B>Root Cause Category: </B>" & Incident_Sev_3_WS.Cells(i, 16).Value & "</li>" & _
            "<li style=""list-style-type: circle""><B>Contact: </B>" & Incident_Sev_3_WS.Cells(i, 8).Value & "</li>/ul></li></ol>" & _
            "<B><font: color:"" red"">" & Incident_Sev_3_WS.Cells(i, 7).Value & "</B>"
[HTML] pobierz, plaintext 

w ostatniej linijce, czyli

[HTML] pobierz, plaintext 
 "<B>" & Incident_Sev_3_WS.Cells(i, 7).Value & "</B>" 
[HTML] pobierz, plaintext 

chce dodac kolor RED dla trzcionki.

prosze o pomoc
z gory dziekuje!