Clean up and Speed Up Code

**Mad-Dog** · 02-11-2015, 04:15 AM

Hi all,

Wondering if I can call on your skils to help clean up and speed up the code I have managed to cobble together and borrow from all over the internet and other guru's?

Code basically ADDS three columns after the last column and runs three different formulas down a dynamically growing (rows) report and then formats the dataset to freeze the top row, add a filter and borders i.e. make it presentable.

Current number of rows is 24409 and will double incrementally on a daily basis within the next 3-4 months.

Like I say code works just takes ages to run - approx. 4-5 mins or would you say that's normal?

Please Login or Register  to view this content.

Any assistance/tips, etc would be greatly appreciated

Kind regards,

**romperstomper** · 02-11-2015, 04:54 AM

I suspect some of the time is down to calculating the UDF you use, but you should remove the Calculate line since your formulas are already calculated (setting calculation to manual doesn't work if you then use the Formula property to assign the formula to multiple cells at once.). You should also call your two final subs before you turn screenupdating etc back on, not after.