Looping problem

[plycc100no]

Hi

I have the following code

which is supposed to look in column a for a date, if appropriate date is found it is supposed to copy that row and paste it into a seperate sheet.

This works fine to a point but once its found two or three occurances it stops looking and I have to run the macro again.

Any ideas why it doesn't keep looping until it finds all the occurances.

Any help appreciated

[AB33]

May be change this line

Please Login or Register  to view this content.

In to

Please Login or Register  to view this content.

[brynbaker]

As a general rule, any loop that looks like this:
for x = 1 to
rows(x).delete
next
is going to have problems as the area covered gets smaller.

One approach is to use
for x = finalrow to 1 step -1
and work from the bottom up.

OR if you must move down, use do While...loop and control the exit condition yourself.

[OnlySteveH]

Hiya,

I'm not sure about the line:

Please Login or Register  to view this content.

Is this doing what you want? It'll start at A55, then A56 etc. So any rows that match your criteria that are higher than row 55 won't be caught?

HTH

S.

[plycc100no]

Thanks brynbaker
Works a treat now by would never have got that myself

[plycc100no]

Thank OnlySteveH

That was a typo on my part. Would have driven me mad later

[nested.if1@gmail.com]

Need to adjust the counter after deleting row....I think below code work

Please Login or Register  to view this content.

[brynbaker]

I had that bug in my code, so I'm happy to help. It is far from obvious.

[Cutter]

@ plycc100no

Welcome to the forum.

Based on your last post it seems that you are satisfied with the solution(s) you've received but you haven't marked your thread as SOLVED. I'll do that for you now but please keep in mind for your future threads that Rule #9 requires you to do that yourself. If your problem has not been solved you can use Thread Tools (located above your first post) and choose "Mark this thread as unsolved".
Thanks.

Also, as a new member of the forum, you may not be aware that you can thank those who have helped you by clicking the small star icon located in the lower left corner of the post in which the help was given. By doing so you can add to the reputation(s) of those who helped.