Automatisch nächste Zeile auswählen nach Zeit

[Senate1987]

Hallo

Ich habe in einer Tabelle einige Ereignisse stehen mit einer Uhrzeit wann sie ausgeführt werden müssen. Nun will ich in einem Formular die ganze Tabelle anzeigen lassen, es sind nur 7 Datensätze, und dabei soll immer das zeitlich nächste Ereignis markiert werden. In etwa so dass das Ereignis von 11:44 markiert ist sofort nach Abschluss des letzten Ereignisses und das dann noch weitere 5 Minuten nach Ablauf der Zeit und dann das nächste wieder genau so.

Am liebsten wäre mir auch wenn das betreffende Ereignis in einer hervorstechenden Farbe markiert werden würde, in rot zum Beispiel, anstelle des normalen schwarz.

Ist dies irgendwie machbar?

[DF6GL]

Hallo,

mit der Bedingten Formatierung und dem Formular-Timer (Eigenschaft "Bei Zeitgeber") könnte man sich diesem annähern.

Wodran machst Du denn den "Zeitstrahl" fest? An der akt. Uhrzeit?
Wo ist "Abschluss des letzten Ereignisses "   definiert?



Zeige mal ein konkretes Beispiel in Tabellenform...

[Senate1987]

Anbei ein Scrrenshot meiner Tabelle. Die aktuelle Zeit des Rechners soll massgebent sein für die Markierung. Nach Abschluss des letzten Ereignisses soll er einfach nichts mehr markieren oder auch wieder das erste markieren, das ist eigentlich egal.

[DF6GL]

Hallo,

erzeuge ein Endlosform auf Basis der Tabelle und schreib bei der Bedingten Formatierung des Feldes Horaire:

Code [Auswählen] Erweitern


Ausdruck ist      Jetzt()-Int(Jetzt()) Zwischen DomWert("[Horaire]-int([Horaire])";"tblCourrier";"ID= " & [ID]-1) Und [Horaire]-int([Horaire])


Die Form-Eigenschaft stellst Du auf 300 000   (5 min) ein und als Ereignisprozedur "Bei Zeitgeber" :

Code [Auswählen] Erweitern

Private Sub Form_Timer()
Me.Requery
End Sub



Das funktioniert aber nur, wenn die ID fortlaufend ist und keine Lücken aufweist.

[Senate1987]

Ich hab den Text zwar ins Englische umschreiben müssen also

Code [Auswählen] Erweitern

Now()-Int(Now()) Between DLookup("[Horaire]-Int([Horaire])";"tblCourrier";"ID= " & [ID]-1) And [Horaire]-Int([Horaire])

aber trotzdem tut sich bei mir da überhaupt nichts. Die ID ist aber fortlaufend

[DF6GL]

Hallo,


welche Formatierung (z. B. rote Schrift) hast Du denn für das Feld angegeben ? Mach mal einen Screenshot vom B. F. -Fenster

[Senate1987]

Als Formatierung habe ich weisse Schriftfarbe auf rotem Hintergrund und Fett geschrieben gewählt

[MaggieMay]

Hi,

du musst auf "Ausdruck ist" einstellen und mit True vergleichen (so wie Franz es dir übrigens schon vorgemacht hat), denn die Formel ergibt einen Wahrheitswert und kein Datum.

[Senate1987]

Ok vielen Dank, dies hat nun geklappt, mein Fehler...