易表在线答疑技术与交流用户社区 → [求助]公式修改


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

主题:[求助]公式修改

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


加好友 发短信
等级:超级版主 帖子:16190 积分:125850 威望:1 精华:0 注册:2006/8/12 12:29:00
  发帖心情 Post By:2011/12/29 10:28:00 [显示全部帖子]

这样试试?
HideRowsFor("打印标识","=",-1) And
If(VisibleRows=0,
MsgBox("当前记录已全部打印过",0) And Do(112),
If(MsgBox("当前未打印"+Text(VisibleRows)+"行是否全部打印?",2,4),
EvalFor(GridName,"打印标识","-1") And Report(Gridname,"表格打印",1,Rows,1) And Do(112),
Do(112)))

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


加好友 发短信
等级:超级版主 帖子:16190 积分:125850 威望:1 精华:0 注册:2006/8/12 12:29:00
  发帖心情 Post By:2012/1/4 12:09:00 [显示全部帖子]

HideRowsFor("打印标识","=",-1) And Report(Gridname,"表格打印",1,Rows,1)

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


加好友 发短信
等级:超级版主 帖子:16190 积分:125850 威望:1 精华:0 注册:2006/8/12 12:29:00
  发帖心情 Post By:2012/1/6 10:49:00 [显示全部帖子]

HideRowsFor("打印标识","=",-1) And Report(Gridname,"表格打印",1,Rows,1) And EvalFor(GridName,"打印标识","-1")

 回到顶部