如何用Excel制作工资条

在日常工作中，制作工资条是一项较为常见且重要的任务。利用excel强大的功能，我们可以轻松快捷地完成工资条的制作。

准备工作

首先，确保你的工资数据已整理在excel表格中，每一行代表一个员工的工资信息，列清晰明确，如姓名、基本工资、绩效工资、奖金、扣除项等。

方法一：函数法

1. 在工资数据表格旁边，新建两列。第一列用于输入序号，从1开始依次递增。

2. 在第二列第一个单元格输入公式“=if(mod(row(),3)=1,a$1,if(mod(row(),3)=2,a2,""))”。这里的“3”表示每三个单元格为一组（一个工资条包含表头和员工工资信息共三行），可根据实际情况调整。

3. 将公式向下拖动填充，直至覆盖所有需要制作工资条的数据行。

4. 选中这两列数据，复制粘贴到新的工作表中，然后删除多余的行，即可得到整齐的工资条。

方法二：数据透视表法

1. 选中工资数据表格中的任意单元格。

2. 点击“插入”选项卡，选择“数据透视表”。

3. 在弹出的对话框中，确认数据区域无误后，点击“确定”。

4. 在数据透视表字段列表中，将“姓名”等字段拖到“行”区域，将各项工资数据字段拖到“值”区域。

5. 对数据透视表进行简单调整，使其格式符合要求。

6. 选中数据透视表，复制粘贴到新的工作表中。然后将每一行的数据复制粘贴到新的行中，形成表头和员工工资信息的完整行，最后删除原始的数据透视表内容，即可得到工资条。

方法三：宏法

如果你经常需要制作工资条，且数据量较大，宏可以帮你节省大量时间。

1. 按下“alt+f11”组合键打开vba编辑器。

2. 在vba编辑器中，点击“插入”-“模块”。

3. 在模块中输入以下代码：

```vba

sub createpayslips()

dim ws as worksheet

dim lastrow as long

dim i as long

set ws = thisworkbook.sheets("工资表") ⁄'请替换为实际的工资表工作表名称

lastrow = ws.cells(ws.rows.count, 1).end(xlup).row

for i = 1 to lastrow

ws.rows(i).copy

ws.rows(i * 2).insert shift:=xldown

ws.rows(i * 2).insert shift:=xldown

ws.cells(i * 2, 1).value = ws.cells(i, 1).value

next i

end sub

```

4. 运行该宏，即可快速生成工资条。

通过以上几种方法，你可以根据自己的需求和数据特点，选择合适的方式在excel中制作出准确、规范的工资条。