当前位置:首页 > Office > Excel > 正文内容

Excel自定义函数

小编编4年前 (2020-11-20)Excel314

个人经验,如果用Excel表计算工资,用VBA自定义函数要比弄公式简单的多,直接用“=管理工资(张三)”完事,如果有多个角色,像管理、车间、后勤,再加个if呗。


附一个自己用的VBA参考:

Public Function ABC公司后勤考勤2021(name)   

Dim 考勤天数, 考勤小时数, 日工资标准, 小时工资标准, 必须出勤天数 As Single

Dim 考勤表名, 标准表名 As String

Dim 月份数 As Integer

月份数 = ActiveSheet.Range("a1").Value

考勤表名 = 月份数 & "月考勤表"

标准表名 = 月份数 & "月工资标准"

考勤天数 = Application.VLookup(name, Worksheets(考勤表名).Range("b:h"), 2, False)   
必须出勤天数 = Application.VLookup(name, Worksheets(标准表名).Range("q:s"), 2, False)
月工资标准 = Application.VLookup(name, Worksheets(标准表名).Range("q:s"), 3, False)
If 考勤天数 > 必须出勤天数 Then

ABC公司后勤考勤2021 = Application.Round(月工资标准, 0)

Else

ABC公司后勤考勤2021 = Application.Round(月工资标准 / 必须出勤天数 * 考勤天数, 0)
End If

End Function


扫描二维码推送至手机访问。

版权声明:本文由别跟我这儿胡闹发布,如需转载请注明出处。

转载请注明出处:http://hunao.vip/?id=6

分享给朋友:

相关文章

随机生成12个月销售数据的VBA

Sub 随机生成全年销售数据()     Dim i, w, x, p   &nb...

备份PERSONAL.XLSB,教训呐!

如果你像我一样,个人宏文件里有好多自定义函数、宏,一定注意经常备份PERSONAL.XLSB,特别装系统之前,千万别忘了,要不真傻逼了。...

整理农行卡交易明细VBA

分享一个自用的整理农行卡交易明细的VBA,方便记账,有犯懒的小伙伴,可以直接拿去用。没什么复杂的,自己做一遍,录制宏,然后改改细节就可以了。 Sub 银行_整理交易明细_农行()...

发表评论

访客

◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。