以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  EXCEL报表中,如何设置子表打印行数?  (http://www.foxtable.com/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