Office - Word, Excel und Co. 9.751 Themen, 41.564 Beiträge

Verfolgung starten Optionen

Access - fiktives Datum als Berechnungsgrundlage und Fristen

Thailand62 / 2 Antworten / Baumansicht Nickles

Hallo Leute,

habe leider ein sehr heikles Thema:

Bin Anwender in einer grösseren Firma und habe vom Personalchef eine Personaldatei mit Na´me, Vorname, Geburtsdatum und Eintrittsdatum erhalten.
Diese Datei soll das aktuelle Alter und die Betriebszugehörigkeit der Mitarbeiter berechnen ( was auch klappt dank Hilfe aus dem Netz!). Aber das Bezugsdatum soll nicht der heitige Tag, sondern ein frei wählbares Datum sein! Denn es geht um Kündigungen, daher müssen wir wissen, wie alt z. B. die Mitarbeiter am 1.1.2006 sind und wie lange sie in der Firma sind.
Das ist das eine - das andere ist, wie kann ich aus der Betriebszugehörigkeit den möglichen Kündigungstermin errechnen und gleichzeitig zurückrechnen, wann die Kündigung erfolgen muss?

leider ein heikles Thema, aber es hängt wohl auch mein Arbeitsplatz davon ab.....

Schon mal vielen Dank Thailand 62

bei Antwort benachrichtigen
Uli M Thailand62 „Access - fiktives Datum als Berechnungsgrundlage und Fristen“
Optionen

Verwende in 1. Linie DateDiff, um Zeit-Differenzen zu ermitteln.
Verwende ein Kalender-Steuerelement (oder ein Formular, eine UserForm, eine InputBox - wobei du dann validieren musst (isDate/cDate)), um ein bel. Datum abzufragen.
Die Dinge rund um Kündigung hängen natürlich von euren Gegebenheiten ab ("möglicher Kündigungstermin" etc. = ?).
Bsp.:
Dim dGeburt As Date, S As String, lAlter As Long
dGeburt = CDate("05.10.1968")
S = InputBox("Datum?", "Alter errechnen für Geburtsdatum " & Str(dGeburt), Date)
If IsDate(S) Then
lAlter = DateDiff("yyyy", dGeburt, CDate(S)) ' berücksichtigt nur das Jahr, also nn exakt
MsgBox "Alter: " & lAlter & " Jahre"
End If

bei Antwort benachrichtigen
Thailand62 Uli M „Verwende in 1. Linie DateDiff, um Zeit-Differenzen zu ermitteln. Verwende ein...“
Optionen

Liebe Helfer,

habe mit eurer Hilfe das Problem wie folgt gelöst:

Ausgangsbasis war das aktuelle Datum, also Datum(). Das habe ich in der Abfrage durch[Berechnungsdatum] ersetzt. Vorsicht! das klappt erst, wenn man in den Parametern auch die Parameter auf"Wunschdatum" setzt und den Felddatentyp auf "Datum/Uhrzeit".

Vielen Dank an alle!

PS: Das mit den Fristen versuche ich über eine neue Spalte mit hinterelegten Fristen.

bei Antwort benachrichtigen