报表要打印出来给领导签字,每行数据后面得空一行。一百多行手动点插入,点到最后手酸,还容易漏掉中间几行。这种活有现成的笨办法,两分钟搞定。
辅助列写序号,排完再排回来
在数据右侧的空列,第一行写 1,第二行写 2,往下填充到最后一行。再接着往下写 1.5、2.5、3.5,同样填充到与数据行数一致。选中这两列一起按数值升序排,顺序就变成 1、1.5、2、2.5,中间自然空出一行。排完把辅助列删掉,数据原来的顺序没有乱。
空白行怎么把格式带上
直接排序出来的空行没有任何格式,边框会断开。想保留边框和行高,先复制一行空白格式进去,或者整表套用表格样式,排序后边框自己会接上。打印区域也要重新框一次,否则新插的行落在区域外,打不出来。
几千行就换 VBA
数据过五千行,辅助列排序会明显卡,屏幕一片灰,还容易被同事误点。按 Alt+F11 打开编辑器,写一个从末行往前循环、每隔一行插入整行的宏,几秒跑完。跑之前先备份,宏执行完没有撤销。
只打印的话有更快的路
不需要真的插行,只想打印时松一点。把行高调到两倍,或者在页面设置里调缩放,也能得到类似的版面。代价是后续还要在表里算数,虚的行高会误导眼睛,统计函数也按真实行数走。
遇上合并单元格,排序会直接报错
表里只要有合并过的格子,排序立刻弹出提示,说此操作要求合并单元格具有相同大小。先把合并拆掉,排完再合回去。拆之前记住哪几格是合并的,否则回头对不上位置。别人做好的模板最常遇到这种情况,自己从头建的表反而少。拆开前先复制一份留底,改坏了还能退。
打印前把分页预览拉一遍
插完空行总行数翻倍,原来的分页全乱,可能一行数据被切到两页。切到分页预览,拖蓝线把每组数据整块放进一页。页脚留出签字的位置,别贴着纸边。行高不够就把空白行压成半行,省纸也整齐。出纸前翻两页看看,比打完再重来省事。
数据还要继续用,就用辅助列排序;只出纸质版,调行高更省事。两种别混着来。