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