Foxtable(狐表)用户栏目专家坐堂 → excel报表,我只想打印数据表的前10行,怎么设置打印范围


  共有2570人关注过本帖树形打印复制链接

主题:excel报表,我只想打印数据表的前10行,怎么设置打印范围

帅哥哟,离线,有人找我吗?
fntfgz
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:424 积分:5115 威望:0 精华:0 注册:2012/11/16 8:21:00
excel报表,我只想打印数据表的前10行,怎么设置打印范围  发帖心情 Post By:2019/6/17 8:34:00 [只看该作者]

如题,尽量不用选定的方式,可以从模板里设置吗?

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

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/6/17 8:38:00 [只看该作者]

1、不可以在模板设置

 

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

 

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

 


 回到顶部
帅哥哟,离线,有人找我吗?
fntfgz
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:424 积分:5115 威望:0 精华:0 注册:2012/11/16 8:21:00
  发帖心情 Post By:2019/6/17 8:58:00 [只看该作者]

老师,怎么把表格筛选设置为显示前10条记录呢

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By: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 & ")"

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/6/17 11:43:00 [只看该作者]

以下是引用fntfgz在2019/6/17 8:58:00的发言:
老师,怎么把表格筛选设置为显示前10条记录呢

 

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

 

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


 回到顶部
帅哥哟,离线,有人找我吗?
fntfgz
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:424 积分:5115 威望:0 精华:0 注册:2012/11/16 8:21:00
  发帖心情 Post By:2019/6/19 7:47:00 [只看该作者]

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

 回到顶部