Set RS = DB.OpenRecordset("SELECT * FROM t_" & cbox_Kategorie.Text & " WHERE" & _
  "Vergeben='Nein' AND Produkt LIKE " & txt_Produktfilter.Text & " AND" & _
  "VergebenAnPC LIKE " & txt_PCfilter.Text & " AND VergebenAnUser LIKE " & _
  txt_Benutzerfilter.Text & " AND EingetragenVon LIKE " & _
  txt_Eintragungsfilter.Text)

cu
Bris

"640 KB Ram sind mehr als irgendein Programm jemals ben?tigen wird."
- (Bill Gates - 1981)