Optimize VBA code

Hi Guys,

I have written some code (below), which does what i need it to, but is slow. Its a straightforward code to populate the next row in a spreadsheet, which i am using as a database. Unfortunately there are a lot of columns (A - EO). As you can see the code i have writes each cell using anchor_cell.offset method.

Please Login or Register  to view this content.

I was wondering if there is any way this code can be optimized to run quicker?
Any help would be greatly appreciated.

Best regards
Doodlebug