okay so i have this code

<code>
Dim oexcel As Microsoft.Office.Interop.Excel.Application
Dim obook As Microsoft.Office.Interop.Excel.Workbook
Dim osheet As Microsoft.Office.Interop.Excel.Worksheet


oexcel = New Microsoft.Office.Interop.Excel.Application
obook = oexcel.Workbooks.Open("c:\test\test.xls")
osheet = obook.Worksheets(1)

Dim LastRow As Integer = osheet.UsedRange.Rows.Count
osheet.Range("A" & LastRow.ToString + 1).Value = Date.Now
osheet.Range("B" & LastRow.ToString + 1).Value = TextBox1.Text


obook.Save()
obook.Close()
oexcel.Quit()
oexcel = Nothing
</code>

this code basically writes rows to an excel sheet not overwriting any row but systematically enters new lines every time the button is pressed. each row has a column for type of visit i.e. appointment, new, rush

what i want to do is fill the rows with different colors for example if column "B" on whatever row says appointment i want the whole row to be red. ive never had to program the color of an excel row and could use some help! thanks in advance!!