老师您好,我用下面的代码保存一个Table至Excel,对Drawcell中用AddUserStyle高定的单元格的颜色是可以保留在Excel中的,但用e.Style = e.Row.DataRow("Cyan")设置的行的颜色在Excel中不见了。有什么办法保留行的颜色吗?
'示例 Functions.Execute("outputToExcel", Tables(e.Form.Name & "_Table1"))
Dim tb As Table = Args(0)
Dim flg As New SaveExcelFlags
flg.RowNumber = False
flg.CellStyle = True
flg.MergedRanges = True
Dim dlg As New SaveFileDialog '定义一个新的SaveFileDialog
dlg.Filter= "Excel文件|*.xlsx; *.xls" '设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
tb.SaveExcel(dlg.FileName, "sheet1", flg) '保存文件
End If
Dim Proc As new Process
proc.File=dlg.FileName
proc.Verb = "open"
proc.Start()