Modify a macro to remove blanks from a worksheet

[khanaran]

Hi

I have a macro that was written for me , however the source of my data has now changed and the macro is not doing what I like it to

I will appreciate any help in fixing my macro

Kind regards
Rajann

PS The data is copies into a worksheet called Racescrape and after running the macro it creates a worksheet called Racdata which spaces the data after each race

Now it is not doing that

It creates Racedata but the spacing is not being maintained