如何用Excel制作工资条的两种简单方法？

用Excel制作工资条的两种简单方法

身为HR的你是否经常被如何快速制作工资条而困扰？每个月发放工资条的时候是否感觉身心疲惫？其实，使用Excel制作工资条并没有你想象中的那么复杂。下面，我将为大家介绍两种简单且实用的方法来帮助你快速制作工资条。

方法一：利用排序法生成工资条

假设我们的工资表数据在Sheet1工作表的A1:F10区域内，标题行为姓名、基本工资、岗位津贴、奖金、应发工资、扣税。

1. 插入辅助列

在Sheet1工作表的F列后面插入一个空列，输入列标题“序号”，并在G2单元格输入公式“=ROW()-1”，然后将此公式向下填充到G10单元格。这样，我们就为每一行数据生成了一个唯一的序号。

2. 复制标题行

选中Sheet1工作表的A1:F1单元格区域，按住Ctrl键的同时拖动此区域到A12单元格处，这样就复制了一行标题。

3. 对辅助列进行排序

选中Sheet1工作表的A1:G11单元格区域，执行“数据-排序”命令，打开“排序”对话框，按“主要关键字”选择“序号”，“次序”选择“升序”，单击“确定”按钮返回。此时，你会发现工资表已经变成了工资条的形式，但还不是我们想要的结果。

4. 再次对辅助列进行排序

再次选中Sheet1工作表的A1:G11单元格区域，执行“数据-排序”命令，打开“排序”对话框，按“主要关键字”选择“序号”，“次序”选择“降序”，单击“确定”按钮返回。至此，工资条就已经制作完成了。不过，此时辅助列中的序号已经变得杂乱无章，为了不影响美观，我们可以将其删除。

方法二：利用VBA生成工资条

虽然排序法制作工资条比较快捷，但操作步骤稍显繁琐。如果你对Excel的VBA功能有所了解，那么可以利用VBA来快速生成工资条。

1. 打开VBA编辑器

按Alt+F11组合键打开VBA编辑器，在左侧的“工程资源管理器”窗口中双击VBAProject（你的工作簿名），然后在弹出的菜单中选择“插入-模块”，插入一个新的模块。

2. 输入VBA代码

在新模块中输入以下VBA代码：

```vba

Sub 创建工资条()

Dim ws As Worksheet

Dim i As Long, j As Long

Dim n As Long

Set ws = ThisWorkbook.Sheets("Sheet1") '假设工资表数据在Sheet1工作表中

n = ws.Cells(ws.Rows.Count, 1).End(xlUp).Row '计算工资表数据的行数

ws.Rows(n + 1).Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove '在第n+1行插入一行空行

For i = 1 To n

ws.Rows(i + i - 1).EntireRow.Copy Destination:=ws.Rows(i + i) '复制标题行到下一行空行

ws.Cells(i + i, 1).Value = ws.Cells(i, 7).Value '将辅助列中的序号填充到复制后的标题行的第一个单元格中

For j = 2 To 6

ws.Cells(i + i, j).Value = ws.Cells(i, j).Value '将工资数据填充到复制后的标题行中

Next j

ws.Rows(i + i - 1).Delete Shift:=xlUp '删除辅助列所在的行

Next i

ws.Columns("G").Delete Shift:=xlToLeft '删除辅助列

End Sub

```

3. 运行VBA代码

关闭VBA编辑器，返回Excel工作表界面。按Alt+F8组合键打开“宏”对话框，选择“创建工资条”宏，单击“运行”按钮。此时，你会发现Sheet1工作表中已经生成了工资条。

注意事项

1. 数据区域的选择

在使用上述两种方法时，请确保你选择了正确的数据区域。如果数据区域选择不正确，可能会导致生成的工资条不正确或出错。

2. 辅助列的使用

在排序法中，我们使用了辅助列来生成序号并进行排序。在使用VBA代码时，我们也使用了辅助列来存储序号并在复制标题行时将其填充到新的标题行中。因此，请确保你的工资表中有一个空列可以用来作为辅助列。

3. VBA代码的调试

如果你对VBA代码不熟悉，建议在运行之前先对代码进行调试。你可以在VBA编辑器中逐行运行代码，观察每一步操作的结果是否符合预期。

4. 备份数据

在进行任何操作之前，请务必备份你的工资表数据。这样可以避免在操作过程中因误操作而导致数据丢失或损坏。

总结

以上两种方法都可以帮助你快速制作工资条。排序法操作相对简单，但需要多次排序和复制粘贴操作；VBA代码则更加高效，但需要一定的VBA基础。你可以根据自己的实际情况选择适合自己的方法。希望这篇文章能够帮助你解决制作工资条的烦恼，让你的工作更加轻松和高效。