Komma- Punkt Problem
25.09.2004 19:06:14
Daniel
Ich habe etliche Dateien, in denen sich Aktienkurse befinden.
Da es sich um mehrere Dateien handelt wäre eine Lösung mit der ich nur die Datei "anwählen" muss sehr komfortabel.
Leider haben die Daten ein anderes Format als das was ich gerne hätte.
Vielleicht kann mir ja hier jemand helfen.
https://www.herber.de/bbs/user/11155.xls
Folgendes soll geändert werden:
- In Spalte A steht das Datum. Dieses soll zu JJJJMMTT geändert werden.
- In den Spalten B bis E stehen Kurse. Diese sollen einen Punkt statt einem Komma haben.
- In Spalte F steht das Handelsvolumen. Es sollen keine Tausendertrennzeichen sein und das Komma soll durch Punkt ersetzt werden.
Der bisherige Lösungsvorschlag sah so aus:
Sub umformatieren()
With Application
.DecimalSeparator = "."
.ThousandsSeparator = ","
.UseSystemSeparators = False
End With
Columns(1).NumberFormatLocal = "JJJJMMTT"
Columns(6).NumberFormat = "0.00"
End Sub
Mit diesem Makro wird komplett alles in Excel verändert.
Das möchte ich so nicht. Es sollen wirklich NUR die
Spalten 2-5 mit Punkt statt Komma versehen werden; und nicht, das das in meinen anderen Excel Dateien auch passiert.
Für Hilfe bin ich sehr dankbar.
Daniel