主题：[求助]excel报表对角线怎么处理？

我有二个办法，一是将对角线放在第一列，列宽与第二列相同，打开模板时也能正常显示
第二个办法，就是做一个打印按钮，在代码中加上对角线，代码如下：就相当于基于模板，加上对角线
Dim Book As New XLS.Book(ProjectPath & "Attachments\表A.xls") '打开模板
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Dim Style As XLS.Style = Book.NewStyle()
Style.DiagonalStyle= XLS.LineStyleEnum.Thin
Style.DiagonalColor =Color.Red
Style.Diagonal = XLS.DiagonalEnum.Forward
For r As Integer = 0 to 1
Sheet(r,r+1).Style = Style
 Next
  
Book.Build() '生成细节区
Book.Save(ProjectPath & "reports\表A.xls") '保存工作簿
Dim Proc As New Process '打开工作簿
Proc.File = ProjectPath & "reports\表A.xls"
Proc.Start()

注意，代码中红色部分是改线条颜色的，我用的红色线，你可以改成黑色