Datum 'Heute' anzeigen

Hallo zusammen,

ich habe folgendes Problem (wahrscheinlich ist das völlig banal und ich steh nur mordsmäßig auf dem Schlauch).

Ich habe ein Endlosformular, in dessen Datensätzen u.a. ein Feld mit „Startdatum“ und eines mit „Enddatum“ enthalten ist.
Wie schaffe ich es nun, mit einem Knopfdruck ein identisches Formular zu öffnen, bei dem nur die Datensätze angezeigt werden, wo das heutige Datum zwischen den o.g. Start- und dem Enddatum liegt? Gibt’s da einen VBA-Code oder löse ich das besser über eine zusätzliche Abfrage. Wie gesagt, es muss aber auf Knopfdruck funktionieren („idiotensicher“).

Danke und Gruß
abi

Hallo,

ich habe folgendes Problem (wahrscheinlich ist das völlig
banal und ich steh nur mordsmäßig auf dem Schlauch).

Ich habe ein Endlosformular, in dessen Datensätzen u.a. ein
Feld mit „Startdatum“ und eines mit „Enddatum“ enthalten ist.
Wie schaffe ich es nun, mit einem Knopfdruck ein identisches
Formular zu öffnen, bei dem nur die Datensätze angezeigt
werden, wo das heutige Datum zwischen den o.g. Start- und dem
Enddatum liegt? Gibt’s da einen VBA-Code oder löse ich das
besser über eine zusätzliche Abfrage. Wie gesagt, es muss aber
auf Knopfdruck funktionieren („idiotensicher“).

VBA-Ereignisprozedur Für „Beim Klicken“ einer Schaltfläache „btnForm2“:

Sub btnForm2_Click()
Docmd.Openform „frmForm2“,"Date() between [Startdatum] and [Enddatum]
End Sub

Gruß
Franz, DF6GL