4
Access - Berichterstellung eines gewählten Datums
Hallo,
ich habe eine minimal Access Datenbank erstellt mit einem Formular über das ich meine gewünschten Daten eingebe. Unter andern ist dort das Datum des Beginn und der Fertigstellung vorhanden. Ich habe des weiteren einen Bericht erstellt der mir die Tagesübersicht eines gewählten Tages darstellen soll. Allerdings gibt er alle Datensätze aus. Über eine Schaltfläche (Tagesübersicht) im Formular soll der Bericht nur mit Datensätzen von diesem Datum ausgegeben werden. Eigentlich nur vom aktuellen Tag, da dieser Bericht täglich gedruckt wird. Sollte man es aber mal vergessen haben werde ich noch ein Auswahlfeld einrichten welches das gewünschte Datum beinhaltet.
Ich habe es mit der date() Funktion als Filter versucht aber das scheint nicht zu gehen. Im Formularkopf geht das allerdings.
Kann mir jemand behilflich sein?
Grüße
PS: Tippe vom Handy. Rechtschreibfehler und Formatierung bitte ignorieren. Danke
ich habe eine minimal Access Datenbank erstellt mit einem Formular über das ich meine gewünschten Daten eingebe. Unter andern ist dort das Datum des Beginn und der Fertigstellung vorhanden. Ich habe des weiteren einen Bericht erstellt der mir die Tagesübersicht eines gewählten Tages darstellen soll. Allerdings gibt er alle Datensätze aus. Über eine Schaltfläche (Tagesübersicht) im Formular soll der Bericht nur mit Datensätzen von diesem Datum ausgegeben werden. Eigentlich nur vom aktuellen Tag, da dieser Bericht täglich gedruckt wird. Sollte man es aber mal vergessen haben werde ich noch ein Auswahlfeld einrichten welches das gewünschte Datum beinhaltet.
Ich habe es mit der date() Funktion als Filter versucht aber das scheint nicht zu gehen. Im Formularkopf geht das allerdings.
Kann mir jemand behilflich sein?
Grüße
PS: Tippe vom Handy. Rechtschreibfehler und Formatierung bitte ignorieren. Danke
Share on Facebook
Share on Twitter
Share on Reddit
Share on LinkedinPlease also mark the comments that contributed to the solution of the article
Content-Key: 235044
Url: https://administrator.de/contentid/235044
Printed on: April 19, 2024 at 11:04 o'clock
4 Comments
Latest comment
Hallo m-hans,
dafür gibt es mehrere Möglichkeiten, eine davon ist dieser VBA-Code um einen Bericht nach einem Datums-Feld gefiltert zu öffnen:
In diesem Beispiel sind txtDate1 und txtDate2 die Textboxen in denen die Datumswerte stehen. In Zeile 3 musst du noch den Namen des Berichtes (DEINBERICHT) angeben und den Namen der Datumsspalte (DATUMSSPALTE) in deinem Bericht anpassen. Dann wird der Report mit den angegebenen Dati gefiltert. Wenn du dann beide Datumsfelder auf das gleiche Datum setzt wird auch nur der eine Tag angezeigt.
Eine andere Möglichkeit verwendet eine Abfrage als Datenquelle für den Bericht, in der dann in den Kriterien der Datumsspalte auf die Textfelder des Formulars verwiesen wird.
Hoffe das war soweit verständlich ausgedrückt.
Grüße Uwe
dafür gibt es mehrere Möglichkeiten, eine davon ist dieser VBA-Code um einen Bericht nach einem Datums-Feld gefiltert zu öffnen:
In diesem Beispiel sind txtDate1 und txtDate2 die Textboxen in denen die Datumswerte stehen. In Zeile 3 musst du noch den Namen des Berichtes (DEINBERICHT) angeben und den Namen der Datumsspalte (DATUMSSPALTE) in deinem Bericht anpassen. Dann wird der Report mit den angegebenen Dati gefiltert. Wenn du dann beide Datumsfelder auf das gleiche Datum setzt wird auch nur der eine Tag angezeigt.
dateVON = Format(DateValue(Me.txtDate1.Value), "yyyy-mm-dd")
dateBIS = Format(DateValue(Me.txtDate2.Value, "yyyy-mm-dd")
DoCmd.OpenReport "DEINBERICHT", acViewPreview, , "DATUMSSPALTE BETWEEN #" & dateVON & "# AND #" & dateBIS & "#" Hoffe das war soweit verständlich ausgedrückt.
Grüße Uwe
Hi Uwe...
Das sieht genau nach dem aus was ich suche...
Mit der DoCmd.OpenReport hatte ich schon angefangen, hab aber nichts funktionierendes zustande bekommen.
Wahrscheinlich weil ich die ganze Zeil Where edingung als Filter stehen hatte - sprich ein "," vergessen.
Probier ich in der Mittagspause gleich mal aus. Danke!
Edit: Funktioniert! Astrein... Vielen Dank...
Eine Frage aber noch: Kannst du mir den Aufbau der WHERE Bedingung mal erklären? Wie setzt sich die zusammen? Steige da nicht hinter
Mal angenommen ich möchte nur die "dateBIS" auslesen und im Bericht angezeigt haben, geht das auch ohne "dateVON" auf den gleichen Wert zu setzen?
Das sieht genau nach dem aus was ich suche...
Mit der DoCmd.OpenReport hatte ich schon angefangen, hab aber nichts funktionierendes zustande bekommen.
Wahrscheinlich weil ich die ganze Zeil Where edingung als Filter stehen hatte - sprich ein "," vergessen.
Probier ich in der Mittagspause gleich mal aus. Danke!
Edit: Funktioniert! Astrein... Vielen Dank...
Eine Frage aber noch: Kannst du mir den Aufbau der WHERE Bedingung mal erklären? Wie setzt sich die zusammen? Steige da nicht hinter
Mal angenommen ich möchte nur die "dateBIS" auslesen und im Bericht angezeigt haben, geht das auch ohne "dateVON" auf den gleichen Wert zu setzen?
Zitat von @m-hans:
Mal angenommen ich möchte nur die "dateBIS" auslesen und im Bericht angezeigt haben, geht das auch ohne
"dateVON" auf den gleichen Wert zu setzen?
sorry, hatte nur durch Zufall deine zusätzliche Frage in deinem bearbeiteten Post gesehen...Mal angenommen ich möchte nur die "dateBIS" auslesen und im Bericht angezeigt haben, geht das auch ohne
"dateVON" auf den gleichen Wert zu setzen?
Klar also wenn du alles bis zu einem bestimmten Datum(und inkl. diesem) haben möchtest machst du es so:
DoCmd.OpenReport "Datumsbericht", acViewPreview, , "DATUMSSPALTE <= #" & dateBIS & "#"
DoCmd.OpenReport "Datumsbericht", acViewPreview, , "DATUMSSPALTE = #" & dateBIS & "#"
Der Syntax des Filters ist normale SQL-Syntax nur ohne das Schlüsselwort WHERE: http://www.w3schools.com/sql/sql_where.asp
Grüße Uwe
Suuuuper... der Tip mit der # ist ein MUSS bei Access war Gold wert!
Hatte es vorher so
DoCmd.OpenReport "Datumsbericht", acViewPreview, , "datum = " & dateBIS
Da kam aber nichts raus. Leerer Bericht!
Mit der Raute klappt es. Danke vielmals...
Gelöst!
Hatte es vorher so
DoCmd.OpenReport "Datumsbericht", acViewPreview, , "datum = " & dateBIS
Da kam aber nichts raus. Leerer Bericht!
Mit der Raute klappt es. Danke vielmals...
Gelöst!
