AIN3701 Assignment 3 (ANSWERS) 2026 - DISTINCTION GUARANTEED

Comprehensively structured AIN3701 Assignment 3 (ANSWERS) 2026 - DISTINCTION GUARANTEED - DISTINCTION GUARANTEED. Prepared to a distinction standard with detailed and well-developed responses. .. QUESTION 1 Section A (15 marks) You are presented with a VBA program containing missing words and commands. Complete the VBA code by filling in the missing words. IMPORTANT: e Write only the question number and the missing code in your Word document. e For example, if the answer to Question 1.1 is "Option Explicit", write: 1.1 Option Explicit e Answers must adhere to the coding standards and best practices taught in AIN2601 and AIN3701. e No marks will be awarded for coding functions, commands, or techniques that were not covered in AIN2601 and AIN3701. The completed VBA program must correctly calculate depreciation for the assets described in the scenario. Scenario Micro-Simba Ltd (SMC) manufactures microchips. SMC uses three depreciation methods to depreciate its fixed assets. Production machines are depreciated based on the number of microchips produced. It is estimated that each production machine can produce 1 000 000 microchips over its useful life. Delivery vehicles are depreciated over 4 years using the straight-line method. All other assets are depreciated at 20% per year using the diminishing balance method. The use of Artificial Intelligence (Al) tools, such as ChatGPT or other text generators, to produce answers is strictly prohibited. 3 AIN3701 Assignment 3 2026 A spreadsheet is provided with the following columns: Column A: Asset number Column B: Asset description Column C: Asset type (Machinery / Delivery Vehicles / Other) Column D: Original cost of asset Column E: Accumulated depreciation at the beginning of the year Column F: Depreciation for the current year Column G: Accumulated depreciation at the end of the year Column H: Microchips manufactured during the year, if applicable No assets were bought or disposed of during the year. THE VBA SCRIPT - PLEASE FILL IN THE MISSING WORDS Option Explicit Sub DepreciationCalcQ ‘Declare constants (1.1) MaxChipsProduced = 1000000 (1.2) DeliveryVehicleDeprYrs = 4 (1.3) OtherAssetsRate = 0.2 ‘Declare variables ‘Input variables Dim MachineType As (1.4) Dim OriginalCost As (1.5) Dim OpeningAccDep As (1.6) Dim MicrochipsManuf As (1.7) The use of Artificial Intelligence (Al) tools, such as ChatGPT or other text generators, to produce answers is strictly prohibited. 4 AIN3701 Assignment 3 2026 ‘Output variables Dim DepreciationCurrentYear As (1.8) Dim ClosingAccDep As (1.9) ‘Other variables Dim LastRow As Long Dim counter As Long ‘Determine the last row of the data (1.10) = Cells(Rows.Count, 1).End(xlUp).Row ‘Loop that take all fixed assets into account For counter = (1.11) To (1.12) ‘Assign values to variables (1.13) = Cells(counter, 3) (1.14) = Cells(counter, 4) (1.15) = Cells(counter, 5) (1.16) = Cells(counter, 8) ‘Classify each type of fixed asset and calculate depreciation If MachineType = "Machinery" Then DepreciationCurrentYear = (1.17) / (1.18) * (1.19) Elself MachineType = "Delivery Vehicles" Then DepreciationCurrentYear = (1.20) / (1.21) Else DepreciationCurrentYear = ( (1.22) - (1.23) y* (1.24) (1.25) The use of Artificial Intelligence (Al) tools, such as ChatGPT or other text generators, to produce answers is strictly prohibited. 5 AIN3701 Assignment 3 2026 ‘Calculate closing balance of depreciation ClosingAccDep = (1.26) + (1.27) ‘Write output to cells Cells(counter, (1.28) ) = DepreciationCurrenetaYr Cells(counter, (1.29) ) = ClosingAccDep (1.30) End Sub Section B (9 marks) Create your own dataset based on the information provided in Section A of this question. Your spreadsheet must cover at least six assets. Ensure that the first asset number in Column A is your student number and that all subsequent asset numbers increase sequentially by one. The asset description of the first asset in Column B must contain your surname and initials. Your dataset must include all three asset types: Machinery, Delivery Vehicles and Other. You must provide realistic and complete values for all remaining fields in Columns A to H, including microchips manufactured where applicable. After completing your dataset, insert a button on the worksheet and assign it to the DepreciationCalc sub-procedure. Click the button to execute your depreciation calculations. Once the macro has run, Columns F and G must display the correct depreciation and closing accumulated depreciation values based on the rules provided in the scenario. Submit a single screenshot in your Word document showing your full dataset from Columns A to H, the button you added, and the results after the macro has been The use of Artificial Intelligence (Al) tools, such as ChatGPT or other text generators, to produce answers is strictly prohibited. 6 AIN3701 Assignment 3 2026 executed. You may use the Windows Snipping Tool (or a similar screenshot tool) to capture the required screenshot. A link to a demonstration (using the Windows Snipping Tool) video has been provided below to assist you: Video link: https:/A Section B serves as evidence that the VBA code completed in Section A was successfully executed and tested. Students who do not provide sufficient evidence that the VBA solution was executed successfully will receive a mark of 0 for Question 1 (Section A and B). Question 2 (26 marks) You are appointed as a financial manager at Vulkaan Ltd. One of your responsibilities is to automate repetitive financial functions in Excel 365. You have three financial officers reporting to you. Vulkaan Ltd manufactures hybrid engines for various motorsport vehicles. This includes customers participating in local South African competitions, NASCAR and Formula 1. The accounting system does not have the ability to split any revenue or costs between the above competitions, and therefore decision making is difficult using the current financial system. The accounting system, however, stores in the description field per transaction the code of the business unit. These codes are: Business unit code Business unit RSA Local South African Races NAS NASCAR races FIA Formula 1 The use of Artificial Intelligence (Al) tools, such as ChatGPT or other text generators, to produce answers is strictly prohibited. 7 AIN3701 Assignment 3 One of the financial officers reporting to you, Ms du Toit, was given the task of supporting the automation of reporting per business unit. The board of directors 2026 requires the Revenue, Cost of Sales, Gross Profit and Gross Profit Percentage for each business unit. The current system download is a CSV file. Please see below an extract from the CSV file: Date AccountNo AccountDescription BusinessUnit Description Amount 2026/04/01 1 Engine Sales RSA RSA - GT Hybrid Engine Supply 185000 2026/04/01 1 Engine Sales NAS NAS - NASCAR Engine Contract 420000 2026/04/01 1 Engine Sales FIA FIA - Formula 1 Engine Supply 980000 2026/04/01 105 Cost of Sales RSA RSA - Engine Component Costs -92000 2026/04/01 110 Cost of Sales NAS NAS - Dyno Testing Costs -165000 2026/04/01 120 Cost of Sales FIA FIA - Carbon Fibre Materials -420000 2026/04/02 205 Other Income RSA RSA - Sponsorship Income 25000 2026/04/02 210 Other Income NAS NAS - Insurance Recovery 18000 2026/04/02 215 Other Income FIA FIA - Foreign Exchange Gain 52000 2026/04/02 305 Other Expenses RSA RSA - Marketing Campaign -12000 2026/04/02 310 Other Expenses NAS NAS - Travel Expenses -28000 2026/04/02 315 Other Expenses FIA FIA - Hospitality Expenses -65000 2026/04/03 1 Engine Sales RSA RSA - Rally Engine Sales 95000 2026/04/03 1 Engine Sales NAS NA- StSock Car Engine Sales 235000 2026/04/03 1 Engine Sales FIA FIA - Grand Prix Engine Sales 760000 2026/04/03 130 Cost of Sales RSA RSA - Assembly Labour -45000 2026/04/03 135 Cost of Sales NAS NAS - Track Support Costs -98000 2026/04/03 140 Cost of Sales FIA FIA - Wind Tunnel Testing -310000 2026/04/04 220 Other Income RSA RSA - Scrap Sales 8000 2026/04/04 225 Other Income NAS NAS - Training Revenue 12000 2026/04/04 230 Other Income FIA FIA - Technical Consulting Revenue 45000 2026/04/04 320 Other Expenses RSA RSA - Office Expenses -7000 2026/04/04 325 Other Expenses NAS NAS - Fuel Expenses -15000 2026/04/04 330 Other Expenses FIA FIA - Research Expenses -85000 2026/04/05 401 Taxation Expense RSA RSA - Income Tax -18000 2026/04/05 401 Taxation Expense NAS NAS - Income Tax -52000 2026/04/05 401 Taxation Expense FIA FIA - Income Tax -145000 2026/04/05 1 Engine Sales RSA RSA - Touring Car Engine Supply 142000 2026/04/05 1 Engine Sales NAS NAS - Engine Upgrade Package 315000 FIA - Championship Engine 2026/04/05 1 Engine Sales FIA Package 1200000 2026/04/06 150 Cost of Sales RSA RSA - Maintenance Costs -35000 2026/04/06 155 Cost of Sales NAS NAS - Supplier Costs -112000 2026/04/06 160 Cost of Sales FIA FIA - Aero Development Costs -515000 2026/04/06 335 Other Expenses RSA RSA - Training Costs -6000 The use of Artificial Intelligence (Al) tools, such as ChatGPT or other text generators, to produce answers is strictly prohibited. 8 AIN3701 Assignment 3 2026 The chart of accounts classifies the account types as follows: Type of Account Range Revenue 1-100 Cost of Sales 101 — 200 Other income 201 — 300 Other expenses 301 — 400 Taxation expense 401 Non-current Assets 500 — 549 Current Assets 550 — 599 Non-current Liabilities 600 — 649 Current Liabilities 650 — 699 Equity 700 - 750 Ms du Toit created a spreadsheet with two worksheets. The one worksheet is Apr_Data, where the data of the accounting system is copied from the CSV file into this worksheet (Apr_Data) in Excel. The second worksheet is called Summary, which is the information required by the directors. It will look as follows: A B Cc D E 1 Revenue Cost of Gross Gross Sales profit profit % 2 RSA 3 NAS 4 FIA The use of Artificial Intelligence (Al) tools, such as ChatGPT or other text generators, to produce answers is strictly prohibited. 9 AIN3701 Assignment 3 2026 Ms du Toit has started coding the solution, but she is stuck. Her code does not run but gives run-time errors. She has approached you to assist her in correcting the code. The Chief Financial Officer (CFO) has indicated that you need to assist her with feedback in a tabular form, indicating the mistake in one column and then the resolution in the next column. He feels that staff in your division’s VBA skills are lacking, and that this approach will improve their knowledge of VBA. He is also concerned that your division does not comply with VBA best practices and wants this also addressed. Please see details in Ms du Toit’s workbook: File name: Financial_Summary_April_ Module name: Module1 Button on Summary worksheet: = E PRESS ME !! The button is correctly linked to the sub-procedure “Divisional_Performance()” VBA Code: Option Explicit Function Gross_Profit_Calculation(Total_Revenue As Single, Total_GrossProfit As Single) ‘Coded by John Mbatha (CFO) ‘Personal number: 54321 ‘Date: 23 December 2023 ‘Version 1.0 ‘Purpose: To calculate gross profit percentage The use of Artificial Intelligence (Al) tools, such as ChatGPT or other text generators, to produce answers is strictly prohibited. 10 AIN3701 Assignment 3 2026 ‘Gross profit calculation according to Drury Gross_Profit_Calculation = Total_GrossProfit / Total_Revenue End Function Sub Divisional_PerformanceQ) ‘Coded by Nelly du Toit ‘Personal number: 10001 ‘Date: 15 June 2026 ‘Version 1.0 ‘Purpose: Doing complex calculations to provide summary to board of directors Dim 3_Business_Units As String Dim RSA_Revenue As Single Dim NAS_Revenue As Single Dim FIA_Revenue As Single Dim RSA_Cost_of_Sales As Single Dim NAS_Cost_of_Sales As Single Dim FIA_Cost_of_Sales As Single Dim RSA_Gross_Profit As Currency Dim NAS_Gross_Profit As Single Dim FIA_Gross_Profit As Double Dim Account_Ranges Dim Amount As Single Dim lastrow As Long Dim i As Long The use of Artificial Intelligence (Al) tools, such as ChatGPT or other text generators, to produce answers is strictly prohibited. 11 Dim Summary As Worksheet Dim Data As Worksheet Set Summary = Worksheets("Sumary") Set Data = Worksheets("Apr_Data") Data.Activate lastrow = Cells(Rows.Count, 1).End(Up).Row Fori=1 To 1048576 3_Business_Units = Cells(i, 4) Amount = Cells(i, 6) Account_Ranges = Cells(i, 2) If Account_Ranges 100 Then If Business_Unit = "RSA" Then RSA_Revenue = RSA_Revenue + Amount Elself Business_Unit = "NAS" Then NAS_Revenue = NAS_Revenue + Amount Else FIA_Revenue = FIA_Revenue + Amount End lf The use of Artificial Intelligence (Al) tools, such as ChatGPT or other text generators, to produce answers is strictly prohibited. AIN3701 Assignment 3 2026 12 AIN3701 Assignment 3 2026 Elself Account_Ranges = 200 Then If Business_Unit = "RSA" Then RSA_Cost_of_Sales = RSA_Cost_of_Sales + Amount Elself Business_Unit = "NAS" Then NAS_Cost_of_Sales = NAS_Cost_of_Sales + Amount Else FIA_Cost_of_Sales = FIA_Cost_of_Sales + Amount End If End If Next Summary.Activate Range("B2") = RSA_Revenue Range("B3") = NAS_Revenue Range("B4") = FIA_Revenue Range("C2") = RSA_Cost_of_Sales Range("C3") = NAS_Cost_of_Sales Range("C4") = FIA_Cost_of_Sales RSA_Gross_Profit = RSA_Revenue - RSA_Cost_of_Sales NAS_Gross_Profit = NAS_Revenue - NAS_Cost_of_Sales FIA_Gross_Profit = FIA_Revenue - FIA_Cost_of_Sales The use of Artificial Intelligence (Al) tools, such as ChatGPT or other text generators, to produce answers is strictly prohibited. 13 AIN3701 Assignment 3 2026 Range("D2") = RSA_Gross_Profit Range("D3") = NAS_Gross_ Profit Range("D4") = FIA_Gross_Profit Range("E2") = Call Function (RSA_Revenue, RSA_Gross_Profit) Range("E3") = Call Function (NAS_Revenue, NAS_Gross_Profit) Range("E4") = Call Function (FIA_Revenue, FIA_Gross_Profit) ‘Range format (I do not know the code ®) End Sub The use of Artificial Intelligence (Al) tools, such as ChatGPT or other text generators, to produce answers is strictly prohibited. 14 AIN3701 Assignment 3 2026 REQUIRED Marks (a) Review the VBA code provided. 26 Identify exactly thirteen (13) errors and/or instances of noncompliance with VBA best practices in the VBA code. For each item identified, provide an appropriate correction or recommendation. Complete the following table in your answer document: