EXCEL在打印工资条时，如何使每一行都有表头？

2024-12-17 06:34:14

推荐回答（5个）

回答1：

看起来你要打印的不只是一页。那么，要实现第一行都加表头，只好使用VBA了。如果你对VBA不了解的话，加我的QQ：343766938，我可以为你定制一个模板。
大体做法是：在表Sheet1中设计好要打印的第一页的样式（行高与列宽，并安排好单元格边框）；在表Sheet2中输入工资表（包括表头）。然后使用宏自动读取Sheet2的内容，每一行都带一次表头，填入表Sheet1，填满一页后，自动打印，然后继续读取，再次填充到Sheet1的第一页中，打印……

回答2：

我给你一个方法：
打开工资表，重新复制一份。
打开复制的工资表，按ALT+F11，在菜单栏上点“插入”--“模块”，然后把下面这段代码复制进去。关闭这个窗口，回到工资表，按ALT+F8，点执行即可！祝你成功！！！！
Sub 加标题()
Rows(1).Select
Selection.Copy
b = ActiveSheet.UsedRange.Rows.Count - 2
For a = 1 To b
Rows(ActiveCell.Row + 2).Select
Selection.Insert Shift:=xlDown
Selection.Copy
Next
Application.CutCopyMode = False
End Sub

回答3：

你可以在页面设置里面设置工作表打印顶端标题行啊，这样你就可以打印任何一个人的工资条都能打印顶端标题行了。

回答4：

每一行都要表头，实现起来方法有多种。
如果是我的话，我就把每个表头插入到行里面，然后从新生成一个新表，打印的时候打印新表。
如何把表头插入到每行上面呢，自己编一个VBA宏的程序来操作。
这只是一个思路，如果需要我编VBA的话，得赋予我10元服务费。才给你编一个。

回答5：

我做工资条是用WORD邮件合并来做的，你所说的每一行都要有表头我没有做过，不过我建议你用WORD邮件合并来做做看，应该可以实现的。