Moin,
gibt es eine einfache Möglichkeit (einfacher als per left/mid/instr. oder split) um in den ersten 7 Zeichen einer Zelle die Kommas in Punkte zu ändern? Und das per VBA-Code?
Tommi
AW: Per VBA , in . ändern in ersten 7-String-Zeichen
04.07.2011 15:34:05
Rudi
Hallo,
was meinst du mit einfacher? Das ist doch einfach.
Zelle=replace(left(Zelle, 7), ",", ".") &mid(zelle, 8)
Gruß
Rudi
AW: Per VBA , in . ändern in ersten 7-String-Zeichen
04.07.2011 15:58:07
TommiH
*lach* hm, richtig, replace gab es ja auch ;)
Naja, das ist ja auch einfacher, ich hatte es bisher im Stil von
vx = Cells(zeile, 1)
h = InStr(Left(vx, 6), ",")
If h > 0 Then
Cells(zeile, 1) = Left(vx, h - 1) & "." & Mid(vx, h + 1)
End If ~f~
nun also
~f~ Cells(zeile, 1) = Replace(Left(Cells(zeile, 1), 7), ",", ".") & Mid(Cells(zeile, 1), 8)
Danke!
Hm, aber die IF-Abfrage macht schon (aus Performancegründen) Sinn, oder? Es geht um ca. 35000 Zeilen aber nur um grob geschätzt 100-150 Ersetzungen.
Thomas