Supportnet / Forum / Datenbanken

Hallo Leute, ich habe folgendes Problem in einem Formular in Access2000: Ich habe 3 Textfelder: Anschaffungsdatum, Garantiezeit und Garantieablauf. Ich möchte es hinkriegen das, wenn ich Anschaffungsdatum und Garantiezeit eingebe, das Ablaufdatum automatisch berechnet wird. Wie kann ich das machen?? Danke schonmal, ciao

= Anschaffungsdatum + Garantiezeit ...

Wenn Garantiezeit eine Zahl ist kannst du DateAdd() nutzen.

2 Vorraussetzungen:
-Garantie ist in der Tabelle in Tagen als Datentyp Zahl deklariert (365 für ein Jahr)
-Anschaffungsdatum ist als Datentyp Datum/Uhrzeit deklariert

Formular öffnen -> Entwurfsansicht -> Textfeld hinzufügen -> darauf rechtsklick -> Eigenschaften

Im Reiter "Daten" bei "Steuerelementinhalt" = [Anschaffung]+[Garantie] eintragen wobei "Anschaffung" und "Garantie" durch deine Spaltennamen, wie sie in deiner Tabelle stehen, ersetz werden müssen.

Sonst den Ausdrucks-Editor benutzen (Rechts neben "Steuerlementinhalt" die "..." anklicken.

Alles Klar, ich habs hingekriegt, danke!!!

Du musst auf das AfterUpdate-Ereignis der Garantiezeit einen VBA-Code schreiben, indem du die beiden Daten addierst und dabei dem Textfeld des Ablaufdatums zuweist:

Etwa so:
Me!TextfeldnameAblaufdatum = DateSerial(Year(Me!Anschaffungsdatum) + Me!Garantiezeit, Month(Me!Text2), Day(Me!Text2))

• Anzahl der Tage seit einem Datum bis heute berechnen?
• Datumsformel wenn leer, dann nicht 1900 anzeigen
• Datumsberechnung
• Access Felder in einer Abfrage berechnen
• Datum berechnen