以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  excel报表,我只想打印数据表的前10行,怎么设置打印范围  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=136595)

--  作者:fntfgz
--  发布时间:2019/6/17 8:34:00
--  excel报表,我只想打印数据表的前10行,怎么设置打印范围
如题,尽量不用选定的方式,可以从模板里设置吗?

[此贴子已经被作者于2019/6/17 8:35:42编辑过]

--  作者:有点甜
--  发布时间:2019/6/17 8:38:00
--  

1、不可以在模板设置

 

2、你可以写代码处理,模板设置条件为<All>,然后,你对表格进行筛选。这样模板就答应你筛选出来的数据。

 

3、或者直接编写条件,如 http://www.foxtable.com/webhelp/scr/2626.htm

 


--  作者:fntfgz
--  发布时间:2019/6/17 8:58:00
--  
老师,怎么把表格筛选设置为显示前10条记录呢
--  作者:有点甜
--  发布时间:2019/6/17 11:29:00
--  
Dim ids As String = "-1,"
Dim t As Table = Tables("表A")
For i As Integer = 0 To 9
    If t.Rows.count > i Then
        ids &= t.Rows(i)("_Identify") & ","
    End If
Next
t.filter = "_Identify in (" & ids & ")"

--  作者:有点甜
--  发布时间:2019/6/17 11:43:00
--  
以下是引用fntfgz在2019/6/17 8:58:00的发言:
老师,怎么把表格筛选设置为显示前10条记录呢

 

你也可以直接选定前10行,如

 

Tables("表A").Select(0, 0, 9, 0)


--  作者:fntfgz
--  发布时间:2019/6/19 7:47:00
--  
有点甜老师,您太用心了,一个小回复,您竟回复了两次,向狐表致敬,向您致敬,你们的服务是我买永开的最大的原因,感觉咱们官方的服务就值这个钱,我一个小白自己学点编程以前太难了,是您耐心的指导帮我一步步的树立信心的,非常非常感谢您
[此贴子已经被作者于2019/6/19 7:48:43编辑过]