Office: (Office 2003) Geburtstage der nächsten/letzten 10 Tage anzeigen

Mahlzeit,

in meiner Adressdatenbank soll jetzt unten ein kleines Listenfeld angezeigt werden, wo die Geburtstagstage der Leute angezeigt werden, die in den nächsten 10 Tagen geburtstag haben werden bzw. in den letzten 5 Tagen Geburtstag hatten. Das ganze wollte ich mit einer einfachen Abfrage gelöst bekommen. das Feld in der Tabelle "Adressdaten" heißt "Geburtsdatum" und ist vom Typ: Datum, kurz wie bekomme ich das hin, dass der den entsprechenden Zeitraum um das heutige Datum ermittelt und die richtigen Datensätze anzeigt? Der würde doch gar keine Datensätze anzeigen, weil die Leute ja ein anderes Geburtsjahr haben wie ich 1986. Kann ich das so machen, dass der das Jahr irgendwie irgnoriert?

Danke schonmal für Antworten.

Gruß
Gomilli

:)

 

Donkarls FAQ 3.12 (Link in meiner Signatur) liefert einen Ansatz (zumindest für die anstehenden Geburtstage).

 

Hi Gomilli
Schau dir mal die Abfrage an

Gruß Rainer

 

danke erstmal für die antworten. habe die abfrage jetzt mal so ausprobiert und es kommt immer der selbe fehler (mit dem ich nichts anfangen kann):

Von Alias 'Geburtsdatum' verursachter Zirkelbezug in des SELECT-Liste der Abfragedefinition.

Kann da jemand was mit anfangen?

 

[Spekulier]Du scheinst die berechnete Spalte, wie das Feld auch, »Geburtstag« zu nennen.[/Spekulier]

Mehr könnte man sagen, wenn du uns die SQL-Ansicht (klick mich) deiner Abfrage zeigst.

 

SELECT Adressdaten.Nachname, Adressdaten.Vorname, DateAdd("yyyy",nz(DateDiff("yyyy",[Geburtsdatum],Date())),[Geburtsdatum]) AS Geburtsdatum
FROM Adressdaten
WHERE (((DateAdd("yyyy",nz(DateDiff("yyyy",[Geburtsdatum],Date())),[Geburtsdatum])) Between Date()-5 And Date()+10))
ORDER BY DateAdd("yyyy",nz(DateDiff("yyyy",[Geburtsdatum],Date())),[Geburtsdatum]);

 

Richtig ist:

SELECT Adressdaten.Nachname, Adressdaten.Vorname, IIf(Nz([Geburtsdatum])>0,DateAdd("yyyy",DateDiff("yyyy",[Geburtsdatum],Date()),[Geburtsdatum]),0) AS GebHeuer, DateDiff("yyyy",[Geburtsdatum],Date())+(Format(Date(),"mmdd")0,DateAdd("yyyy",DateDiff("yyyy",[Geburtsdatum],Date()),[Geburtsdatum]),0)) Between Date()-5 And Date()+10))
ORDER BY IIf(Nz([Geburtsdatum])>0,DateAdd("yyyy",DateDiff("yyyy",[Geburtsdatum],Date()),[Geburtsdatum]),0);

 

habs jetzt 1 zu 1 reinkopiert und der gibt 'nen syntaxfehler raus und springt dann auf das "FROM"...hilfe!!

 

Das Problem ist, dass sich der Browser durch das "

 

Aber jetzt

 

jo super...läuft.

vielen dank euch allen!

 

Diese Formel hat nur ein Problem.

Wenn ich heute (30.12.2005) eine Abfrage starte bringt die Abfrage kein Ergebnis, obwohl in der Tabelle Datensätze zu finden sind, die in den nächsten 10 Tagen Geburtstag haben. Ändere ich das Systemdatum auf den 01.01.2006 findet er genau diese Datensätze und die Abfrage scheint wie gewollt zu funktionieren.

Grund: Die Abfrage ersetzt das Jahr des Geburtstages in der Spalte (Gebheuer) mit dem aktuellen Jahr (2005) und findet deswegen die Geburtstage derer, die in den nächsten zehn Tagen (aber nach dem Jahreswechsel) Geburtstag haben nicht. Geburtstage am 30.12. und 31.12. werden werden gefunden.

Das Problem habe ich mit einer Abfrage hier in meiner Datenbank auch. Ich verwende zwar eine andere Abfrage aber das Ergebnis ist das selbe - nämlich gar keines *eek.gif* . Meine Abfrage hier hat nämlich den selben Fehler.

Läßt sich dieses Problem überhaupt in einer Abfrage lösen, oder ist es nicht besser wenn das ganze in VBA realisiert wird?

Wenn ja (oder auch nein), wie löse ich das am einfachsten?

Gruß Linus
-----

 

Lösung gefunden.

Donkarl sei es gedankt. Und wer lesen kann ist klar im Vorteil. Arne hat ja in seinem Beitrag (#2) schon auf den Link hingewiesen.

FAQ3Tabfragen

und ist ganz einfach. Das habe sogar ich verstanden *grins

Gruß Linus
-----
*rolleyes.gif*