Welche Ereignisse treten beim Filtern von Datensätzen im Formular auf? Wie kann ich das Filtern verhindern?

Ein Beispiel für eine Ereignisprozedur zu Filtern

Private Sub Form_Filter(Cancel As Integer, FilterType As Integer)
If FilterType = acFilterByForm Then 
Forms!Bestellungen!Gesamtbetrag.Enabled = False
Else If FilterType = acFilterAdvanced Then
MsgBox "Dieses Formular können Sie nur mit dem Befehl bzw. " _
& "der Schaltfläche 'Formularbasierter Filter' filtern.", vbExclamation
Cancel = True
End If
End Sub

Filter (Bei Filter):
Dieses Ereignis tritt ein, wenn der Anwender versucht, einen formularbasierten Filter oder einen Spezialfilter zu erstellen. Es tritt nicht bei auswahlbasierten Filtern auf. Mit dem Parameter Cancel kann verhindert werden, dass ein Filter generiert wird, indem man ihn auf True setzt. Der Parameter FilterType gibt an, welche Art von Filter erstellt werden soll. Ist es ein formularbasierter Filter, wird er auf den Wert der Konstanten acFilterByForm gesetzt, bei Spezialfiltern auf acFilterAdvanced.