http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=91278
只能在输出报表后用代码处理
Dim Book As New XLS.Book("c:\reports\test.xls") '定义一个Excel工作簿
Dim Sheet As XLS.Sheet = Book.Sheets(0) '引用工作簿的第一个工作表
Dim Style As XLS.Style = Book.NewStyle() '定义新样式
Style.WordWrap = True
Sheet.Cols(0).Style = Style '设置第1列的样式
Book.Save("c:\reports\test.xls")
Dim Proc As New Process
Proc.File = "c:\reports\test.xls"
Proc.Start()