ich weiss jetzt werden einige sagen, dass das schon tausendmal besprochen wurde (ich kenne wahrscheinlich selbst an die 20 Beiträge), aber diesmal ist es irgendwie anders!
Ich importiere in den verschiedensten Arbeitsblättern Daten aus externen Quellen. In diesen Quellen sind die Zahlen mit Punkten versehen (auch meine Ausgabedatei braucht diese), allerdings kommt Excel damit nach dem Import nicht klar.
Folgender Teil meines Makros soll dieses Problem lösen:
Sheets(1).Select
Range("B31").Activate
Range(Selection, ActiveCell.SpecialCells(xlLastCell)).Select
Application.CutCopyMode = False
Selection.NumberFormat = "@"
Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
Selection.NumberFormat = "0.0"
Wenn ich dieses Verfahren von Hand aufzeichne/ausführe funktioniert es wunderbar; aber nicht wenn ich das Makro selbst starte. Der markierte Zelbereich umfasst ca. 300 * 300 Zellen.
Nur um es zu verdeutlichen:
Das Makro läuft ab (ohne Fehler), aber die Umwandlung erfolgt nicht richtig. Die Zellen sind zwar dann als Zahlen formatiert, der Zellinhalt wird aber nicht richtig erkannt.
Ab und zu wird die erste Zelle richtig ausgeführt, dann wird mir allerdings ein Zirkelbezug mitgeteilt (gibt überhaupt keinen Sinn!).
Ich wäre Euch sehr dankbar, wenn irgendjemandem eine praktikable Variante einfallen würde!
Gruß
Jens