vb.net设置单元格的颜色

一学就用！最近为硬件部搞测试软件，用VB.NET，需要把测试结果保存到excel文档。

其中某个功能是EXCEL 的单元格需要设置颜色。

        Dim oExcel As New Microsoft.Office.Interop.Excel.Application
        Dim obook As Microsoft.Office.Interop.Excel.Workbook
        Dim oSheet As Microsoft.Office.Interop.Excel.Worksheet

        obook = oExcel.Workbooks.Open(Application.StartupPath & "\testrecord.xls")
        oSheet = obook.Worksheets(1)

            With oSheet
                .Range(.Cells(10, 7), .Cells(recordindex, 18)).Interior.ColorIndex = 33
            End With