aus 1.1.7 soll 01.01.2007 werden
17.02.2005 12:31:21
Edwin
ich habe folgenden umständlichen und nicht vollständig funktionierenden VBA:
Private Sub txtDatum_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If txtDatum.Text = Format(txtDatum.Text, "dd.mm.yy") Or txtDatum.Text = Format(txtDatum.Text, "d.m.yy") Or txtDatum.Text = Format(txtDatum.Text, "d.m.y") Then
txtDatum.Text = Format(txtDatum.Text, "dd.mm.yyyy")
ElseIf txtDatum.Text = Format(txtDatum.Text, "dd.mm.yyyy") Then
BlaBla
End If
End Sub
Ich will halt erreichen, dass sämtliche Datumseingaben in "dd.mm.yyyy" umgewandelt werden.
Kann ich das irgendwie eleganter lösen, vorallem "d.m.y" geht gar nicht?
Gruß
Edwin
Anzeige