Excel中使用VBA快速制作工资条的详细教程
时间:2023-11-14 01:55:13
excel中制作工资表虽然很简单,但是如果使用VBA宏代码可以更方便的完成,虽然这种方法很少使用但是确实很方便,下面分享用VBA快速制作工资条的详细教程,需要的朋友可以参考下
前段时间给大家写过“如何使用Excel的定位功能快速制作工资条”和“如何制作双行成绩单”这样的经验,使用了两种不同的方法。下面再给大家介绍一种使用VBA宏代码制作的方法(以制作工资条为例)。
1、例如有如下图所示的工资表。
2、在工资表标题行上方插入一空行(如下图所示)。
3、选中顶部第一行空白区域(A1:G1),设置边框为上下框线(如下图所示)。
4、单击菜单栏“工具”—“宏”—“Visual Basic编辑器”或直接按下Alt+F11快捷键打开VBA编辑窗口。
5、打开的VBA窗口如下图所示。
6、单击菜单栏“插入”—“模块”。
7、打开模块,并在模块中输入下列代码:
复制内容到剪贴板
Sub 工资条()
For i = 3 To 48 Step 3
Range("A1:G2").Copy
Rows(i).Select
Selection.Insert Shift:=xlDown
Application.CutCopyMode = False
Next
End Sub
备注:公式可以根据实际情况来修改哦。
8、保存后,可以单击“运行子过程”按钮,就会在每个工资行上添加上标题行。
9、现在效果如下图所示。
10、删除掉前三行,最后的效果如下所示。
标签:Excel,VBA,工资条
![](/images/zang.png)
![](/images/jiucuo.png)
猜你喜欢
关闭windows系统自动更新的小窍门
2023-04-03 03:25:55
![](https://img.aspxhome.com/file/2023/4/a307932_0s.png)
Win10将在1月21日发布 微软会将有哪些惊喜?
2023-12-17 11:37:08
![](https://img.aspxhome.com/file/2023/29/a252276_0s.jpg)
Win11没有检查到更新或安装22H2怎么办?没有检查22H2更新的解决方法
2023-11-22 10:17:49
![](https://img.aspxhome.com/file/2023/27/a234800_0s.png)
excel2007如何设置选框颜色
2023-12-15 01:38:41
如何使用WPS实现(制作)带斜线表头的表格
2023-03-14 02:20:53
word文本替换怎么用
2023-01-02 04:29:49
![](https://img.aspxhome.com/file/2023/9/32579_0s.jpg)
Word自动编号问题,认识编号新大陆
2023-10-24 09:39:25
![](https://img.aspxhome.com/file/2023/0/22530_0s.gif)
EXCEL不同单元格需要输入密码后才能修改
2022-04-28 05:03:06
word表格文字上面有空白但上不去怎么解决?两种方法教给你!
2022-08-15 12:21:22
![](https://img.aspxhome.com/file/2023/30/a267035_0s.jpg)
wps文字如何使用书签功能
2022-03-31 18:41:32
鼠标左右键互换怎么设置?Win10鼠标左右键互换方法
2023-04-10 19:02:23
![](https://img.aspxhome.com/file/2023/26/a225299_0s.jpg)
在Excel单元格中输入汉字“○”的两种方法
2023-10-27 16:47:44
在低版本的Excel中如何打开高版本的Excel文件
2022-10-01 15:29:50
![](https://img.aspxhome.com/file/2023/1/a143511_0s.jpg)
怎样对Excel2003文件加密
2022-03-16 13:34:38
![](https://img.aspxhome.com/file/2023/9/38789_0s.jpg)
Win11怎么运行安卓应用 如何在Win11上运行安卓应用
2022-03-20 14:19:56
![](https://img.aspxhome.com/file/2023/27/a238613_0s.jpg)
Excel2013怎么使用Power View插入地图?
2022-12-30 22:12:52
![](https://img.aspxhome.com/file/2023/4/40354_0s.jpg)
如何在WPS2016中设置页码?
2022-01-27 07:26:16
![](https://img.aspxhome.com/file/2023/4/a170144_0s.jpg)
win101903怎么关闭自动更新?win101903关闭自动教程
2023-11-13 17:37:51
![](https://img.aspxhome.com/file/2023/9/47929_0s.jpg)
橙瓜码字如何编辑大纲?橙瓜码字编辑大纲的操作流程介绍
2023-06-04 08:50:24
![](https://img.aspxhome.com/file/2023/1/15081_0s.jpg)
word2007汉字怎么拆分笔画 word巧妙拆分汉字方法
2022-11-26 18:32:57
![](https://img.aspxhome.com/file/2023/4/24604_0s.jpg)