Return without GoSub error

[JonathanT]

I have a form that has 12 labels. 6 labels open a report when clicked and 6 labels open a form. I opened my DB recently and all labels give the error below when clicked.



"The expression On Click you entered as the event property setting produced the following error: Return without GoSub"

This hapened out of the blue when I opened the database. It was working fine when I closed it the last time.
I can't find the answer anywhere. Any help would be apprciated. DB attached

[pbaldy]

I get compile errors due to none of these controls existing on the form:

Private Sub Label174_Click()
  Me.CategoryCortinaFilter = "*"
  Me.VenueCortinaFilter = "*"
  Me.GenderCortinaFilter = "*"
  Me.CategoryLAFilter = "*"
  Me.VenueLAFilter = "*"
  Me.GenderLAFilter = "*"
End Sub

I'd fix that first.

[pbaldy]

By the way, it appears you may have deleted that label, but its code remains so delete that too.

[JonathanT]

Those controls were on the form but I deleted them before posting as I thought they might be a problem. I was getting the error before and after the deletions

[JonathanT]

I corrected the code and the form is working as designed. I'll wait to post solved as I believe the error has returned in the past when no changes have been made except closing the database

[pbaldy]

Sounds good. Those were the only code errors I saw, other than these statements should be at the top of every module:

Option Compare Database
Option Explicit

More:

https://www.baldyweb.com/OptionExplicit.htm

[JonathanT]

Thank you!!

[pbaldy]

Happy to help and good luck! Hopefully that error doesn't reappear.