Delete rows in sheet by looping backwards !

Hi

I have imported a textfile to my sheet thats could looks like this

textfile:
aaaa 11111 25622
bbbb 22222 254155
cccc 33333 356998
dddd 44444 532256


aaaa 11111 522546
bbbb 22222 154123
cccc 33333 44512
dddd 55555 11255
(2)
aaaa 11111 5245454
bbbb 22245 556t565
cccc 33333 4454545
dddd 55555 4545454(1)

Is it possible to loop from last row (1) to first empty row (2) and delete that row plus all the rows above
so it looks like this ?

textfile
aaaa 11111 5245454
bbbb 22245 556t565
cccc 33333 4454545
dddd 55555 4545454

Best regards

Petter

Bok1.xlsx

Hi Petter120,

No loop needed. Try this code

Please Login or Register  to view this content.

Hello Petter120,

When writing code in VBA, it is seldom necessary to select or activate objects. This macro assumes there will be at least one blank row separating the data.

Please Login or Register  to view this content.