Thema Datum  Von Nutzer Rating
Antwort
20.10.2021 22:57:36 Lisa
NotSolved
Blau TextToColumns ändert Dezimalzeichen
21.10.2021 00:23:17 xlKing
NotSolved
21.10.2021 00:59:43 Lisa
NotSolved
21.10.2021 13:59:51 Lisa
NotSolved
21.10.2021 15:44:44 Der Steuerfuzzi
NotSolved
21.10.2021 15:56:33 Der Steuerfuzzi
NotSolved
21.10.2021 23:52:31 Lisa
NotSolved

Ansicht des Beitrags:
Von:
xlKing
Datum:
21.10.2021 00:23:17
Views:
571
Rating: Antwort:
  Ja
Thema:
TextToColumns ändert Dezimalzeichen

Hallo Lisa, 

das hat mit TextToColumns nichts zu tun. Die falsche Umwandlung vom Dezimal-Komma zum Tausender-Punkt erfolgt schon in der ersten Zeile deines Codes. du liest hier nämlich mit der Value-Eigenschaft Text aus. Da das im Normalfall nicht geht, versucht Excel das implizit umzuwandeln. Dabei wird die englische Schreibweise verwendet, die das Komma mit drei Stellen danach als Tausendertrennzeichen erkennt. Um richtig umzuwandeln müsstest du eine Umwandlungsfunktion wie CDbl() bemühen. in diese kannst du jedoch immer nur einen Text (also eine Zelle) schreiben. Du bräuchtest also eine Schleife um alle Zellen zu durchlaufen.

Lass also die erste Zeile weg und nutze nur die Zeile mit TextToColumns. Dann funktionierts bei mir. Solltest du damit immer noch Probleme haben, dann probier mal zusätzlich den Parameter DecimalSeparator einzubauen: .TextToColumns DataType:=xlFixedWidth, DecimalSeparator:=","

Gruß Mr. K.

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
20.10.2021 22:57:36 Lisa
NotSolved
Blau TextToColumns ändert Dezimalzeichen
21.10.2021 00:23:17 xlKing
NotSolved
21.10.2021 00:59:43 Lisa
NotSolved
21.10.2021 13:59:51 Lisa
NotSolved
21.10.2021 15:44:44 Der Steuerfuzzi
NotSolved
21.10.2021 15:56:33 Der Steuerfuzzi
NotSolved
21.10.2021 23:52:31 Lisa
NotSolved