Do While Macro seems to work in stages

Afternoon all

I have a macro which loops through data, deleting those rows that are marked with a "Y".

However - it appears to always want to do this in three stages. The first time I run the macro, it delete's a large chunk of those marked rows - but it nearly always leaves two rows. The second time I run it, it deletes one of those two remaining rows. And then I run it again and it deletes the final outstanding row.

I'm sure i've done something stupid here - the code is below, please can somebody take a look and tell me what I've done wrong !

Please Login or Register  to view this content.

End Sub

when deleting rows you need to start at the bottom and work up.
Or adjust your indexing variable to it does not increment when deleting a row.

Basically you index variable will get out of sync. Say it is pointing to row 6, you delete that row so now row 7 is actually row 6. You increment the indexer to 7 and do not check the new row 6. So in order to check it you run the code again.