Office: (Office 2003) komma durch Punkt ersetzen

guten abend
ich will mit nachfolgenden Code im Textfeld den Wert zB. 125,75 in 125.75
umwandeln.
Dim I As Integer

' alle Kommas durch Punkte ersetzen
For I = 1 To Len(Me!txtEinzelPreis)
If Mid(Me!txtEinzelPreis, I, 1) = "," Then
Me!txtEinzelPreis = Left(Me!txtEinzelPreis, I - 1) & _
"." & Mid(Me!txtEinzelPreis, I + 1)
End If
Next I

Ich erhalte aber aus mir leider noch nicht bekannten Fehler im Code 12.75,00 €.
Das Feldformat ist auf Euro und dezimalstellenanzahl auf automatisch eingestellt.
Was müsste ich noch ändern damit ich den richtigen Wert angezeigt bekomme.

:)

 

Hallo,
das Originalfeld kannst Du nicht ändern, das Komma ist ja in der Systemsteuerung als Dezimaltrennzeichen festgelegt. Du brauchst also zur Anzeige ein extra Feld. Das erzeugst Du am besten in der Abfrage.

Code:

Falls auch das Tausendertrennzeichen (das ist ja im englischen Format das Komma) benötigt wird, wird es etwas aufwendiger.

Code:

Hier wird erst das Komma durch ein Semikolon, dann der Punkt zum Komma und dann das Semikolon zum Punkt gemacht.

 

Danke für deine Hilfe, ich habe ein zusätzliches Feld eingefügt und die Datenherkunft angepasst.
Ich füge mal eine DB bei, weil der Fehler wahrscheinlich eher im Rechner-Formular liegt.
Der Code vom Rechner-Formular ist nicht von mir, habe ihn im Netz gefunden.

Jens

 

Hallo,

von welchem Fehler ist hier die Rede? Ursprünglich ging es um die fehlerhafte Ersetzung
von Komma durch Punkt - zu welchem Zweck überhaupt?! - und worum geht es nun?

BTW:
Zur Konvertierung von Dezimalkomma zu Punkt kann man die Str-Funktion einsetzen.

 

Hallo,

Aber nicht auch das Tausendertrennzeichen, da wird mit Str gar keins eingefügt.
Und die Formatierung geht verloren. Aus 120,10 € wird 120.1 und aus 1.234,80 € wird 1234.8

 

hallo
beim Aufruf des Rechner-Formulars wird nicht der korrekte Wert übergeben.

Jens

 

Hallo.
Nach flüchtiger Ansicht des Codes möchte ich den Sinn der hier gestellten Komma-Punkt-Diskussion gern in Frage stellen
und hoffe, dass der TS sich nachträglich vielleicht doch noch zu seinen Beweggründen äußert.

@Klaus:
Und von Tausendertrennzeichen war seinerseits bislang auch gar nicht die Rede.
Ich vermute, hier liegt lediglich ein Problem im Umgang mit dem selbst- oder fremd-gebastelteten Rechner vor.

@Jens:
Du darfst dich auch gern mal etwas ausführlicher äußern...

nicht nur das, es wird auch nicht der korrekte Wert zurückgegeben.
Ist das also das eigentliche Problem?!

 

\@Anne,
mit Str geht ja das komplette Format verloren, nicht nur das Tausenderzeichen.
123,10 € => 123.1

Aber vermulich läuft das trotzdem auf Str raus, weil das Format ja gar nicht benötigt wird. Es sah am Anfang so aus, als ob hier ein Feld in englischer Zahlenformatierung ausgegeben werden soll. Das scheint aber nicht der Fall zu sein. Die DB habe ich mir noch nicht angesehen.

 

hallo
Ziel soll eigentlich sein das der Wert aus dem Feld txtEinzelPreis an das Rechner-Formular übergeben wird und dort noch andere Rechenoperationen ausgeführt werden.
Nur wird nicht der korrekte Wert an den Rechner übergeben.
Beim Start des Themas dachte ich noch das es am Komma im Textfeld liegt.

Jens

 

Hallo,
dann verwende die Str Funktion, das reicht dann.

 

kannst Du mir bitte noch einen Tip zur Str Funktion geben

Jens

 

Hallo,
kannst Du mal erklären, was Du da überhaupt vorhast?
Wozu den Rechner?

Es wäre ganz gut, wenn Du Dich zu längeren Erläuterungen hinreisen lassen könntest.

 

Ich habe den Code noch nicht ganz durchschaut, aber ich vermute, dass die Ersetzung von Komma durch Punkt oder umgekehrt der Auslöser für die Probleme ist. Wozu soll das überhaupt gut sein? Schau dir den Windows-Rechner an, dort wird auch das Komma angezeigt. Oder muss deine Anwendung auch international lauffähig sein? Dann verlass dich doch auf die Systemeinstellungen!

Ein Beispiel für die fehlerhafte Programmierung:
Gib eine Dezimalzahl mit Nachkommastellen ein und wechsle das Vorzeichen --> das Komma verschwindet spurlos!

@Jens:

Die Beschreibung findest du in der Access-Hilfe.

@Klaus:

Die Frage würde ich nicht stellen. Warum sollte man nicht auch mal einen Taschenrechner programmieren?

 

die Variante mit dem Windows-Rechner habe ich schon in meiner DB integriert aber dabei kann ich doch nur den Rechner öffnen und nicht das Ergebnis aus dem Rechner in ein Formular übergeben.

Jens

 

OK, das Problem ist aber definitiv nicht, wie man Komma durch Punkt ersetzt, sondern dass dies überhaupt versucht wird.

Daher noch einmal die Frage, warum machst du das?!
(oder ist dies Teil des "geerbten" Codes?)