Compile Error: Next Without for

R

Remco

OK guys,

What is it I am doing wrong. I get a compile error (Next without For)
on the following piece of VBA:

For i = 2 To Lengte
If MyArray(i) <> " " Then
TekstOut(j) = MyArray(i)
j = j + 1
Else
k = i - 1
If MyArray(k) = " " Then
j = j + 1
Else
TekstOut(j) = MyArray(i)
j = j + 1
End
End
Next

Do you have clue?

TIA, Remco
 
Top