- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- EXCEL打印的问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=78602)
-- 发布时间：2015/12/12 15:57:00
-- EXCEL打印的问题
老师帮我看看，我设计的工资条模板和打印给是有问题，无法批量打印和按日期选择打印，只能根据光标位置显示
-- 发布时间：2015/12/12 16:04:00
--
打印前设置一下Tables("工资").Filter = "日期 < ......"
模板加上<All>标签
| <End> | ||||||
| <工资,7> | 日期 | 工号 | 部门 | 姓名 | 基本工资 | <ALL> |
| [日期] | [工号] | [部门] | [姓名] | [基本工资] | ||
| 职务工资 | 病假 | 标准工资 | 实发工资 | |||
| [职务工资] | [病假] | [标准工资] | [实发工资] | |||
| <工资> | ||||||
| <End> |
[此贴子已经被作者于2015/12/12 16:05:10编辑过]
-- 发布时间：2015/12/12 16:14:00
--
我原来做的其他报表不用设<ALL>，
用Dim Sheet As XLS.Sheet = Book.Sheets(0)
Sheet(2,6).Value = "< 日期 >= #" & e.Form.Controls("DateTimePicker1").Value & "# And 日期 <= #" & e.Form.Controls("DateTimePicker2").Value & "#" \'写入打印条件
就进行控制了
设<ALL>全部就显示了，上述代码的日期选择就无效了啊
[此贴子已经被作者于2015/12/12 16:14:42编辑过]
-- 发布时间：2015/12/13 13:10:00
--
Sheet(2,6).Value
改成
Sheet(1,6).Value