欢迎来到天天文库
浏览记录
ID：44811637
大小：565.00 KB
页数：5页
时间：2019-10-29
《EXCEL表启用宏做工资表(每条加标题行)》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、EXCEL表启用宏做工资表（每条加标题行）2、在视图打开宏。3、选择录制宏4、按确定，或修改宏名后按确定。5、再打开“查看宏”6、选择刚才的宏名再按“编辑”键。7、就会看到编程窗口。8、由于这个工资表的标题行为三行，所以，我们的代码如下：9、代码：Range("A4").Select '选中A4这一格h=5i=Selection.End(xlDown).Row'得到最后一行的行号Forj=4Toi-1'利用单前行到最后一行做循环Rows("1:3").SelectSelection.Copy'复制1-3行的数据Rows(h).
2、SelectSelection.InsertShift:=xlDown '选中行，插入行h=h+4'由于插入后行号会变，就是插行号Nextj如图：10、关闭窗口后，再点“停止录制”。11、这样就可以做工资表了。12、但做前，要复制一个来做打印的，因为生成的打印工资表是不是退回去的，也就是说，你生成的打印格式的工资表会和原来的不同，变了样。13、这个就是复制出来的！这个就是复制出来的！14、然后点“查看宏”。15、16、点了后工资表就变成这样，可以打印了！！
此文档下载收益归作者所有
