AIN3701 - Assignment 2 - 2024

Taxable income (R) Taxable income (R) Base %
Between
1 – 237 100 1 237 100 - 18%
237 101 – 370 500 237 101 370 500 40 680 26%
370 501 – 512 800 370 501 512 800 73 726 31%
512 801– 673 000 512 801 673 000 115 762 36%
673 001 – 857 900 673 001 857 900 170 734 39%
857 901 – 1 817 000 857 901 1 817 000 239 452 41%
1 817 001 and above 1 817 001 Above 614 192 45%

Age Rebate
Primary rebate All 17 235
Secondary rebate 65 9 444
Tertiary rebate 75 3 145




To create a button that requests the employee's salary and age, and then calculates the tax payable
based on the provided tax tables, you can follow these steps:

1. Open the Excel file containing the tax tables.
2. Go to the "Taxtables" worksheet.
3. Click on the "Developer" tab in the Excel ribbon. If you don't see the "Developer" tab, you may
need to enable it in Excel options.
4. Click on "Insert" in the "Controls" group, and then click on "Button (Form Control)".
5. Draw the button on the worksheet where you want it to appear.
6. Right-click on the button and choose "Edit Text" to give it a meaningful label like "Calculate Tax".
7. Right-click on the button again and select "Assign Macro".
8. Click on "New" to create a new macro.
9. In the Visual Basic for Applications (VBA) editor window that opens, paste the following code:

Sub CalculateTax()
Dim salary As Double
Dim age As Integer
Dim tax As Double
Dim primaryRebate As Double
Dim secondaryRebate As Double
Dim tertiaryRebate As Double

' Get salary and age from user
salary = InputBox("Enter the employee's salary:", "Salary Input")
age = InputBox("Enter the employee's age:", "Age Input")

' Calculate tax
If salary < 512801 Then
tax = 0