ich hätte eine kurze Frage - gibt es einen schnelleren Weg um alle Zellen einer Spalte mit einem Teil einer Anderen zu befüllen?
In VBA!
Ich habe folgenden Code, aber das dauuuuuert ;) - da gibt es doch bestimmt einen Trick das schneller zu machen, oder?
Columns(6).Insert Shift:=xlToRight
h = 1
Do while Cells(h,1) ""
h = h + 1
Cells(h, 6) = Left(Cells(h, 1), 6)
Loop
Das Problem, h geht bis ca. 250.000...Tommi