Hi
to be honest this answer won't help you to get a more specific response
:-)
How should we help you finding this error if we don't have more
information. So if your macro is not that long post the omitted lines.
I'm (and I think the same is true for Chip) quite sure that there's an
additional line of code (e.g. 'End', 'End if', 'Loop', etc.) which does
NOT have an opening statement

You may check this by yourself by identing each loop / if clause


--
Regards
Frank Kabel
Frankfurt, Germany

"Marie Lavoie" schrieb im Newsbeitrag
...
nope

"Frank Kabel" a écrit dans le message de
...
Hi
you probably have an additional loop or other end statement in your
other 'many code lines'

--
Regards
Frank Kabel
Frankfurt, Germany

"Marie Lavoie" schrieb im Newsbeitrag
...
Hi, I have a macro that was once working...

It looks like this:

Sub LectureCode()

i = 5 'initialization du compteur
Sheets("Principale").Select

'Lecture du code
Do While Range("A" & i) < Empty

(... here I have many code lines...)

Loop

But when I run it, it highlights the word Loop and says it has no
"Do"

The only things I changed since the time it was working are lines
of
code
between this Do and Loop and I have not entered a "Loop" in
there.

...Help?

Also, what is the difference between Do While ... Loop and While
....
Wend

Marie