主题：EXCEL报表行高自动调节的问题

 需要用代码解决。

 生成报表以后，打开报表，设置如下代码

Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("D:\Report.xls")
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
Dim Rg As MSExcel.Range = Ws.Cells
Rg.EntireColumn.AutoFit   '自动调整列宽
Rg.EntireRow.AutoFit  '自动调整行高
App.Visible = True

 1、生成报表 http://www.foxtable.com/help/topics/1145.htm

 2、复制代码设置自动行高

这个就木有办法了。在excel里面，可以通过合并单元格增加n个409的高度。

你可以在设计报表的时候，多加几行，过后，用vba合并所有的单元格才行

你是在excel那里设置么？合并以后，肯定是可以超过409的

 不可行。不能合并。

 要么用专业报表来做，最后生成pdf；要么用excel来做，合并多行单元格扩展高度

 其实做成专业报表也不难，直接套用代码即可。

 如果想用excel做，你就做个例子上来吧，如果你的报表不复杂，用vba处理起来也不复杂，一般用10行左右就足够高度了吧。