Hallo, Angela!
ich habe ein Makro, das einen Filter anwendet (über 30 in
einem bestimmten Feld).
Ich möchte aber, daß dieser Filter nur auf die aktuellen
Datensätze angewendet wird, also alle bisherigen und die neue
Bedingung vom Makro erfüllt werden. Wie mache ich das?
Nicht über ein Makro; Du benötigst ein wenig Code dazu. Du schreibst Dir eine Funktion, die den Filter ergänzt, ungefähr so:
Sub ErgaenzeFilter(pfrmForm as Form, pstrKrit as String)
if pfrmForm.FilterOn then
pfrmForm.Filter=pfrmForm.Filter & Iif(pfrmForm.Filter="",""," AND ") \_
& pstrKrit
else
pfrmForm.Filter=pstrKrit
endif
pfrmForm.FilterOn = True
pfrmForm.Requery
End Sub
Diese kannst Du dann aufrufen, um zusätzliche Kriterien mit AND hinzuzufügen, also z. B.
Call ErgaenzeFilter(Forms("DeinFormular"),"DeinWert\>30")
Das ganze mal wieder ungetestet/uncompiliert…
Gruß, Manfred