Excel Macro programming

Job ID: 37594419

Budget: $2 – $8 AUD

Can you rewrite this code so that it can be solved with the cheapest algorithm.
Budget 15AUD
Related categories: Visual Basic Excel VB.NET Excel VBA Excel Macros