Re: Formularfilter (Befehlsschaltfläche)

selber basteln per VBA. Ich nutze dazu folgenden Code, Filterung wird
aufgehoben und aktueller Datensatz wird der gefilterte:

Dim rs As DAO.Recordset
Dim str As String

str = Me.NameDeinesIndexfeldesimForm
'Zuordnung der Datenquelle auf Deine Abfrage, damit alle Objekte angezeigt
werden
Forms!frmHaupt.RecordSource = "NameDeinerAbfrage"
Set rs = Me.RecordsetClone
rs.FindFirst "[NameDeinesIndexfeldesimForm] = '" & str & "'"
Me.Bookmark = rs.Bookmark
rs.Close
Set rs = Nothing

Gruss

Kai Apel (Berlin)



.

Loading