Problem with Filter

[RonnieODIN]

Hi all,

I am having troubles getting a filter working.

I have previously had succes setting a filter on a subform from a mainform using the following code:

Me!subMaskiner.Form.Filter = "[Kundenavn] = [Forms]![frmListeMaskiner]![cboCurrentCostumer]"

Now I have to filter a mainform but I can't make it work.

I am trying the following code:

Me!Filter = "[Kunde] = Me.[cboKunde]"

Anyone having an idea of what's wrong? :banghead:

-Ronnie

 

[vbaInet]

Are you filtering the main form from the subform? Where are you filtering it from?

Oh by the way, Me.cboKunde needs to be outside the quotes. It should be concatenated.

 

[RonnieODIN]

I am filtering the mainform from the mainform.

I cannot set Me.cboKunde outside quotes.

 

[vbaInet]

I cannot set Me.cboKunde outside quotes.

Or you mean you don't know how to?

Is Me.cboKunde bound or unbound?

If Kunde is a numeric field, use the first code otherwise use the second:

Me.Filter = "[Kunde] = " & Me.[cboKunde]
Me.Filter = "[Kunde] = " Chr(34) & Me.[cboKunde] & Chr(34)

And when you apply a filter, remember to turn it on, i.e. Me.FilterOn = True