Office: (Office 2010) UFO Button Anzeigefilter

Das ist jetzt aber nicht wirklich eine Lösung.
Da läufst du beim letzten Datensatz im Recordset auf einen Fehler, der dann durch .eof nicht abgefangen wird.
Mach's so, wie in Maxels Beispiel, die Messagebox kannst du da ja wieder einbauen.
maike

 

bis zu dem Zeitpunkt, wo ich besagte zeile nach oben verschoben habe liefen am Ende immer Fehler auf. Jetzt, da die Zeile über der mit EOF steht kommen keine Fehler mehr. Es kommt deine MsgBox, wie sie es soll und alles sonst ist auch bestens.
Ihr nutzt doch beide Acc2003, oder? Könnte es sein, dass bei der BOF- bzw. EOF-Anweisund ein Unterschied zwischen den Versionen besteht?
ich finde das mittlerweile nämlich eigenartig, dass immer wenn ihr meint "da wird es einen Fehler geben" kommt bei mir keiner und und umgekehrt...

Außerdem, wenn ich das jetzt nicht falsch verstehe, hat Maxel das doch ähnlich gelöst. Wenn ich mir seine letzten 4 Zeilen im naechster_Click anschaue, dann wird da

1. das RS auf den nächsten Wert gesetzt
2. der Fokus verschoben
3. kontrolliert, ob der Wert der jetzt im RS steht das EOF ist und der Filter erstellt
4. der Filter aktiviert

hier auch nochmal der Code dazu
Code:

Hab ich da jetzt noch irgendeinen Denkfehler? Weil so wie es jetzt ist funktioniert es. Ich weiß nicht warum ich das jetzt noch ändern sollte?
Gruß MADDIN

 

Nachtrag: mein Fehler! Listenpunkte 3 und 4 aktivieren natürlich keinen Filter, sondern die Schaltflächen...

 

Ja, du hast recht *redface . Irgendwie verwirrt mich das Kombifeld *wink.gif* .
Dadurch, dass sich dort beim letzten Datensatz nichts bewegt/ändert, startet die Prozedur immer vor eof und erst beim Movenext wird es dann erreicht.
maike