type mismatch

[Guest]

I get a "Type mismatch" on the following lines:

Dim frm as form

If frm Is Nothing Then
Set frm = Me.frmList2
End If

frmList2 is a subform and spelled correctly. This code works other places. ??

Thanks so much!

 

[Allen Browne]

I'm guessing that frmList2 is a subform control. You refer to the form in
the subform control with the .Form property, so you need:
Set frm = Me.frmList2.Form

More info:
Referring to Controls on a Subform
at:
http://allenbrowne.com/casu-04.html