"do" がありません。

Do ループが正しく記述されていません。Do ループは、対応する Do ステートメントで開始します。Do ループの正しい使用例を次に示します。

Do [{While | Until} condition]
   [statements]
   [Exit Do]
   [statements]
Loop 

または、次の構文で記述します。

Do
   [statements]
   [Exit Do]
   [statements]
Loop [{While | Until} condition]

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

• Do 制御構造を削除するときに、Loop ステートメントを削除し忘れている可能性があります。
• Do ループに必要なすべての要素が含まれていることを確認します。

参照

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