"Next" がありません。

For...Next ループ構造が正しく終了していません。For...Next ループ構造は、必ず Next ステートメントで終了します。For...Next ループ構造の正しい使用例を次に示します。

For counter = start To end [Step step]
    [statements]
    [Exit For]
    [statements]
Next

このエラーを解決するには

For...Next ループ構造に必要なすべての要素が含まれていることを確認します。

参照

For...Next ステートメント | Do...Loop ステートメント | Exit ステートメント | For Each...Next ステートメント | While...Wend ステートメント