以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- EXCEL报表中,如何设置子表打印行数? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=14140) |
-- 作者:rcsy001 -- 发布时间:2011/11/9 18:18:00 -- EXCEL报表中,如何设置子表打印行数? EXCEL报表中,如何设置子表打印行数?
EXCEL报表,可以主表子表打印,如果我主表打印后,子表只打印4行(可能子表数据有10行或更多,只打印前4行),如不足4行自动填空行,这个如何设置,或如何实现。
例如: excel报表设置时
<主表>XXXX
<子表>这样设置,会将子表数据都打出来,如果没有数据,就不会打印(这个子表如何设置,能打印指定的行数,如没记录就填空行)
<主表> |
-- 作者:kylin -- 发布时间:2011/11/9 18:25:00 -- 参考:http://www.foxtable.com/help/topics/1393.htm
|
-- 作者:rcsy001 -- 发布时间:2011/11/10 10:20:00 -- 不是要自动添加空行功能,而是要指定行数功能。 如果<=4,自动添加到4行,如果>4行,只保留前4行。 |
-- 作者:狐狸爸爸 -- 发布时间:2011/11/10 10:23:00 -- 二楼没有错 |
-- 作者:rcsy001 -- 发布时间:2011/11/10 10:50:00 -- 如果二楼没有错,就只有两种可能: 1、没有明白我要表达的意思。或说没明白我的需求。 我再说明一下: excel报表设置时
<主表>XXXX
<子表,-4> 这样设置,会将子表数据都打出来,如果没有数据,就不会打印(这个子表如何设置,能打印指定的行数,如没记录就填空行)
<主表>
2、程序有BUG。 |
-- 作者:狐狸爸爸 -- 发布时间:2011/11/10 11:12:00 -- 如果子表没有数据,确实不会打印的。 变通一下,自己写一个打印代码,如果子表没有数据,就Tables("父表.子表").AddNew增加一行,打印完成再Tables("父表.子表").Current.Delete
dim cnt As integer Tables("父表.子表").Rows.Count if cnt = 0 then Tables("父表.子表").AddNew end if \'打印代码 if cnt =0 then Tables("父表.子表").Current.Delete end if |