Else に対応する If がありません
Else の前に If が存在する必要があります。 このエラーの原因と解決策は次のとおりです。
Else ステートメントに対応する If ステートメントがありません。 If...End If 構造内の他の制御構造を調べて、正しく対応していることを確認してください。 また、ブロック If が正しく書式設定されていることを確認してください。
詳細については、該当する項目を選択し、F1 キー (Windows の場合) または HELP (Macintosh の場合) を押してください。
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。