Hallo,
ich möchte die folgende Berechnung in den entsprechenden VBA-Code übersetzen.

Ergebnis.Value = Date(Year(Datum1.Value)+1;Month(Datum1.Value);Day(Datum1.Value))-Datum2.Value
Datum1 und Datum 2 sind allesamt Textboxen in denen über die folgenden Formatzuweisungen das entsprechende Datum abgebildet wird.
Datum1 = Format(Datum1, "DD.MM.YYYY")
Datum2 = Format(Datum2, "DD.MM.YYYY")
Ergebnis ist eine Textbox, in dem die Differenz zwischen Datum 1 (+1) und Datum 2 abgebildet werden soll. Evtl. ist das auch über DatDiff zu lösen.
Kann mir jemand sagen, die der Abschnitt ab "Date(Year(...." aussehen muss, damit die Berechnung über VBA auch funktioniert.
Besten Dank
Ralph