Em gởi file em cần tính đi, có nhiều công thức và hàm tự tạo trên GPE nếu em chịu khó kiếm, còn không sẽ có bạn HD em làm theo ý của em.DOLIEU đã viết:Các bác ơi giúp Em thiết lập công thức tính thuế TNCN theo Luật thuế TNCN mới ban hành với. e thấy phức tạp quá. Xin đa tạ.
Cái này chưa chắc áp dụng mà. Nếu áp dụng thì sẽ dễ hơn thuế hiện hành nữa. Lấy TN - tất các khoản giảm trừ (4tr + 1,6tr/con), dùng hàm if => thuế suất thôi.DOLIEU đã viết:Em gửi File kèm theo các bác giúp Em với nhé. Thanks!
(Trong bảng lương Em đang dùng công thức tính thuế theo quy định cũ).
Xin lỗi, do chưa dùng nên chưa nghiên cứu.Cám ơn bạn nhiều, sẽ sửa lại. Nếu vậy chỉ dùng UDF hàm tự tạo sẽ bớt phức tạp hơn.1. Biểu thuế luỹ tiến từng phần áp dụng đối với thu nhập tính thuế từ sản xuất, kinh doanh, thu nhập tính thuế từ tiền lương, tiền công quy định tại khoản 1 Điều 19 của Luật này.
File của bạn có nhiều name sai nên tôi xóa rồiFunction ThueTN(gross_local)
'Personal Income Tax for Local Vietnamese Citizen - GPE - Ap dung 01/01/2009
If (gross_local > 0) And (gross_local <= 5000000) Then
ThueTN = gross_local * 0.05
ElseIf (gross_local > 5000000) And (gross_local <= 10000000) Then
ThueTN = 250000 + (gross_local - 5000000) * 0.1
ElseIf (gross_local > 10000000) And (gross_local <= 18000000) Then
ThueTN = 750000 + (gross_local - 10000000) * 0.15
ElseIf (gross_local > 18000000) And (gross_local <= 32000000) Then
ThueTN = 750000 + 8000000 * 0.15 + (gross_local - 18000000) * 0.2
ElseIf (gross_local > 32000000) And (gross_local <= 52000000) Then
ThueTN = 750000 + 8000000 * 0.15 + (32000000 - 18000000) * 0.2 + (gross_local - 32000000) * 0.25
ElseIf (gross_local > 52000000) And (gross_local <= 80000000) Then
ThueTN = 750000 + 8000000 * 0.15 + (32000000 - 18000000) * 0.2 + (52000000 - 32000000) * 0.25 + (gross_local - 52000000) * 0.3
ElseIf (gross_local > 80000000) Then
ThueTN = 750000 + 8000000 * 0.15 + (32000000 - 18000000) * 0.2 + (52000000 - 32000000) * 0.25 + (80000000 - 52000000) * 0.3 + (gross_local - 80000000) * 0.35
End If
End Function
Function ThueTNOB(gross_local As Double) As Double
'Personal Income Tax for Local Vietnamese Citizen - GPE - Ap dung 01/01/2009
Application.Volatile (False)
Select Case gross_local
Case 0 To 5000000
ThueTNOB = gross_local * 0.05
Case 5000000 To 10000000
ThueTNOB = 250000 + (gross_local - 5000000) * 0.1
Case 10000000 To 18000000
ThueTNOB = 250000 + 500000 + (gross_local - 10000000) * 0.15
Case 18000000 To 32000000
ThueTNOB = 750000 + 8000000 * 0.15 + (gross_local - 18000000) * 0.2
Case 32000000 To 52000000
ThueTNOB = 750000 + 8000000 * 0.15 + (32000000 - 18000000) * 0.2 + (gross_local - 32000000) * 0.25
Case 52000000 To 80000000
ThueTNOB = 750000 + 8000000 * 0.15 + (32000000 - 18000000) * 0.2 + (52000000 - 32000000) * 0.25 + (gross_local - 52000000) * 0.3
Case Else
ThueTNOB = 750000 + 8000000 * 0.15 + (32000000 - 18000000) * 0.2 + (52000000 - 32000000) * 0.25 + (80000000 - 52000000) * 0.3 + (gross_local - 80000000) * 0.35
End Select
End Function
ThuNghi đã viết:Xin lỗi, do chưa dùng nên chưa nghiên cứu.Cám ơn bạn nhiều, sẽ sửa lại. Nếu vậy chỉ dùng UDF hàm tự tạo sẽ bớt phức tạp hơn.
Cám ơn.
Trước mắt bạn dùng tạm UDF này, kiểm tra lại các số 0 cho đủ
File của bạn có nhiều name sai nên tôi xóa rồi
Function ThueTN(gross_local As Double) As Double
'Personal Income Tax for Local Vietnamese Citizen - GPE - Ap dung 01/01/2009
Application.Volatile (False)
Select Case gross_local
Case 0 To 5000000
ThueTN = gross_local * 0.05
Case 5000000 To 10000000
ThueTN = 250000 + (gross_local - 5000000) * 0.1
Case 10000000 To 18000000
ThueTN = 250000 + 500000 + (gross_local - 10000000) * 0.15
Case 18000000 To 32000000
ThueTN = 250000 + 500000 + 2700000 + (gross_local - 18000000) * 0.2
Case 32000000 To 52000000
ThueTN = 250000 + 500000 + 2700000 + 6400000 + (gross_local - 32000000) * 0.25
Case 52000000 To 80000000
ThueTN = 250000 + 500000 + 2700000 + 6400000 + 13000000 + (gross_local - 52000000) * 0.3
Case Else
ThueTN = 250000 + 500000 + 2700000 + 6400000 + 13000000 + 24000000 + (gross_local - 80000000) * 0.35
End Select
End Function