Datum in UF
Peter
ich habe in meiner UF 3 TextBoxen mit Name, Vorname und Datum. Klappt auch eigentlich ganz gut. Nur da in die Zelle wo das Datum hin kommt habe ich die Zelle so Formatiert das ich nur das Jahr angezeigt bekomme. Wenn ich aber das kommplette Datum über die UF eingebe bekomme ich auch das komplette datum angezeigt. Ich weis nicht wie den Code umstellen soll das ich nur das Jahr angezeigt bekomme. Das Problem ist ich brauche das komplette Datum für die berechnung.
mfg Peter
Private Sub CommandButton1_Click()
Dim nz As Integer
With Worksheets("Geburtstage")
nz = .Cells(Rows.Count, 1).End(xlUp).Row + 1 ' neue Zeile
If nz