Makro ändern
28.08.2004 20:35:50
Max M.
was muss bei diesen Makro geändert werden, dass nicht von rechts, sondern von linke ein Leerzeichen eingefügt wird???
Zelleninhalte z.b. K12345 sollen in K 12345 geändert werden.
Sub LeezeichenEinfügen ()
On Error Resume Next
For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row
Cells(i, 5).Value = Left(Cells(i, 5), Len(Cells(i, 5)) - 1) & " " & Right(Cells(i, 5), 1)
Next
End Sub
Max