当前位置 : 主页 > 操作系统 > 电脑知识 >

实用Excel技巧分享:两种快捷制作工资条的方法

来源:互联网 收集:自由互联 发布时间:2023-08-09
在之前的文章《实用Excel技巧分享:制作一张智能的考勤表》中,我们了解了制作智能考勤表的方法。今天分享两种最快捷的工资条制作方法,10秒钟2000人,快来看看! 第一种:添加辅

在之前的文章《实用Excel技巧分享:制作一张智能的考勤表》中,我们了解了制作智能考勤表的方法。今天分享两种最快捷的工资条制作方法,10秒钟2000人,快来看看!

实用Excel技巧分享:两种快捷制作工资条的方法

第一种:添加辅助列

如下图所示的工资表,瓶子要给每一个人的工资条上面加一个表头,表头上面还要留一行空白用于裁剪。

1.png

我们先在H2、H3单元格手动输入1、2。

2.png

然后选中H2-H3单元格区域,将鼠标放置在H3单元格右下角,双击向下填充。可以看到如下结果。

3.png

按ctrl+c复制区域,然后点击H12单元格,按ctrl+V粘贴,得到如下的结果。

4.png

选中数据区域A1-H21,点击“数据”选项卡下的“排序”按钮。

5.png

点击“主要关键字”后方的下拉按钮,在下拉菜单中选择“(列H)”,点击确定。

6.png

可以看到如下所示的结果。

7.png

选中A1-G1单元格区域,按ctrl+C复制。

8.png

然后选中A2-H20单元格区域。

9.png

按定位快捷键ctrl+G,在弹出的对话框中点击“定位条件”,然后在如下所示的对话框中勾选“空值”。点击确定。

10.jpg

此时可以看到所有的空行都被选中了。

11.png

按ctrl+V复制,可以看到表头复制到了每一个空行。

12.png

然后选中H列,点击“开始”选项卡下的“全部清除”。

13.jpg

在H2和I3单元格输入1。

14.png

选中H2-I3单元格区域,然后鼠标放在I3单元格右下角,双击填充。

15.png

可以看到如下所示的结果。

16.png

选中I列数据,按ctrl+G快捷键,选择“常量”。点击确定。

17.jpg

可以看到数据被选中了。

18.png

单击右键,选择“插入”。

19.jpg

在弹出的对话框中选择“整行”。

20.jpg

此时可以看到每个表头前面都有了空行,可用于打印出来后裁剪。

21.png

若想给表头和名字加上边框,选中整个表格区域,点击“开始”选项卡下的边框下拉按钮,在下拉菜单中选择“所有框线”。

22.jpg

可以看到所有单元格都加了框线。

23.png

若想要留白行没有框线,可以按照前面的定位空值的方式,定位所有空行后,按ctrl+1快捷键,弹出设置单元格格式对话框。在对话框中依次点击左、中、右三条框线,可去除空白行的三条框线,点击确定。

24.png

最终效果如下所示。

25.png

上面的方法比较适用于人数较少的公司,假如你所在的公司有两三千人,那就使用下面瓶子给你的万能模板吧!

第二种:VBA

我们将分别利用两段代码来实现每行员工工资数据前插入裁剪行(空行)、插入表头两步操作。

按ALT+F11快捷键,弹出如下图所示的VBA调试窗口。

26.png

点击“插入”-“模板”后,页面如下所示。

27.png

在空白处输入代码:(注意代码中所有标点符号都是英文标点符号)

Sub 选定范围隔行插入一行()
    Dim i As Integer
    For i = 11 To 3 Step -1
        Rows(i & ":" & i).Insert
      Next
End Sub

28.png

点击“运行”按钮。

29.png

此时可以看到表格完成了插入空行操作。

30.png

代码中有很多大家不认识的单词,但其实大家只需要明白下面两排的含义即可。

For i = 11 To 3 Step -1

Rows(i & ":" & i).Insert

上面的代码含义是:从第11行开始向上插入1行空行(Rows后面的第1个i和第2个i相差0,若想插入两行空行,可将第二个改为i+1),然后每隔1行(step -1)插入1行空行,直到第3行(TO 3)为止。

下面我们将原先的代码删除,再输入进另一组代码:(注意代码中所有标点符号都是英文标点符号)

Sub 隔2行插入表头()
For i = 20 To 4 Step -2
    Range("A1:G1").Copy
    Cells(I,1).Insert
Next
End Sub

31.png

点击运行按钮后结果如下。可以看到

32.png

这组代码和上面的含义类似,我们只需要理解中间两行就可以了。

For i = 20 To 4 Step -2

Range("A1:G1").Copy

cells(I,1).Insert

上面的代码含义是:从A20单元格(cells(I,1),I是行数,1是列数,I等于20的时候,就是第20行第1列即A20单元格)开始向上插入(Insert)1个从指定位置(A1:G1)拷贝(Copy)的表头,然后每隔2行(step -2)插入1个表头,一直插入到第4行(To 4)为止。如果是双行表头,只需要将A1:G1改为对应的表头区域即可。

相关学习推荐:excel教程

上一篇:excel按关键字提取数据详解
下一篇:没有了
网友评论