Nach langer Recherche bin ich denn nu doch nicht weiter gekommen.
Ich möchte, einer Auswertung auf einer anderen Seite, oder gar Protokolldatei, wegen, das der Benutzer das Datum, in der ...Cells(X,"I")... mit STRG + (Punkt) also Format(Zelle,"dd.mm.yyyy") eingibt und nicht händisch (Zelle, "Donnerstag, 22.01.2015") - Sollte er 22.01.2015 eingeben, wär es ja kein Problem, würd ich aber auch gern abfangen (der Effizienz wegen :) )
Ich möcht daraus eine MsgBox, und ein Protokoll in einer "Misstakes - Tabelle" machen. Was ja kein Problem darstellt. :: On Error Goto Err6 : "Bitte geben Sie das Datum mit 'STRG + (Punkt) ein!" ...
Wie kann ich diese differenzierte Eingabe abfangen? Gibt es was einfaches oder muss ich die CHR(?) zeichen abfangen?
Hier mein scheinbar unbeholfener Versuch:
...
On Error GoTo Mis1
Format(Sheets(FL).Cells(FLZeile + 1, "B").Value, "dd.mm.yyyy") Format(Sheets(FL).Cells(FLZeile + 1, "B").Value, "dddd,dd.mm.yyy")
oder gar direktes händisches Eingeben (22.01.2015)?
FL sei hier als Private Const definiert ("Eigenname ber Tabellenseite")
mfg Ron :)