Supportnet / Forum / Datenbanken

Hallo, wie kann ich ein Datum beim kopieren in den neuen Datensatz um X Monate erhöhen? Habe schon ein Feld im Formular in dem eine Zahl stehen kann(z.B. 12 oder 24....). Das Feld mit dem Datum heisst Prüfdatum, das mit der Zahl Prüfintervall. Gruß Gilli

Hallo Gilli,
einfach diese VBA-Funktion einbauen:

pruefdatum = DateAdd("M", pruefintervall, (pruefdatum))

wobei "M" = Monat(e) geht auch mit "D" und "Y"
Gruß Rudolf

Hallo Rudolf. Danke für die Zeile.
Leider wird das Datum nicht höher gesetzt.
Habe ich da was falsch gemacht?

DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 2, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 5, , acMenuVer70
Me.PrüfberichtNr = Null
Me.PrüfOK = 0
Me.AufRausOK = 0
Prüfdatum = DateAdd("M", AuftragNeuIntervall, (Prüfdatum))

Mit Me.Prüfdatum gehts auch nicht,
mit Me.AuftragNeuIntervall gibts einen Fehler.

hilfe...

Gruß
Gilli

Sorry, vielleicht sollte ich auch den richtigen Feldnamen Für AuftragNeuIntervall verwenden.
Rudolf, dein Tipp funktioniert.
So siehts jetzt aus:
Me.Prüfdatum = DateAdd("m", Me.AuftragNeuIntervall, (Me.Prüfdatum))


Vielen Dank von Gilli

Hallo Gilli,
gut, daß du es gemerkt hast, ich hab es nicht gesehen, bin schon echt ins grübeln gekommen.
Gruß Rudolf

• problem mit datumsfunktion!
• Datumberechnung in Exel
• Mit Datum rechnen
• In Exel 360 Monate zu einem Datum addieren