快捷搜索:  汽车  科技

excel怎么快速生成个人工资条(巧用excel宏做成)

excel怎么快速生成个人工资条(巧用excel宏做成)MsgBox n n = Sheets("工资表").UsedRange.Rows.Count启用excel里面的宏,并新建一个宏“createsalary”(名字可以自己起),并在宏编辑器里输入如下vbscript脚本代码:Sub createsalary()

财务工作每月发工资都需要做工资条,发给各个员工。这种重复简单的工作,我们可以用常用的excel做个宏就可以一键生成工资条

第一步

打开工资表excel。另外把工资表放置在一个sheet,另外新建一个sheet叫做工资条。

excel怎么快速生成个人工资条(巧用excel宏做成)(1)

第二步

启用excel里面的宏,并新建一个宏“createsalary”(名字可以自己起),

excel怎么快速生成个人工资条(巧用excel宏做成)(2)

并在宏编辑器里输入如下vbscript脚本代码:

Sub createsalary()

n = Sheets("工资表").UsedRange.Rows.Count

MsgBox n

For i = 1 To n - 3

Sheets("工资表").Select

Rows("1:3").Select

Range("F2").Activate

Selection.Copy

Sheets("工资条").Select

Rows(4 * i - 3 & ":" & 4 * i - 1).Select

ActiveSheet.Paste

Sheets("工资表").Select

Rows(i 3 & ":" & i 3).Select

Selection.Copy

Sheets("工资条").Select

Rows(4 * i & ":" & 4 * i).Select

ActiveSheet.Paste

Next

End Sub

excel怎么快速生成个人工资条(巧用excel宏做成)(3)

第三步

保存退出宏编辑器,返回excel界面。到此制作已经完成,超级简单。

excel怎么快速生成个人工资条(巧用excel宏做成)(4)

第四步

测试,你点击工资条按钮,脚本自动运行,并在工资条sheet里生成工资条成功。

excel怎么快速生成个人工资条(巧用excel宏做成)(5)

第五步

发邮件通知的可以自己复制相应员工的行,直接粘贴到邮件中。需要纸条的则打印出来裁剪即可。

excel怎么快速生成个人工资条(巧用excel宏做成)(6)

第六步

该文件保存为模板,以后每个月的工资表往工资表sheet里粘贴,然后只需要点击工资条按钮,一键就生成工资条。

猜您喜欢: