我想自动生产打印表头,而表头是引用“考勤表”里面的“工资月份”里面的数据,请问如何修改代码,谢谢!代码如下:
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