[求助]怎样批量打印一天的包车单？ - 用户社区 - 易表在线答疑 - 简单实用的数据管理软件|数据统计软件|数据分析软件|电子表格软件

易表在线答疑 → 技术与交流 → 用户社区 → [求助]怎样批量打印一天的包车单？

共有24917人关注过本帖树形打印复制链接主题：[求助]怎样批量打印一天的包车单？

家徒四壁空

小大 31楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：论坛游民帖子：168 积分：0 威望：0 精华：0 注册：2007/12/1 14:30:00

Post By：2007/12/9 22:24:00 [只看该作者]

[UploadFile=1BD1E11CB1E31B11_1197210217.bmp]

这是我的报表设计，请指点！

smileboy

小大 32楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：8672 积分：1734 威望：0 精华：0 注册：2006/8/11 10:52:00

Post By：2007/12/9 23:33:00 [只看该作者]

按钮公式：
if(MsgBox("确定打印吗?",2),Do(112) And eval("FilterFor(""司机"",""="","""+Substitute(ListFor("车辆库","司机",1),"|",""") And Report(GridName,""司机营业额统计报表"",0,0,1) And Do(112) And FilterFor(""司机"",""="",""")+""") And Report(GridName,""司机营业额统计报表"",0,0,1)") And MsgBox("打印完毕！",0), True )

家徒四壁空

小大 33楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：论坛游民帖子：168 积分：0 威望：0 精华：0 注册：2007/12/1 14:30:00

Post By：2007/12/10 0:03:00 [只看该作者]

我试了两次，两次死机！

-=-=-=- 以下内容由 家徒四壁空 在 2007年12月10日 00:05am 时添加 -=-=-=-
第一次我设在菜单方案大图标中，
第二次我设在查询窗口自定义按钮中。

家徒四壁空

小大 34楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：论坛游民帖子：168 积分：0 威望：0 精华：0 注册：2007/12/1 14:30:00

Post By：2007/12/10 0:31:00 [只看该作者]

[UploadFile=1D31A61D31C31B31_1197217887.bmp]

程兴刚

小大 35楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：4639 积分：133 威望：0 精华：0 注册：2006/9/23 19:23:00

Post By：2007/12/10 0:43:00 [只看该作者]

这样试试：

if(MsgBox("确定打印吗?",2),Do(112) And eval("FilterFor(""司机"",""="","""+Substitute(ListFor("车辆库","司机",1),"|",""") And"+"Report"+"(GridName,""司机营业额统计报表"",0,0,1) And Do(112) And FilterFor(""司机"",""="",""")+""") And Report(GridName,""司机营业额统计报表"",0,0,1)") And MsgBox("打印完毕！",0), True )

家徒四壁空

小大 36楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：论坛游民帖子：168 积分：0 威望：0 精华：0 注册：2007/12/1 14:30:00

Post By：2007/12/10 1:14:00 [只看该作者]

也一样！

程兴刚

小大 37楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：4639 积分：133 威望：0 精华：0 注册：2006/9/23 19:23:00

Post By：2007/12/10 1:28:00 [只看该作者]

哦，刚才没看全，疏忽，再试试：

if(MsgBox("确定打印吗?",2),Do(112) And eval("FilterFor(""司机"",""="","""+Substitute(ListFor("车辆库","司机",1),"|",""") And"+"Report"+"(GridName,""司机营业额统计报表"",0,0,1) And Do(112) And FilterFor(""司机"",""="",""")+""") And "+"Report"+"(GridName,""司机营业额统计报表"",0,0,1)") And MsgBox("打印完毕！",0), True )