前段时间给大家写了《如何利用Excel的定位功能快速制作工资条》和《如何制作两行成绩单》的心得体会,用了两种不同的方法。下面介绍一种使用VBA宏代码制作的方法(以制作工资表为例)。
1.比如一些工资单。
2.在工资单标题行上方插入一个空行。
3.选择顶部第一行的空白区域(A1:G1),将边框设置为上下边框线。
4.单击菜单栏中的工具-宏-Visual Basic编辑器,或者直接按Alt F11快捷键,打开VBA编辑窗口。
5.打开VBA窗口
6.点击菜单栏中的“插入”-“模块”。
7.打开模块,并在模块中输入以下代码:
将内容复制到剪贴板
子工资单()
对于i=3到48第3步
范围(' A1:G2 ')。复制
行(I)。挑选
选择。插入Shift:=xlDown
申请。CutCopyMode=False
然后
末端接头
备注:公式可根据实际情况进行修改。
8.保存后,可以点击“运行子流程”按钮,表头行将被添加到每个薪资行中。
9.电流效应
10.删除前三行,最终效果如下。