Infinite Loop

hello all...

i'm trying to loop through a bunch of worksheets and copy certain cells and paste it in a master sheet.

Please take a look at my code below because it keeps copying the same thing over and over and is stuck in an infinite loop.

Please Login or Register  to view this content.

Thank you.

Hi,

With 35 posts you really should know the rules about embedding code between Code tags.

Please correct.

Rgds

Hi,

It would be easier to advise with certainty if we had the actual workbook since the loop exit condition in the line below is clearly never being met.

Please Login or Register  to view this content.

Try stepping through the macro to observe why the Do never encounters a value in the 2nd (presumably B) column which is not equal to "Issues/Risks Log"

For instance are the 'Issues/Risks Log' in a different case perhaps, spelled differently or perhaps have a leading/trailing space?

If you can't debug it, upload the workbook, anonymised if necessary and limited to a representative sample of rows if there are hundreds of them.

Regards
Rgds

Hi

In your Case Else statement you are resetting the currentRow variable in the 2nd line to the value 28 i.e.

Please Login or Register  to view this content.

So even though you are adding +1 at the end of the Else statement the currentrow variable never reaches the value 37 which is the Loop exit condition.

Rgds

Hi,

Commenting out that line seems to work fine on the copy I have. The currentrow variable processes until it reaches the value 37 where it exits the Do..Loop and goes on to the next Worksheet if there are any.

What makes you think it's not working? Have you tried stepping through it line by line to observe what happens?

Regards