excel自动换行后，打印预览时显示不全

我的excel中，一个单元格设置了自动换行和行高自动调整
在excel中看没有问题，打印预览的时候最后几个字就表示不出来了
在行号出双击的方法我已经试过了，还是不行。

用VBA实现或者设置单元格格式都行，跪求各位高手解答，小弟万分感谢！！

注：该单元格没有夸页。

4 个解决方案

#1

把行高稍微调大点。

#2

单元格的内容是用VBA从CSV文件里读取的。
所以行高和宽不能手动拖动，要的效果是宏加载完以后，行高能自动设定

#3

引用 2 楼 junge110 的回复:

单元格的内容是用VBA从CSV文件里读取的。
所以行高和宽不能手动拖动，要的效果是宏加载完以后，行高能自动设定

那在vba里设置 行高为最合适的行高，如：
sheet1.Rows("1").Rows.AutoFit''将sheet1的第1行设置为最合适的行高。

#4

    第一行增加10个单位，如：
    Rows("1:1").RowHeight = Rows("1:1").RowHeight + 10