hab schon eine möglichkeit
Code:
Dim strSQL As String
strSQL = "Select /AUSWAHL/ from /TABELLE/ Where /KRITERIUM/ Like '*"
strSQL = strSQL & Me!liste & "*'"
Me!liste.RowSource = strSQL
Me!liste.Requery
____________________________________
Der Unterschied zwischen Theorie und Praxis ist, das es in der Theorie keinen Unterschied zwischen Theorie und Praxis gibt, in der Praxis aber schon.
Wer schreibt, der bleibt!
|