主题：[求助]

我使用的是开发版2018

我的Excel文件正文使用的文字大小是18，现需要对第6行开始，第5列中以"《"开头的单元格加黑

我的程序如下（用模板生成的Excel文件，再加工）

Dim fl As String = "E:\账页.xls"

Dim Book1 As New XLS.Book(fl)            '定义一个Excel工作簿

Dim Sheet As XLS.Sheet = Book1.Sheets(0)     '引用工作簿的第一个工作表

Dim Style As XLS.Style = Book1.NewStyle     '定义样式

Style.FontBold = True                 ' 加粗

For i As Integer = 5 To sheet.Rows.Count - 1

    If  sheet(i,4).Text Like "《*"  then

       Sheet(i,4).Style = Style

       Sheet(i,5).Style = Style       '第5·6两列加粗

    End If

Next

运行后确实实现了应该突出的内容加粗变黑的要求，但是字号变小了，大小为12

如何能保持原来字体大小，或者加入怎样的代码设置字体大小。

再请教一下，就以上这种模式，如何用代码设置斜体和下划线。

谢谢赐教！