狐表的图表做出来 数据显示的位置太不好用了 想用excel里的图表我预先在excel里把图表做好 定义好数据区域 然后用狐表往里写数据
数据写进去没问题 但是excel里我设计的图表都没有了
Dim Book As New XLS.Book(ProjectPath & "Attachments\客户信息统计.xls")
Dim Sheet As XLS.Sheet = Book.Sheets(1) '引用工作簿的第二个工作表
Dim i As Integer = 0
For Each cl As Col In Tables("统计").Cols
Sheet(i, 0).Value = cl.Name
Sheet(i, 1).Value = Tables("统计").Rows(0)(cl.Name)
i = i + 1
Next
Book.Save("c:\reports\test.xls") '保存工作簿
Dim Proc As New Process '打开工作簿
Proc.File = "c:\reports\test.xls"
proc.Start()