- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 打印标题设计 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=178357)
-- 发布时间：2022/7/1 10:52:00
-- 打印标题设计
我想自动生产打印表头，而表头是引用“考勤表”里面的“工资月份”里面的数据，请问如何修改代码，谢谢！
代码如下：
Tables("考勤表").HideUnSelectedRows()
\'打印代码
With Tables("考勤表").PrintInfo
.Title = "_____年_____月 考勤表"
.LandScape = True
.LeftMargin = 10
.RightMargin =10
.TopMargin =10
.BottomMargin = 10
.PageFooter = "第[PageNo]页,共[PageCount]页"
.PageFooterLine = True
.PaperKind = 9
.FitIntoPage = True
End With
Tables("考勤表").Print(True,False)
Tables("考勤表").Filter = ""
图片如下：
此主题相关图片如下：考勤表2.png
-- 发布时间：2022/7/1 11:06:00
--
.Title = Tables("考勤表").current("工资月份").insert(4,"年") & "月 考勤表"
-- 发布时间：2022/7/1 12:22:00
--
谢谢蓝老师，非常好