主题：关于打印Excel自动换行

设置成多行，成这样了，但是我理想的结果是多行并且字迹是清楚可见的，可以设置吗？
此主题相关图片如下：1.png

有人回应下吗？着急

只是高度调整了啊，后面有内容没有显示出来
此主题相关图片如下：2.png

设置可以折行怎么设置

 

亲回应下啊

我已经设置自动换行属性了，但是结果就是如四楼

我用这个怎么把模板调出来了，

这个是需要放在

'Dim Book As New XLS.Book(ProjectPath & "Attachments\订单明细.xls")
'Book.Build() '生成细节区
'Book.Save(fl) '保存工作簿
'Dim Proc As New Process '打开工作簿
'Proc.File = fl
'Proc.Start()

之后的吗

Attachment和Report为啥要存在两个啊

 

结果还是一样

此主题相关图片如下：1.png

正常的应该是如下

 

此主题相关图片如下：2.png

后面一段没有显示出来看见了吗？我已经设置自动换行了，你们看下怎么回事那

代码如下

DataTables("订单表").Save
DataTables("订单明细表").Save
Dim Book As New XLS.Book(ProjectPath & "Attachments\订单明细.xls")
Dim fl As String = ProjectPath & "Reports\订单明细.xls"
Dim App As New MSExcel.Application
Book.Build() '生成细节区
Book.Save(fl) '保存工作簿
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open(fl)
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
Dim Rg As MSExcel.Range = Ws.Cells
Rg.EntireRow.AutoFit  '自动调整行高
App.Visible = True