2023年如何将EXCEL工资表数据库打印成带有表头的工资条.pdf

如何将 EXCEL 工资表数据库打印成带有表头的工资条 实现你要求的打印格式程序如下，是根据你的实际表的情况，用宏编写的：Sub Print_table()Sheets(sheet2).Select 5 是工资表上打印的人数减 1，可更改 For i=1 To 5 每个工人工资条下方插入两行，20 是工资表的列数，可根据情况更改，下面三行中的的20 要同时修改。Range(Cells(3*i+1,1),Cells(3*i+2,20).Select Shift:=xlDown 复制表头 Range(Cells(1,1),Cells(2,20).Select Cells(3*i+1,1).Select (1:1).=42 Next Range(a2).Select End Sub 请注意以下几点：1、Excel 启动时，提示是否使用宏，点击“启用宏”。2、此程序认为工资表页面的名称是“sheet2”，如果你的工资表是别的名称，比如说，“一车间”，则把程序第二行中的 sheet2 替换掉，写成 sheets(一车间).select 3、程序装载方法：在页面上点击“工具”-宏-Visual Basic编辑器 在空白的方框里，将上面的程序复制上去，点击编辑器工具栏里的小箭头即可运行程序了。如果光标不在程序中，点击小箭头时，会弹出一个窗口，此时选中宏的名称，点击“运行”即可。4、程序行前面有 的是注释行，是英文字符中的单引号。5、原来的工资表的格式应该是只有最上面一个表头，下面每一行是一位工人的工资条。6、此程序在 winXP下调试通过，建议你先用一页表调试一下。有问题给我发消息，祝你成功！补充：下面的附件你下载后就可以直接使用了。如果要打印“1 月”的表，循环数 i=5 应改为 i=74，因为表上的人数是 75。使用方法：进入 sheet2 页面，点击：工具-宏-执行，所需要的格式就出来了。同时修改复制表头请注意以下几点启动时提示是否使用宏点击启用宏此程序认为工资表页面的名称是如果你的工资表的方框里将上面的程序复制上去点击编辑器工具栏里的小箭头即可运行程序了如果光标不在程序中点击小箭头时会弹该是只有最上面一个表头下面每一行是一位工人的工资条此程序在下调试通过建议你先用一页表调试一下有问题给我