主题：单价分析表打印设置问题？

我打不开文件 我估计是公式是：
report() and report() and report()

是将所有的编号筛选后打印

是怎么筛选的? 我怎么试,都是要点很多次啊.[[[我点了打印后,预览,然后预览页我不要打印,选择关闭的话,就要关很多次才能关完(似乎是总页数的次数).]]]

这是六楼打印按键的公式

CloseWindow() And eval("FilterFor(""编号"",""="","""+Substitute([%A%],"|",""",2) And Report(Grid,""单价分析表"",1,Rows,0,1) And FilterFor(""编号"",""="",""")+""",2) And Report(Grid,""单价分析表"",1,Rows,0,1)") And ShowAllRows()

奇怪,是只在我机器上有这情况,还是你们运行 ,也会出现这样的情况?

正常的
FilterFor() and Report() and FilterFor() and Report() and FilterFor() and Report()

每个Report()都要关闭一次 预览窗口

直接打印的话完全满足楼主的要求

6楼的公式我已经测试过了！我们这里的打印机可以双面打印。按6楼的公式打印不了双面呀！但是不使用汇总模式就打不出分组。所以还是让它有最后一行空白就算了。

egd文件下载
用分组报表较好点

頁碼公式改為：Concat("第 ",CurrentPage," 頁 ,共 ",len([%A%]) -len(Substitute([%A%],"|",""))+1 ," 頁")，則可不要“N”列及相應公式。

上传的文件怎么打不开呀！

俺的是繁體版本，按鈕公式：DelFor(Grid,"項目編號","=","")AndSubtotal("編號","","")AndEvalFor(Grid,16,"cell(row-1,16)",16,"=","")AndEvalFor(Grid,17,"cell(row-1,17)",17,"=","")AndEvalFor(Grid,18,"cell(row-1,18)",18,"=","")AndEvalFor(Grid,19,"cell(row-1,19)",19,"=","")AndEvalFor(Grid,20,"cell(row-1,20)",20,"=","")AndFilterFor("編號",">","")AndReport(Grid,"單價分析表",0,0,0,1)AndClearSubtotal()，報表設計為分組報表，頁碼公式見17樓。

EvalFor(Grid,16,"cell(row-1,16)",16,"=","")AndEvalFor(Grid,17,"cell(row-1,17)",17,"=","")AndEvalFor(Grid,18,"cell(row-1,18)",18,"=","")AndEvalFor(Grid,19,"cell(row-1,19)",19,"=","")AndEvalFor(Grid,20,"cell(row-1,20)",20,"=","")这段代码在按钮的作用是什么。