主题：[讨论]不用报表，能否在打印时使用“缩放”功能，让表格适应打印纸张？

呵呵，那还不简单，在页面设置中进行预览，然后，然后在表中补足空行不就可以了，不需要时删除和隐藏空行不就可以了

egd文件下载

不过，用这个公式可能能够解决您的问题：DelFor(GridName,[第一列] = "" And [第二列] = "" And [第二列] = "" And [第三列] = "") And If(Rows < [%单页行数%],AddRows(GridName,[%单页行数%] - Rows),If(Rows > [%单页行数%],AddRows(GridName,Mod(Rows,[%单页行数%])),""))

这段函数DelFor(GridName,[第一列] = "" And [第二列] = "" And [第二列] = "" And [第三列] = "") 主要是为了删除您以前添加的空行，避免重复添加出现打印空页面的情况

难办了，尽量隐藏一些不需要的列，如果列宽一样的话到是有办法！你好好琢磨SetColWidth()这个命令，试试配合if()函数，改变列宽怎么样！