used range
Burghard
kann mir jemand das nachfolgende Makro mit "used range" umschreiben?
Schönen Gruß
Burghard
Sub Leerzeichen_entfernen_160()
Dim i As Integer
For i = 1 To 12000
Cells(i, 5) = Application.WorksheetFunction.Substitute(Cells(i, 5), Chr(160), "")
Next
End Sub