me.filter small problem

  • Thread starter Thread starter Ticotion
  • Start date Start date
T

Ticotion

Hi

I have a form containing a combo box that contains department names and a
text box containing a value that is linked to the department via a department
table.

When the user choose a department from the combinations box the according
value should appear in the text box.

I use the following statement but get an notation error.

Private Sub combinationsboks16_BeforeUpdate()

Me.Filter = "[dpt] = " & Me.combinationsboks16

Me.FilterOn = True

End Sub

please help

Ticotion
 
Use Me.Filter = "[dpt] = """ & Me.combonationasbox16 & """"
Me.filteron = true
And use the afterupdate event.
 
Back
Top