"Invalid use of Me keyword"

[DB88]

Hello,



I was compiling my VBA code before creating an ACCDE when I got the compile error "Invalid use of Me keyword". The code is in a class module and it runs perfectly when I initiate it from the form. The section of code is below. Any ideas?

Private Sub cmdFilter_Click()
'Purpose: Build up the criteria string from the non-blank search boxes, and apply to the form's Filter.
Dim strWhere As String 'The criteria string
Dim lngLen As Long
If Me.filterRefuel = 1 Then
strWhere = strWhere & "([AerialRefuelCapable]=""Yes"") AND "
ElseIf Me.filterRefuel = 0 Then
strWhere = strWhere & "([AerialRefuelCapable]=""No"") AND "
End If
....
...
End Sub

[June7]

I am confused. AFAIK, the Me reference can only be used in code behind forms and reports. You say code is in a class module yet the Sub is a Click event. By class module do you mean a form? In which case the Me should work.

What field type is AerialRefuelCapable?

[ranman256]

Stop using ME.

[DB88]

Sorry, yes it is the module for a Form. The Me does work when I'm initialing the code from the form. But when I do Dubug>Compile I get the error.

AerialRefuelCapable is text field. Note: the debugger highlights the Me in "If Me.filterRefuel = 1 THen" line. filterRefuel is an unbound combo box on the form.

[June7]

I don't know why the debugger does not like that line. I don't see anything wrong with it. And since the code works when run, is weird.

Try as ranman suggests and use explicit form name instead.

[DB88]

It was my silly mistake. I forgot to delete an old module that I have since stop using. This section of code in that module was what was causing my problem. Sorry for wasting your time.