Access交流中心

北京 | 上海 | 天津 | 重庆 | 广州 | 深圳 | 珠海 | 汕头 | 佛山 | 中山 | 东莞 | 南京 | 苏州 | 无锡 | 常州 | 南通 | 扬州 | 徐州 | 杭州 | 温州 | 宁波 | 台州 | 福州 | 厦门 | 泉州 | 龙岩 | 合肥 | 芜湖 | 成都 | 遂宁 | 长沙 | 株洲 | 湘潭 | 武汉 | 南昌 | 济南 | 青岛 | 烟台 | 潍坊 | 淄博 | 济宁 | 太原 | 郑州 | 石家庄 | 保定 | 唐山 | 西安 | 大连 | 沈阳 | 长春 | 昆明 | 兰州 | 哈尔滨 | 佳木斯 | 南宁 | 桂林 | 海口 | 贵阳 | 西宁 | 乌鲁木齐 | 包头 |

报表如何逐页多份打印

飞飞  发表于:2019-04-15 09:09:10  
复制

各位大神们,我用Access报表打印商品标签,每个报表可能有几百页,每页打印两份,我想要以第一页打印两份,第二页打印两份...的顺序打印报表,请问该怎么做?

我现在用的是1)DoCmd.PrintOut acPrintAll, , , , 2,这样是打印出来页码虽是排好序的,但要所有页都打完才双从第一页开始打印第二份;2)而用DoCmd.PrintOut acPages, , , , 2,0打印出来是第一面两份,第二页两份,但当页数多至上百甚至几百页时,页码是不排序的;3)第三种方法循环使用方法1将每个页打印两份,效果同第二种方法是一样的可能出现乱序

             For i = 1 To LastPage - FirstPage + 1
                DoCmd.PrintOut acPages, i, i, , 2
             Next
请求各位大神有没有好的解决方法能达到我要的逐页多份打印结果排序的效果?谢谢了!!!

 

Top
天空 发表于:2019-04-15 10:18:46
用针式打印机,两联。

飞飞 发表于:2019-04-15 12:05:57
谢谢你,我用的是斑马的标签打印机,无法更换别的打印机的

蒋元根 发表于:2019-04-15 18:25:20

供参考:

点击下载此附件



飞飞 发表于:2019-04-16 12:55:33

非常感谢蒋元根大师的思路,问题得以圆满解决,以下是我的查询设计,因为有where条件不加order by是做不到逐页多份的,没有where可以不加order by。

SELECT 盒.id, 盒.行号, 盒.产品名称, 盒.MODEL, 盒.产品编码, 盒.ICCID_7_首, 盒.ICCID_7_尾, 盒.ICCID_首, 盒.ICCID_尾, 盒.ICCID, 盒.盒号, 盒.watermark, 盒.p, 盒.s
FROM 盒份数, 盒
WHERE (((盒.s)=True))
ORDER BY 盒.行号;



飞飞 发表于:2019-04-16 16:17:36



总记录:5篇  页次:1/1 9 1 :