格式化单元格
XLS.Cell类型除了有Value属性用于设置单元格的值外,还有一个Style属性用于设置单元格的样式。
样式的类型为XLS.Style,该类型有很多属性,例如ForeColor用于设置单元格字体的颜色。
XLS.Book有一个NewStyle方法,用于创建一个新的样式。
复制下面的代码到命令窗口执行,可以看到第一列偶数行单元格的字体颜色被设成红色:
Dim
Book
As New XLS.Book
Dim Sheet As
XLS.Sheet = Book.Sheets(0)
Dim Style As
XLS.Style = Book.NewStyle() '定义新样式
Style.ForeColor = Color.Red '设置样式的字体颜色
For i As
Integer =
0
To
9
Sheet(i, 0).Value
= i
If i
Mod
2 =0
Then
'如果是偶数行
Sheet(i,0).Style
=Style '设置单元格样式
End
If
Next
Book.Save("c:\reports\test.xls")
Dim Proc As
New Process
Proc.File = "c:\reports\test.xls"
Proc.Start()
样式的其它属性将在后面介绍。
本页地址:http://www.foxtable.com/webhelp/topics/1146.htm