水晶报表分页汇总 收藏 水晶报表分页汇总建三个公式字段，第一个(公式 1)输入下面的公式：whileprintingrecords;global numbervar ptotal;ptotal:=0;第二个(公式 2)输入下面的公式：whileprintingrecords;global numbervar ptotal;ptotal := ptotal + 要汇总的字段 ;如果要汇总的字段不是数字，就用 tonumber()函数转换；第三个(公式 3)输入下面的公式：whileprintingrecords;global numbervar ptotal;把公式 1 放在页眉，公式 2 放在详细资料，并隐藏公式 1 和公式 2；把公式 3 放在页脚，格式公式 3，设置为你要显示的格式。这样就行了。水晶报表分页并自动插入空白行 在论坛上经常会看到水晶报表分页的问题，这个很好解决。但是自动插入空白行的问题却一直没有很好的答案，经过研究找到一个变通的办法来实现了。 分页在详细资料上点格式化节，在后面页新建页打勾公式中输入：if _disibledevent= FALSE else if RecordNumber mod 5 =0 thenFORMULA = TRUEelseFORMULA = FALSEend ifend if(BASIC 语法)- 最后页不足，用空行填充：新增一个空白详细资料行，格式化此节，在抑制显示(无深化) 打勾公式中输入：if not _disibledevent= TRUEelseif (RecordNumber mod 5 = 1) then 第一个,1FORMULA = TRUE elseFORMULA = FALSE end ifend if(BASIC 语法) .接着第二个 新增一个空白详细资料行，格式化此节，在抑制显示(无深化)打勾 ： 公式中输入：if not _disibledevent= TRUEelseif (RecordNumber mod 5 = 2) then 第二个,2FORMULA = TRUE elseFORMULA = FALSE end ifend if .接着第三个 新增一个空白详细资料行，格式化此节，在抑制显示(无深化)打勾 ： 公式中输入：if not _disibledevent= TRUEelseif (RecordNumber mod 5 = 3) then 第三个,3FORMULA = TRUE elseFORMULA = FALSE end ifend if 在论坛上经常会看到水晶报表分页的问题，这个很好解决。但是自动插入空白行的问题却一直没有很好的答案，经过研究找到一个变通的办法来实现了。 分页在详细资料上点格式化节，在后面页新建页打勾公式中输入：if _disibledevent= FALSE else if RecordNumber mod 5 =0 thenFORMULA = TRUEelseFORMULA = FALSEend ifend if(BASIC 语法)- 最后页不足，用空行填充：新增一个空白详细资料行，格式化此节，在抑制显示(无深化) 打勾公式中输入：if not _disibledevent= TRUEelseif (RecordNumber mod 5 = 1) then 第一个,1FORMULA = TRUE elseFORMULA = FALSE end ifend if(BASIC 语法) .接着第二个 新增一个空白详细资料行，格式化此节，在抑制显示(无深化)打勾 ： 公式中输入：if not _disibledevent= TRUEelseif (RecordNumber mod 5 = 2) then 第二个,2FORMULA = TRUE elseFORMULA = FALSE end ifend if .接着第三个 新增一个空白详细资料行，格式化此节，在抑制显示(无深化)打勾 ： 公式中输入：if not _disibledevent= TRUEelseif (RecordNumber mod 5 = 3) then 第三个,3FORMULA = TRUE elseFORMULA = FALSE end ifend if .(同理第四个，即最后 5-1 个) （注：此方法适用于行数较少，上面是为 5 行为例，不过不觉得麻烦，对行数较多也可以用）.( 同理第四个，即最后 5-1 个)