End Select に対応する Select Case があります

End Select は前にある Select Case と対応している必要があります。 このエラーの原因と解決策は次のとおりです。

  • End Select ステートメントを、対応する Select Case ステートメントなしで使用しました。 これは、通常、Select Case ブロックの下に追加の End Select が追加されていること、または Select Case ブロックを別のプロシージャにコピーするときに End Select ステートメントの後に残すことが原因です。 各 End Select ステートメントを調べて、 Select Case 構造を終了していることを確認してください。

詳細については、該当する項目を選択し、F1 キー (Windows の場合) または HELP (Macintosh の場合) を押してください。

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。