此主题相关图片如下:3.png
![dvubb 图片点击可在新窗口打开查看](UploadFile/2016-3/201632516441769409.png)
如上图,因为在数据的长度并不一样,希望在生成excel格式时候:
1.若超过规定格子宽度的能自动换行;
2.若换行之后,格子高度能自动调节,但只是针对此选中的细节区,不希望这个报表都自动调节格子的高度;
3.因一张A4纸的长度有限制,希望到细节区的表格长度超过一定数的时候能自动换页,而不是根据表格的列来自动换行;
请问应该如何处理,是在报表中设置还是在生成报表中代码进行增加;
Dim Book As New XLS.Book(ProjectPath & "Attachments\Greport.xls")
Dim fl As String = ProjectPath & "Reports\Greport.xls"
Book.Build() '生成细节区
Book.Save(fl) '保存工作簿
Dim Proc As New Process '打开工作簿
Proc.File = fl
Proc.Start()