Returnに対するGoSubがありません。

質問

アクセスファイルを立ち上げると毎回
「イベントプロパティに指定した式
読み込み時でエラーが発生しました：
Returnに対するGoSubがありません。」
と出ます。

ヘルプの内容は
「このエラーは、
イベントのロジックの場所を評価できないために
イベントを実行できなかった場合に発生します。
たとえば、フォームの "OnOpen/開く時" プロパティが =[フィールド] に設定され
イベントが開始されたときに、
マクロまたはイベントの名前が実行対象として予期されるため、このエラーが発生します。」

ＯＫボタンを押すとフォームが起動して
普通の使えます。

コードのどこかが間違てるのかな？
と、ＶＢＥ画面で
デバッグ→コンパイルをしてみましたが
何もエラーになりません。

でも毎回上記のエラーが出るのですが
原因がわかりません。

回答No.1

mshr1962 · ベストアンサー

>Returnに対するGoSubがありません。
ですので、VBA内にReturnが有るはずです。
普通は、GoSubで、そのReturnの直前に跳んで、処理をした結果を
GoSubの直後の行に反映するはずですが、
１． そのGoSubが存在しない
　→ Returnを消去
２． 直前にExit Subがないために、不要な処理（Return）を最後にもう一度実行してしまってる
　→Gusubの跳び先の直前にExit Subを追加してルーチンを終了させる。

お礼

どうもありがとうございました。