"To" がありません。

For...Next ループの先頭行に To キーワードがありません。For...Next ループの先頭行には、必ず To キーワードを記述します。For...Next ループの正しい使用例を次に示します。

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

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

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

参照

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