限制了列宽，行高(RowHeight)也限制下。
创新互联是专业的包河网站建设公司，包河接单;提供成都做网站、成都网站制作,网页设计,网站设计,建网站,PHP网站建设等专业做网站服务;采用PHP框架,可快速的进行包河网站开发网页制作和功能扩展;专业做搜索引擎喜爱的网站,专业的做网站团队,希望更多企业前来合作!
还没验证是否可行，要不你试试：
Columns("A:D").AutoFit
‘AutoFit 可以根据内容调整最合适的列宽。
这可能还不够，字体大小也得控制下。
显然，你会导出的了，就是想设置合适的列宽：
这样，你先打开Excel，使用菜单[工具]--[宏]--[录制新宏]--[确定]，然后：
在表里输入一些文字，选中该列，设置列宽，完了
菜单[工具]--[宏]--[停止录制]，
菜单[工具]--[宏]--[宏]--[编辑]，在编辑窗口看一下代码，你应该可以理解，把适当的代码复制到你的程序里，适当修改一定可以达到理想的目的。
xlSheet.Cells.EntireColumn.AutoFit()'试下这句
' 对象.worksheets(1).Cells.EntireColumn.AutoFit()是可以的，我在vb.net中测试无问题