| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- 打印问题请教 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=75029) |
| -- 作者：yaojun -- 发布时间：2015/9/24 21:24:00 -- 打印问题请教 因为系统需要打印入库单，以前用针式打印机打印几联纸，现在想用A4纸张打印，因为同一客户每天入库笔数很少，所以想在A4纸上同时打印上下两份，自已在从中裁断，一份留档，一份给供应商，请求在一张A4纸上同时打印两份的代码及方式，谢谢！ |
| -- 作者：大红袍 -- 发布时间：2015/9/24 21:26:00 -- 1、是什么报表，excel还是窗口。
2、最简单的方法，就是代码循环执行两次。 |
| -- 作者：yaojun -- 发布时间：2015/9/24 21:33:00 -- 是窗口里有一打印按钮，点击后把筛迭出的行打印成ExceL表 |
| -- 作者：大红袍 -- 发布时间：2015/9/24 21:38:00 -- excel模板报表？ 生成以后打开excel拷贝在下面。
如代码
Dim App As New MSExcel.Application Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("D:\\test.xls") Ws1.UsedRange.Copy app.Visible = True |
| -- 作者：yaojun -- 发布时间：2015/9/24 22:13:00 -- 老师，有点不明白，抱歉！是不是如下做法: 先做好模板，然后把模板复制到D盘，改名为test.xLs，然后再把代码复制到打印按钮下的单击事件啊！ |
| -- 作者：大红袍 -- 发布时间：2015/9/24 22:18:00 -- 做个具体的例子上来。 |
| -- 作者：yaojun -- 发布时间：2015/9/24 22:34:00 -- 抱歉，家里沒网，用手机在上，只能等下次再上例子了，老师能简单说明下步骤吗？我就是有一入库主表，关联一入库明细子表，我现在在窗口中做了个打印按钮，想按下就能打印子表里已经选择的几行，打印在一张A4纸上，一式二份即上下各一份。 |
| -- 作者：大红袍 -- 发布时间：2015/9/24 22:39:00 -- 看一下excel报表。
http://www.foxtable.com/help/topics/2877.htm
|
| -- 作者：大红袍 -- 发布时间：2015/9/24 22:40:00 -- 生成excel报表以后，再拷贝一份
http://www.foxtable.com/help/topics/1145.htm
|