Zur Lösung dieses Problems bietet sich die Filter-Eigenschaft des Unterformulars an. Sie müssen entweder in dem Nach-Aktualisieren-Ereignis des Textfeldes zur Eingabe des Suchkriteriums oder in dem Beim-Klicken-Ereignis einer Schaltfläche die Filter-Eigenschaft des Unterformulars setzen. Betrachten Sie dazu das folgende Beispiel:
Forms("Hauptformularname").Controls("Unterformularsteuerelementname").Form.Filter = "ID = 15"
Forms("Hauptformularname").Controls("Unterformularsteuerelementname").Form.FilterOn
Das Beispiel filtert die Datensätze des Unterformulars mit dem Kriterium "ID = 15" und schaltet den Filter ein.
Alternativ dazu können Sie auch den Like-Operator verwenden. Wenn Sie beispielsweise in einem Unterformularsteuerelement txtNachname alle Nachnamen suchen wollen, die mit dem Buchstaben "A" beginnen, würde das obige Beispiel wie folgt aussehen:
Forms("Hauptformularname").Controls("Unterformularsteuerelementname").Form.Filter = "txtNachname like 'A*'"
Forms("Hauptformularname").Controls("Unterformularsteuerelementname").Form.FilterOn