Abfrage automatisch aktualisieren

[malibum]

Hallo,

in meiner Datenbank habe ich in einem Formular einen Suchfilter mit einer Dropdownliste gebastelt. Dieser Funktioniert auch einwandfrei. Wie bekomme ich es nun aber hin, dass sich die Liste je nach Filter automatisch aktualisiert? Bspw. ich wechsel ein Element in meinem Filter, wie wird die Liste dann aktualisiert? Dies geschieht bisher nur wenn ich die Abfrage neu starte. Mit einem Suchbutton ließe sich dieses Problem sicherlich lösen. Allerdings fehlt mir da die Grundlage wie ich dass alles Verknüpfen soll... 

Lg
Malibum

[DF6GL]

Hallo,


du solltest etwas genauer beschreiben, was du da gebastelt hast.

Ist die "Dropdownliste" ein Kombifeld im Formular?

Wie ist der "Filter" realisiert?  D. h., WIE wird gesucht?

"die Liste je nach Filter automatisch aktualisiert"

Was für eine Liste ist das? Das (Endlos-)Formular, das die gefilterten DS anzeigt ?

Wenn in der Formular-Abfrage ein Verweis auf das Kombifeld als Kriterium eingebaut ist, dann könnte die Ereignis-Prozedur für das "Klick-Ereignis" eines Suchbuttons helfen:

Code [Auswählen] Erweitern

Sub btnSuchen_Click()
Me.Requery
End Sub


[malibum]

Hallo Franz,

also mein Datensatz beinhaltet diverse Geräte, die in Kategorien aufgeteilt sind. Durch meinen Filter (dem Kombifeld) kann ich die Kategorie auswählen und mir werden die Datensätze aller Geräte der ausgewählten Kategorie in einer Tabelle angezeigt.

In der Abfrage habe ich als Kriterium den verweis auf das Kombifeld eingebaut.

Vielen Dank für deine Hilfe! Habe müssen noch etwas recherchieren da ich in VBA nicht so bewandert bin aber durch deinen Denkanstoß habe ich es nun hinbekommen :-)

Lg
Malibum

[Beaker s.a.]

Hallo,
Normal würde ich sagen

Private Sub DeinKombi_AfterUpdate()
    Me!DeineListe.Requery
End Sub

gruss ekkehard

[DF6GL]

Hallo,

so wie ich es verstanden habe, soll nicht die Kombifeldliste, sondern das Endlosform aktualisiert werden.

[Beaker s.a.]

Hallo Franz,
Stimmt, schlecht gelesen.
Dann setzen wir das .Requery eben auf das UFo ab.

Me!DeinUFo.Form.Requery

gruss ekkehard