Elite Veteran
Beiträge: 908
 
Ort: Wien | Hallo, Peer!
Peerli
...Wo ist der wesentliche Unterschied zu meiner Variante?
Hier: If InStr(Me.OrderBy, "UeWArt_ID_f") > 0 Then
d.h. zuerst wird geprüft, ob das aktuelle Sortierfeld bereits im Sortierausdruck enthalten ist. Wenn ja, wird bloß die Sortierrichtung umgedreht, wenn nein, wird das bisherige Sortierfeld auf das aktuelle geändert.
Dein bisheriger Code hat nur geprüft, ob es schon einen Sortierausdruck gab, und den gab es durch den Text in der Sortiereigenschaft des Formulares immer, d.h. immer Ja. Bei Ja wurde aber das Sortierfeld nicht geändert und blieb immer beim Datum.
-----
Servus
Karl
*********
Access-Entwickler-Konferenz: https://www.donkarl.com/?aek
Access DevCon Vienna: https://www.donkarl.com/devcon
Access Forever: https://www.accessforever.org
Access News: https://www.youtube.com/playlist?list=PLVCeBbJIMDvdJ8ghMbEakJ6_EQyvy... |
Sortierung Endlos Unterformular