Hoi Spezies,
nach dem Laden eines Datensatzes möchte ich, dass mir aut. Resttage ausgerechnet und das Ergebnis in einem Feld angezeigt wird. Diese Resttage sollen nicht gespeichert werden.
Zum Beispiel.
Ablaufdatum = 25.03.09 Im Datensatz enthalten
Heute = 18.03.09 Tagesdatum
Ergebnis = 7 Ergebnis
Niessige Grüße
Wander
Hallo,
schreib in den Steuerelementinhalt des (FormularText-)Feldes:
=DatDiff(„d“;[Ablaufdatum];Datum())
Viele Grüße vom Bodensee
Franz , DF6GL
PS: Feedback erwünscht!
Hoi Franz
=DatDiff(„d“;[Ablaufdatum];Datum())
da wird wenigstens akzeptiert.
Was fehlt ist die aut. Berechnung!
Beste Grüße nach unten 
Wander
Hoi Wander,
ME.Ergebnis = DatDiff(„d“;ME.Ablaufdatum;Datum())
Grüße aus Schönberg (Lübeck)
Wolfgang
(Netwolf)
Hallo,
wieso: „Was fehlt ist die aut. Berechnung!“ ??
Viele Grüße vom Bodensee
Franz , DF6GL
PS: Feedback erwünscht!
Hoi Wolfgang,
ME.Ergebnis = DatDiff(„d“;ME.Ablaufdatum;Datum())
Da kam ständig ein Listenendefehler oder er brauchte ein ).
Erst als ich das ; mit einem , tauschte, nam VBA es an und zog es noch etwas auseinander
Private Sub Generell_Click()
Me.Ergebnis = DatDiff(„d“, Me.Ablaufdatum, Datum())
End Sub
Danke!
Bald komme ich wieder bei Lübeck vorbei … die Ostsee und seine Fische rufen
Gruß
Wander
Hoi Franz,
das Ergebnis muss direkt nach dem Laden des Datensatzes angezeigt werden.
Besten Gruß
Wander
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
Hallo,
wenn Du das genau wie gepostet gemacht hast, passiert das auch…
Hoi Wolfgang,
irgendwie funzt es dennoch nicht. Vielleicht eine Frage der Formattierung?
Beste Grüße
Wander
P.s. Soll ich die MDB direkt zu Dir schicken mit einer Beantwortung der noch offene Nachricht von Dir?
Hallo,
wenn Du das genau wie gepostet gemacht hast, passiert das
auch…
Hallo Franz,
eher nichteben leider nicht.
Bei Deiner Formal packte er ein „“ mit rein, ob es daran liegt?
=DatDiff("\d";[Bindefrist];Datum())
Das Ergebnisfeld habe ich mit „Zahl“ und mal mit Datum/Zeit formattiert. In beiden Fällen funktionierte es leider nicht.
Besten Gruß
Wander
Hallo,
befürchte, das Ding steht NICHT in der Eigenschaft „Steuerelementinhalt“ des Textfeldes.
Hallo,
befürchte, das Ding steht NICHT in der Eigenschaft
„Steuerelementinhalt“ des Textfeldes.
Hoi Franz,
Du hattest Recht … danke!
Man sollte wenn man krank ist … ins Bett gehen und sich nicht mit Access beschäftigen )
Allerdings erhalte ich jetzt ein „#Fehler“
Besten Gruß
Wander
Hoi Wander,
P.s. Soll ich die MDB direkt zu Dir schicken
nun ja, du kannst sie auch erstmal an alle deine Freunde schicken, diese schicken sie wieder an Ihre Freunde … und irgendwann schick mir dann einer die MDB mal zu
mit einer Beantwortung der noch offene Nachricht von Dir?
genau so
Grüße aus Schönberg (Lübeck)
Wolfgang
(Netwolf)
Hallo,
hast Du den Backslash entfernt??
Hoi Franz,
entfernt ja … aber Access packt den Backslash immer wieder rein. da kann ich machen was ich will 
Besten Gruß
Wander
Hallo Franz,
Hallo Wander, (immer noch gute Besserung)
du kennst ja die Weisheit:
Erkältungen dauern ohne Medikamente 7 Tage,
mit Medikamente nur eine Woche
ich habe mittlerweile die DB hier per Mail bekommen.
Viele Formulare, Felder etc. fangen mit einer Zahl an. Auch in dieser Funktion wird das Feld [2 Bindefrist] verwendet.
Ich habe Wander gebeten die Bezeichnungen zu korrigieren, da Zahlen am Anfang von Bezeichnungen (jeglicher Art) von Access unterschiedlich negativ behandelt werden. Auch sollte ein Unterstrich als Trenner statt einem Leerzeichen verwendet werden.
In diesem Fall konnte ich sehen, dass die Funktion direkt als Steuerelementinhalt angegeben wurde, obwohl es sich um ein gebundenes Feld handelte!
Ich werde den notwendigen Code erstellen, sobald ich die korrigierte DB erhalten habe
Grüße aus Schönberg (Lübeck)
Wolfgang
(Netwolf)
Lieber Wolfgang,
ich danke Dir ganz herzlich für den persönlichen Support den ich am Wochenende von Dir erfahren durfte!
Das Du mir Deiner privaten Zeit mit Rat und Zeit für mich geopfert hast, rechne ich Dir ganz ganz hoch an!
Beste Grüße
Wander