Datum Format - Problem
05.06.2009 10:22:25
Niels
Das Datum Format hat ja schon hunderte von Fragen und Antworten hervorgebracht aber ich komme im Grunde recht gut damit zurecht.
Jetzt habe ich aber ein Problem, für das ich auch in diversen Foren keine Lösung gefunden habe.
Es geht darum, dass ein recht komplexes ExcelVBA Project in allen Language Formaten funktionieren muss (in der Regel englisch/deutsch)
Dafür habe ich mir eine Function geschrieben, die das Datum immer in das jeweilige System-Format wandelt.
Public Function Datumsformat(datum As Variant) As Date
Datumsformat = Format(DateValue(datum), "Short Date")
End Function
Das funktioniert auch prima, außer in UserForms.
Dort wird immer das englische Format übernommen (auch mit Regional Settings" german")
Ich habe eine Beispiel Datei hochgeladen.
https://www.herber.de/bbs/user/62233.xls
Wenn man die Tabelle erst mit Regional Settings "englisch" und dann "german" ausführt, taucht das Problem auf.
Wo ist denn hier der Fehler?
Vielen Dank für die Hilfe
Niels