For without Next error

[abhilashgm]

Hi,

I'm very new to VBA so this must be a very basic question. I've been trying for about 10 hours to get a simple Loop correct, which includes an If condition, but keeps returning an error saying 'For without Next'. Any help would be appreciated. Code below:

Please Login or Register  to view this content.

[AndyLitch]

Please Login or Register  to view this content.

[HaHoBe]

Hi, abhilashgm,

the command Next j shouldn´t be placed inside an If-Statement when the Start of the loop is outside that statement, maybe try it like this:

Please Login or Register  to view this content.

Please note that you should put Code-Tags around the procedure for the future.

Ciao,
Holger

[abhilashgm]

Thanks Andy and Holger for the quick replies! I moved the "Next j" outside then If loop as per your suggestions, but now I get a 'Run-time error 1004: Application-defined or object-defined error'. Does this mean a problem with the way I've entered the IsError or Search functions??

My revised code is below (note I've changed If condition to equal False rather than True):

Please Login or Register  to view this content.

[AndyLitch]

Replace that line
If Application.WorksheetFunction.IsError(Application.WorksheetFunction.Search(Cells(j, 9), Cells(i, 2))) = False Then
with this

Please Login or Register  to view this content.

[HaHoBe]

Hi, abhilashgm,

you should use only WorksheetFunction.IsError(... and not the Application before that (sorry, missed that ion my post).

Ciao,
Holger

[abhilashgm]

Hi Andy,

I think that solved all error issues, but I'm still not having success because when I execute the sub, Excel just freezes after 5 seconds. I guess this is not a fault with the code, but rather my CPU...

Thanks for your help anyway,
Abhilash

[jwright650]

Hi,

I'm very new to VBA so this must be a very basic question. I've been trying for about 10 hours to get a simple Loop correct, which includes an If condition, but keeps returning an error saying 'For without Next'. Any help would be appreciated.

One thing that helps me when looking for those pesky "for without next errors" is some amount of indenting when writing code. I don't think there is a standard amount of indention, but indention is very helpful to keep your If, EndIf's together, For and Nexts together Do until and Loops together.....etc....
Keep this in mind and I bet you will cut down on these time consuming, tough to find problems. Good luck with your writing.

[Yraen]

If that is the actual code you're running, then you've got an endless loop. i never increments beyond 2 so it never gets to 42000. You need to increment i before your loop line.