Office: Jubiläum berechnen

Hallo,
ich hab mir eine kleine db als Vereinsverwaltung erstellt.
Ich hänge an einer Abfrage fest, die ich für einen Bericht brauche. Ich hab das Eintrittsdatum der Mitglieder in einer Tabelle. Über eine Abfrage wollte ich jetzt die Jubiläum für das anstehende Jahr vorab abfragen. Meine Abfrage war

([Eintrittsdatum]-Datum())/365

Wie man sich denken kann kommen da unrunde Zahlen raus.

Wie bekomme ich das Datumsformat in den Griff.

Meine zweite Frage wäre,
wie kann ich die Abfrage auf ein Jahr begrenzen
Datum()+365 ??

Geht das überhaupt mit einer Abfrage, oder sollte ich das über VBA Code probieren?

Vielleicht kann mir jemand helfen! *angel

Ich verwende Access2000

:)

 

Hallo
Ich füge Dir hier im anhang etwas über Datum an.
(Geburstage sind ja auch jubiläume)

 

Und da ich nur 1 Datei anhängen kann hier noch
ein Muster

 

Vielen dank für die Antwort.

Ich hab mir das mal durchgelesen und folgendes in meiner Abfrage eingebaut:

Jubiläum: DatDiff("jjjj";[Eintrittsdatum];Datum())+(Format(Datum();"mm""dd""")

 

Hallo
Schau dir in meiner Beispiel MDB die abfrage "AbfAltersstufen"
oder "AbfAltersstufenMitFunction" an

 

Die unten aufgeführte Abfrage funktioniert ja bestens, gibt aber nur die Jubiäen aus, die bis zum aktuellen Datum vorliegen.

"Leider" wird bei uns die Ehrung schon am Jahresanfang vorgenommen, wenn der Probant im laufenden Jahr ein Jubiläum (25,40,50 Jahre) feiert.

Zur Vorbereitung muß ich die Jubiläen von 2004 schon Ende 2003 wissen.

Wie muß die Abfrage aussehen, wenn ich wissen will, wer in (einem möglichst einzugebenden) Jahr in der Zukunft ein Jubiläum hat.

Vielen Dak vorab für die Hilfe

Gruß
Bernhard

 

Hallo
eine möglichkeit
Code:

wobei anstelle von DateAdd("yyyy",1,Now()) auch eine Globale-Variable
mit dem wert des gewünsten Jahrs eingegeben werden kann.
Die IN reihe kann natürlich belibig erweitert und verändert werden.

 

Abs (DateDiff("yyyy",date,cdate("01.01.1990")))

 

Ihr seit so schnell, dass ich mich noch nicht mal bei einzelnen für die Hilfe bedanken kann

@LanzRudolf
Die Funktion klappt prima!
Kannst Du mir auch sagen, wie ich dort ein bestimmtes Jahr eingeben kann.

@lfg
Die funktion verstehe ich und Access nicht
Der von Ihnen eingegebene Ausdruck ist syntaktisch falsch ; der Cursor steht auf dem ersten Komma


Gruß
Bernhard

 

Hallo
SELECT TblName.ID, TblName.Vorname, TblName.Name, TblName.GebDat, DateDiff("yyyy",DateAdd("yyyy",0,[gebdat]),"01.01.2004" ) AS d2
FROM TblName
WHERE (((DateDiff("yyyy",DateAdd("yyyy",0,[gebdat]),"01.01.2004")) In (5,10,15,20,25,30,35,40,45,50,55,60)))
ORDER BY DateDiff("yyyy",DateAdd("yyyy",0,[gebdat]),"01.01.2004");

 

Hallo mir geht´s wie dem Kollegen Bernhard1 mit der Jubiläumsabfrage. Auch ich will die 5, 10, 15 jährigen Jubiläen am Anfang eines Jahres anzeigen lassen, in der das Mitglied das Jubiläumsjahr erreicht.
Nur ich komme mit dem Code vom Rudolf Lanz nicht zurecht. Bei mir wird immer ein Syntaxfehler angezeigt. Ich habe den Code folgendermaßen eingefügt:

DateDiff("yyyy",DateAdd("yyyy",0,[gebdat]),DateAdd("yyyy",1,Now())) AS d2
FROM TblName
WHERE (((DateDiff("yyyy",DateAdd("yyyy",0,[gebdat]),DateAdd("yyyy",1,Now())))
In (5,10,15,20,25,30,35,40,45,50,55,60)));

Habe dann das TblName gegen mein Tabellenblatt Mitglieder getauscht und bei mir heißt die Spalte GebDatum: Habe also das Gebdat gegen GebDatum: ausgetauscht.

Was habe ich falsch gemacht?

 

Erst mal vermisse ich ein SELECT ganz am Anfang Deiner Anweisung.
Welcher Syntaxfehler wird angezeigt?

 

Da steht:

In der Zeile unten blinkt dann das Komma bei