Trả lời nhanh
Có thể tự tạo hàm tính thuế thu nhập cá nhân trong Excel bằng VBA: mở workbook mới, nhấn Alt+F11, chọn Insert → Module rồi nhập mã hàm. Bài đưa hai hàm là PITLC tính thuế thu nhập cá nhân và NET2GROSSLC quy đổi thu nhập sau thuế sang trước thuế, dựa trên Thông tư 81/2004/TT-BTC, theo biểu thuế tại thời điểm bài viết (2015). Có thể lưu thành Add-in để dùng lại.
Ý chính
- Cần Excel 2003, 2007 hoặc 2010 và các phụ lục kèm Thông tư 81/2004/TT-BTC
- PITLC tính thuế TNCN cho công dân Việt Nam và cá nhân định cư tại Việt Nam
- NET2GROSSLC quy đổi thu nhập sau thuế (net) sang trước thuế (gross)
- Tạo hàm: Alt+F11 → chọn bảng tính trong VBA project → Insert → Module
- Có thể lưu thành Add-in để dùng ở các file khác
Theo quy định tại thời điểm đăng bài (19/01/2015); chính sách có thể đã thay đổi.
Nếu các bạn vẫn chưa làm thành thạo được các bước nêu dưới đây, thì có thể theo học 1 khóa thực hành kế toán trên excel tại trung tâm đào tạo kế toán tổng hợp Đức Minh.
Công việc chuẩn bị đầu tiên:
• NET2GROSSLC: Hàm qui đổi thu nhập sau thuế (net) sang thu nhập trước thuế (gross) dành cho công dân Việt Nam và các cá nhân khác định cư tại Việt Nam.

Lưu ý: Tên hàm có thể thay đổi cho phù hợp với yêu cầu của bạn. TẠO HÀM 1. Mở bảng tính (workbook) mới 2. Nhấn tổ hợp phím Alt+F11 để khởi động microsoft Visual Basic 3. Nhấn vào bảng tính của bạn tại cửa sổ VBA project. Ví dụ: VBA project (book1) 4. Chọn Insert.Module 5. Nhấn đúp vào module mới tạo ra và nhập vào các đoạn mã sau. Hàm tính thuế thu nhập cá nhân dành cho công dân Việt Nam và các cá nhân khác định cư tại Việt Nam. Function pitlc(gross_local) 'Personal Income Tax for Local Vietnamese Citizen If (gross_local > 0) And (gross_local <= 5000000) Then pitlc = 0 ElseIf (gross_local > 5000000) And (gross_local <= 15000000) Then pitlc = (gross_local - 5000000) * 0.1 ElseIf (gross_local > 15000000) And (gross_local <= 25000000) Then pitlc = 1000000 + ((gross_local - 15000000) * 0.2) ElseIf (gross_local > 25000000) And (gross_local <= 40000000) Then pitlc = 3000000 + ((gross_local - 25000000) * 0.3) ElseIf (gross_local > 40000000) Then pitlc = 7500000 + ((gross_local - 40000000) * 0.4) End If End Function
Lưu ý: Tên hàm có thể thay đổi cho phù hợp với yêu cầu của bạn
TẠO ADD-IN
Ở các bước trên bạn đã tạo được các hàm dùng để tính thuế thu nhập. Tuy nhiên các hàm này chỉ sử dụng cho chính bảng tính có gắn hàm đã tạo mà thôi. Để tất cả các bảng tính đều có thể sử dụng hàm đã tạo ở trên hoặc bạn muốn gửi những hàm này cho bạn bè thì bạn cần phải tạo add-in. Cách tạo add-in như sau:
1. Nhấn chuột phải vào Module đã tạo ở trên
2. Điền thông số trong tab General
a. Project Name: Điền tên hàm (ví dụ: PIT)
b. Project Description: Điền vào mô tả của dự án (ví dụ: PIT formular)
3. Trong tab Protection, nhấn vào Lock project for viewing sau đó điền mật khẩu và xác nhận mật khẩu nếu bạn không muốn người khác xem và chỉnh sửa đoạn mã của mình.
4. Đóng cửa sổ VBA
5. Vào File_Save As, nhấn vào khung Save as type và chọn Microsoft Office Excel Add-in (*.xla)
6. Đặt tên file và chọn đường dẫn để lưu file (ví dụ: c:\PITformular .xla)
7. Hoàn tất
Muốn gắn add-in vào bất cứ máy nào có Excel bạn chỉ việc vào Tools ->Add-Ins sau đó nhấn Browse... và tìm đến nơi chứa file.xla nêu trên rồi OK
Bạn đọc có thể tham khảo thêm các bài viết có liên quan:
Căn cứ pháp lý
- Thông tư 81/2004/TT-BTC
Khoá học liên quan
Kế toán thực tế
Kèm 1-1 trên chứng từ thật · khai giảng liên tục



