Herbers Excel-Forum - das Archiv

Punkt durch Komma ersetzen

Bild

Betrifft: Punkt durch Komma ersetzen
von: Alexej
Geschrieben am: 15.12.2003 09:35:48
Hallo nochmals :)

Irgendwie finde ich die Loesung fuer mein Problem nicht (etwas weiter unten), deshalb eine andere Frage, die zur Loesung fuehren sollte.

Wie kann man Excel dazu zwingen, in einem bestimmten Bereich Zahlen mit "." als Dezimaltrennzeichen in Zahlen mit "," als Dezimaltrennzeichen umzuwandeln.

D.h. z.B. Range A10:A20, dort soll nach Zahlen gesucht werden und wenn z.B. die Zahl 12.23 gefunden wird, soll diese in 12,23 umgewandelt werden.

Weiss jemand Rat?

Wiele Gruesse aus verschneitem Moskau,
Alexej

Bild

Betrifft: AW: Punkt durch Komma ersetzen
von: Mac4
Geschrieben am: 15.12.2003 10:20:24
Hallo Alexej,

hier 2 Möglichkeiten:



Sub test()
Dim Zelle
For Each Zelle In Range("A10:A20")
Zelle.Value = WorksheetFunction.Substitute(Zelle.Value, ".", ",")
Next
End Sub





Sub test1()
Range("A10:A20").Select
Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
Cells.Find(What:=".", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False) _
.Activate
End Sub



Marc
Bild

Betrifft: AW: Punkt durch Komma ersetzen
von: Alexej
Geschrieben am: 15.12.2003 11:45:44
Danke fuer die Hilfe :)

Ich versuche das ganze mit der ersten Formel zu loesen, jedoch habe ich nun folgendes problem, das ich die Fehlermeldung "type mismatch" bekomme :(

Gruss,
Alexej
Bild

Betrifft: AW: Punkt durch Komma ersetzen
von: Alexej
Geschrieben am: 15.12.2003 12:21:49
Die zweite Variante funktioniert einwandfrei, danke vielmals :))

Gruss,
Alexej
Bild
Excel-Beispiele zum Thema " Punkt durch Komma ersetzen"
Einige Zeilen in einer sequentiellen Datei ersetzen Alle #DIV/0!-Fehlerwerte in Tabelle durch 0 ersetzen
Zellkontextmenü durch Jahreskalender ersetzen Suchen in 2. Tabelle und Ersetzen der Quelldaten
Tabellen vergleichen und Zeilen ersetzen Errechneten Wert durch nächsthöheren ersetzen
Wert aus Gültigkeitsliste durch eine Zahl ersetzen Bundesländernamen durch Abkürzungen ersetzen
Telefonnumern mit Liste vergleichen und durch Namen ersetzen Doppelt vorkommende Anführungszeichen in Textdatei ersetzen