none
Datum + 1 Jahr als Standardwert im Feld eines Formulares

    Frage

  • ich möchte ein Datum + 1 Jahr als Standardwert in einem Formular haben

    nur bekomme ich es nicht hin

    Bekomme #Name oder #Funktion

    Probiert habe ich

    Eigenschaften des Feldes Standardwert

    =DatAdd("""yyyy""";1;Datum())

    ergibt eben #Funktion

    in VBA

    Feld.DefaultValue = DateAdd("yyyy",1,Date)

    Feld.DefaultValue = str(DateAdd("yyyy",1,Date))

    Feld.DefaultValue = DateSerial(Year(Date)+1, Month(Date), Day(Date))

    ergibt eben #Name

    kann mir da jemand weiterhelfen

    weil =Datum oder Date() funktioniert 




    • Bearbeitet MCDPone Freitag, 2. März 2018 11:18
    Freitag, 2. März 2018 11:13

Antworten

  • OK Selber gefunden

    GueltigBis.DefaultValue = Format(DateAdd("yyyy", 1, Date), "\#yyyy\-mm\-dd\#")

    • Als Antwort markiert MCDPone Freitag, 2. März 2018 11:20
    Freitag, 2. März 2018 11:20