VBA produces wrong output for loops

VBA doesn't produce the wrong output, your logic/code does. If you have A, B and C in W5:W7 and A in F9, first time through the inner loop, they are equal. After that, they're not, hence you get INPUT RATE. If you compare any cell to three things, it's always going to not be equal to one of them.

Use COUNTIF to check if the cell is present in the small range.

Regards, TMS

Hi,

It's a little difficult to comment with certainty without seeing the problem in the context of the workbook.

Have you tried stepping through the code up to the IF line in question and then hovering over the in1.value and then the inn.value to identify what they are. (Or add a Debug.Print in1.value and Debug.Print inn.value immediately before so that the Immediate window will record them.

That may help you discover the problem.

You might also usefully use the WATCH window and set a break for in1<>inn and then in1=inn so that you can see when inconsistencies occur.

Otherwise upload the workbook.

Untested:

Please Login or Register  to view this content.

Regards, TMS

You're welcome

The underscore isn't anything to do with the If/Else/End If. You can use an underscore to split a line of code over two or more lines. It's mainly to make the code more readable.



If you are satisfied with the solution(s) provided, please mark your thread as Solved.


New quick method:
Select Thread Tools-> Mark thread as Solved. To undo, select Thread Tools-> Mark thread as Unsolved.

Or you can use this way:

How to mark a thread Solved
Go to the first post
Click edit
Click Go Advanced
Just below the word Title you will see a dropdown with the word No prefix.
Change to Solved
Click Save


You may also want to consider thanking those people who helped you by clicking on the little star at the bottom left of their reply to your question.

Thanks for the rep.


Fully commented version with variables defined:

Please Login or Register  to view this content.

Regards, TMS