Text in Zahl konvertieren
14.06.2004 12:36:59
Christoph Dümmen
in einer Datei erhalte ich Ziffern, welche als Text formatiert sind. Da ich mit diesen nicht rechnen kann, multipliziere ich sie via VBA mit 1.
Soweit funktioniert auch alles, wenn da nicht das große Aber... wäre:
Es funktioniert gut, wenn die textwerte analog der Regional Settings der Systemsteuerung formatiert sind.
(Text) 200,56 * 1 = (Zahl) 200,56
(Text) 200.56 * 1 = (Zahl) 20056 - schließlich ist ja der Punkt der Tausender Trennpunkt; ist ja verständlich
Aber wie kann ich eine korrekte Konvertierung sicherstellen, wenn die Textwerte mit einem Dezimalpunkt geliefert werden?
Muss ich die Regional Settings via Makro editieren? Wenn ja, wie?
Und:
Application.Decimalseparator
Application.Thousandseparator
Application.UseSystemSeparators
beeinflußt lediglich das Erscheinungsbild, nicht jedoch das Verhalten bei der Konvertierung!
Hilfe, sehe ich den Wald vor lauter Bäumen nicht?
Ich habe mal eine Mappe mit einem Beispiel.
https://www.herber.de/bbs/user/7358.xls
Danke
Christoph