vba解决excel打印时线框压住文字的现象

1、打开excel，在下方sheet名字上右键，选择“查看代码”。

2、在打开的vba编辑器中，输入一下代码Sub test() iRowFirst = 4 ' 要加高的第一行 iRowLast = 101 ' 要加高的最后一行 iHeigh = 3 ' 加高的像素，自己调节到合适数值 For i = iRowFirst To iRowLast Rows(i).RowHeight = Rows(i).RowHeight + iHeigh NextEnd Sub

3、点击vba编辑器上方的绿色三角，或按f5，运行脚本。