Excel VBA工资条代码,会计基础

这里工资表标签名称是【Sheet3】改成自己的工资表标签，第一个是注释，可以不改。

    '获取源数据范围    lastRow = srcSheet.Cells(srcSheet.Rows.Count, "A").End(xlUp).Row - 2    lastCol = srcSheet.Cells(2, srcSheet.Columns.Count).End(xlToLeft).Column

    '逐行生成工资条，每个员工保留表头+空行方便裁剪    For i = 4 To lastRow        '复制表头行        srcSheet.Range(srcSheet.Cells(2, 1), srcSheet.Cells(3, lastCol)).Copy _            Destination:=destSheet.Cells(destRow, 1)        '复制当前员工数据        srcSheet.Range(srcSheet.Cells(i, 1), srcSheet.Cells(i, lastCol)).Copy _            Destination:=destSheet.Cells(destRow + 2, 1)        '自动调整列宽适配显示        destSheet.Columns.AutoFit        '预留空行方便裁剪        destRow = destRow + 4

Sub 相对引用转绝对引用()    Dim cell As Range    For Each cell In Selection.SpecialCells(xlCellTypeFormulas)        If InStr(cell.Formula, "$") > 0 Then            cell.Formula = Application.ConvertFormula(cell.Formula, xlA1, xlA1, xlRelative)        Else            cell.Formula = Application.ConvertFormula(cell.Formula, xlA1, xlA1, xlAbsolute)        End If    NextEnd Sub

📌 借贷不等于借钱贷款

这是会计专用符号，表示记账方向，与日常借贷语义完全无关

📌 左借右贷，永恒不变

任何一笔交易都必须同时记借方和贷方，且金额相等

📌 左手管去处，右手管来源

左边 = 钱去哪了（资产/成本/费用），右边 = 钱从哪来（负债/股本/利润）

📌 大拇指=增，小拇指=减，左右相反

记住手势口诀，借贷的精髓就掌握了

Excel月度个税计算公式

1.起征点：目前为5000元/月，全年共60,000元

2.专项扣除：包括三险一金（基本养老保险、基本医疗保险、失业保险、住房公积金）

3.专项附加扣除：包括子女教育、继续教育、大病医疗、住房贷款利息、住房租金、赡养老人等

4.月度个税计算公式：

A.月度应纳税所得额 = 税前工资− 5000元（起征点）− 五险一金个人部分− 专项附加扣除

B. 月度个税 = 月度应纳税所得额× 对应税率− 速算扣除数

个人所得税计算公式：

=MAX((I3-5000-J3-K3)*{3;10;20;25;30;35;45}%-{0;210;1410;2660;4410;7160;15160},0)